diff --git a/CMakeLists.txt b/CMakeLists.txt index 06c5b4b55..66d19471b 100644 --- a/CMakeLists.txt +++ b/CMakeLists.txt @@ -340,7 +340,6 @@ set (wsjt_FSRCS lib/iso_c_utilities.f90 lib/jt4.f90 lib/jt4_decode.f90 - lib/fsk4hf/jt65_generator_matrix.f90 lib/jt65_decode.f90 lib/jt65_mod.f90 lib/ft8_decode.f90 diff --git a/lib/fsk4hf/jt65_generator_matrix.f90 b/lib/fsk4hf/jt65_generator_matrix.f90 deleted file mode 100644 index baf247ecd..000000000 --- a/lib/fsk4hf/jt65_generator_matrix.f90 +++ /dev/null @@ -1,75 +0,0 @@ -module jt65_generator_matrix - - implicit none - -! generator matrix for the jt65 (63,12) RS code - integer :: g(12,63) - data g/ & - 58,56,36,31,12,21,48,25,62,11, 3,62, & - 22,19,36,16,27,62, 5, 6,50, 6,10,40, & - 62,59, 9,40,57,11,28,60,30, 6,61,18, & - 5,31,43,14,53,12,60,52,50,62,48,51, & - 24,56,29, 2,21,43,35,57,37,54,40,33, & - 29, 4,42,51, 4,62,51,14,38, 1,22,55, & - 53, 5,16,60,24,13,20,17,34,14,27,58, & - 59,57,15,27, 8,61,24, 5, 7,54, 3,13, & - 14,47,39,18, 4,36, 2,43,63,59,33,57, & - 54, 9,10,13,50,30,34,56,60,54,51,54, & - 15,22,57, 3,42,46, 4,25,42,31,47,33, & - 29,19, 4,23, 5, 1,54,41, 6,14,63,48, & - 21,43,62,12,24,36,61,24,57,31,29,47, & - 30,22, 8,44, 1,32,16, 8,60,60,45,57, & - 54,25,51,34,12,27,38,42,31,53,52,58, & - 59,58,19,56,22,41,14,55,60,11,56,34, & - 16,44, 7,28,42, 2,34, 8,41, 5,46,38, & - 61,34, 7,55,62,41,12, 3,43,60,44,13, & - 14,41,60,26,40,18,22,63,57,23,43,22, & - 40,10,47, 4,55,10,32,25,12,53,45,24, & - 43,51,61,43,34, 6,20,55,17,33,29,37, & - 48,18,55,44,29,30,27,30,21,25,13,63, & - 44,33,42,28,36,58,62,52,11,38,27,24, & - 43,55,22,46,58,21,36,41,60,38,14,19, & - 63,50, 3,14,63,26,18,21,25,23,19,62, & - 22,22,46,55,10,13,10,36,62,33,22,56, & - 12,41,23,27,27, 5,59,41,13,60,42,63, & - 44,29,17,60,19,60,37,20,60,62,62,63, & - 44,61,37,58,52,52,28,10, 1,15,60,43, & - 51,10, 8, 8, 7,27, 5,14,19,40,49,37, & - 48,10,14,25,62,59, 6,15,44,27, 4,19, & - 63,41,62,22, 8,30,60,55,63, 7,46,52, & - 56,44,18, 9,41,62,39,53,26,10,24, 3, & - 13,51, 3,51,29,22,45,12,52, 7,15,25, & - 17,46,32,24,25,57,56,35,58,18,44,57, & - 54,22,11,10,56, 3,63, 2,52,51,26,59, & - 1, 2,56,31,50, 8,38,55,42,43,61,50, & - 34, 4,36,14, 8,57,23,58,24,37,62,18, & - 5, 3,20,35,19,61,14,63,52,56,19,48, & - 21,51,46,28,44,50, 1,32,47,45,43, 3, & - 13,30,28,15, 8,19,33,42,33,50,40,42, & - 9,19,15,46,62,50,18,42,13, 3,15,15, & - 57,46, 6,44,41,56,46,19,47,39,18,10, & - 46, 3, 9, 5,23,45,17,17,21,34,57,20, & - 31,25,14,15,48,31,60,44,29,15,30,53, & - 2,52, 6,38,60,19,22,44,63,35,19,13, & - 14,22,42,27,57,16,44,37,22, 3,52,41, & - 4,27,40,57,62,60, 2,12, 3,41,59,18, & - 5,37,11,47,36,11,11,42, 2,35,31,53, & - 2,46,58,35,28, 7, 2,27,57,60,63,12, & - 52,46,20,56,48,37, 8,40,31,14,40,59, & - 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, & - 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, & - 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, & - 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, & - 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, & - 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, & - 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, & - 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, & - 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, & - 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, & - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, & - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1/ - - contains - -end module jt65_generator_matrix -