diff --git a/CMakeLists.txt b/CMakeLists.txt index aecf690ff..6147a5376 100644 --- a/CMakeLists.txt +++ b/CMakeLists.txt @@ -406,15 +406,15 @@ set (wsjt_FSRCS ) set (ka9q_CSRCS - lib/sfrsd2/decode_rs.c - lib/sfrsd2/encode_rs.c - lib/sfrsd2/init_rs.c + lib/ftrsd/decode_rs.c + lib/ftrsd/encode_rs.c + lib/ftrsd/init_rs.c ) set_source_files_properties (${ka9q_CSRCS} PROPERTIES COMPILE_FLAGS -Wno-sign-compare) set (wsjt_CSRCS ${ka9q_CSRCS} - lib/sfrsd2/sfrsd2.c + lib/ftrsd/ftrsd2.c lib/gran.c lib/igray.c lib/wsprd/nhash.c diff --git a/lib/Makefile.jt65 b/lib/Makefile.jt65 index 961230f68..1cbf9d001 100644 --- a/lib/Makefile.jt65 +++ b/lib/Makefile.jt65 @@ -37,7 +37,7 @@ OBJS1 = astrosub.o astro0.o astro.o sun.o coord.o tmoonsub.o \ symspec.o analytic.o db.o \ encode232.o interleave9.o\ entail.o fano232.o gran.o sync9.o decjt9.o \ - fil3.o decoder.o timer.o \ + fil3.o decoder.o timer.o exp_decode65.o fqso_first.o \ twkfreq.o symspec2.o shell.o sync65.o peakup.o slope.o xcor.o\ fillcom.o chkss2.o zplot9.o flat1.o flat2.o \ jt65a.o symspec65.o flat65.o ccf65.o decode65a.o \ diff --git a/lib/extract.f90 b/lib/extract.f90 index 46b60b6bb..28881e5ee 100644 --- a/lib/extract.f90 +++ b/lib/extract.f90 @@ -64,10 +64,10 @@ subroutine extract(s3,nadd,nqd,ntrials,naggressive,ndepth,nexp_decode, & ntry=0 nverbose=0 - call timer('sfrsd ',0) - call sfrsd2(mrsym,mrprob,mr2sym,mr2prob,ntrials,nverbose,correct, & + call timer('ftrsd ',0) + call ftrsd2(mrsym,mrprob,mr2sym,mr2prob,ntrials,nverbose,correct, & param,indx,tt,ntry) - call timer('sfrsd ',1) + call timer('ftrsd ',1) ncandidates=param(0) nhard=param(1) nsoft=param(2) diff --git a/lib/sfrsd2/Makefile b/lib/ftrsd/Makefile similarity index 72% rename from lib/sfrsd2/Makefile rename to lib/ftrsd/Makefile index f3302dd2b..61b1357ec 100644 --- a/lib/sfrsd2/Makefile +++ b/lib/ftrsd/Makefile @@ -22,20 +22,20 @@ CFLAGS = -I. -DWIN32 -DWin32 -DBIGSYM -DHAVE_STRUCT_TIMESPEC %.o: %.F90 ${FC} ${FFLAGS} -c $< -all: libsfrsd.a +all: libftrsd.a -OBJS1 = extract2.o sfrsd2.o init_rs_int.o encode_rs_int.o decode_rs_int.o -libsfrsd.a: $(OBJS1) - ar cr libsfrsd.a $(OBJS1) - ranlib libsfrsd.a - cp libsfrsd.a .. +OBJS1 = extract2.o ftrsd2.o init_rs_int.o encode_rs_int.o decode_rs_int.o +libftrsd.a: $(OBJS1) + ar cr libftrsd.a $(OBJS1) + ranlib libftrsd.a + cp libftrsd.a .. # Build rsdtest OBJS2 = rsdtest.o rsdtest: $(OBJS2) ../libjt.a - $(FC) -o rsdtest $(OBJS2) libsfrsd.a ../libjt.a ../libpthreadGC2.a + $(FC) -o rsdtest $(OBJS2) libftrsd.a ../libjt.a ../libpthreadGC2.a -sfrsd: sfrsd.o encode_rs_int.o decode_rs_int.o init_rs_int.o +ftrsd: ftrsd.o encode_rs_int.o decode_rs_int.o init_rs_int.o gcc -g -o $@ $^ encode_rs_int.o: encode_rs.c @@ -50,4 +50,4 @@ init_rs_int.o: init_rs.c .PHONY : clean clean: - rm -rf *.o libjt.a rsdtest sfrsd + rm -rf *.o libjt.a rsdtest ftrsd diff --git a/lib/sfrsd2/Makefile.sfrsd b/lib/ftrsd/Makefile.sfrsd similarity index 100% rename from lib/sfrsd2/Makefile.sfrsd rename to lib/ftrsd/Makefile.sfrsd diff --git a/lib/sfrsd2/Makefile.sfrsd3 b/lib/ftrsd/Makefile.sfrsd3 similarity index 100% rename from lib/sfrsd2/Makefile.sfrsd3 rename to lib/ftrsd/Makefile.sfrsd3 diff --git a/lib/sfrsd2/decode_rs.c b/lib/ftrsd/decode_rs.c similarity index 100% rename from lib/sfrsd2/decode_rs.c rename to lib/ftrsd/decode_rs.c diff --git a/lib/sfrsd2/encode_rs.c b/lib/ftrsd/encode_rs.c similarity index 100% rename from lib/sfrsd2/encode_rs.c rename to lib/ftrsd/encode_rs.c diff --git a/lib/sfrsd2/extract2.f90 b/lib/ftrsd/extract2.f90 similarity index 98% rename from lib/sfrsd2/extract2.f90 rename to lib/ftrsd/extract2.f90 index c79571cf7..e878e09eb 100644 --- a/lib/sfrsd2/extract2.f90 +++ b/lib/ftrsd/extract2.f90 @@ -52,7 +52,7 @@ subroutine extract2(s3,nadd,ntrials,param,msg) call interleave63(mr2prob,-1) nverbose=0 - call sfrsd2(mrsym,mrprob,mr2sym,mr2prob,ntrials,nverbose,correct, & + call ftrsd2(mrsym,mrprob,mr2sym,mr2prob,ntrials,nverbose,correct, & param,indx,tt,ntry) ncandidates=param(0) nhard=param(1) diff --git a/lib/sfrsd2/sfrsd2.c b/lib/ftrsd/ftrsd2.c similarity index 98% rename from lib/sfrsd2/sfrsd2.c rename to lib/ftrsd/ftrsd2.c index 397c53b8b..c222f9ea2 100644 --- a/lib/sfrsd2/sfrsd2.c +++ b/lib/ftrsd/ftrsd2.c @@ -1,5 +1,5 @@ /* - sfrsd2.c + ftrsd2.c A soft-decision decoder for the JT65 (63,12) Reed-Solomon code. @@ -23,7 +23,7 @@ static void *rs; -void sfrsd2_(int mrsym[], int mrprob[], int mr2sym[], int mr2prob[], +void ftrsd2_(int mrsym[], int mrprob[], int mr2sym[], int mr2prob[], int* ntrials0, int* verbose0, int correct[], int param[], int indexes[], double tt[], int ntry[]) { @@ -101,9 +101,9 @@ void sfrsd2_(int mrsym[], int mrprob[], int mr2sym[], int mr2prob[], */ if(verbose) { - logfile=fopen("/tmp/sfrsd.log","a"); + logfile=fopen("/tmp/ftrsd.log","a"); if( !logfile ) { - printf("Unable to open sfrsd.log\n"); + printf("Unable to open ftrsd.log\n"); exit(1); } } diff --git a/lib/sfrsd2/sfrsd_paper/Makefile b/lib/ftrsd/ftrsd_paper/Makefile similarity index 100% rename from lib/sfrsd2/sfrsd_paper/Makefile rename to lib/ftrsd/ftrsd_paper/Makefile diff --git a/lib/sfrsd2/sfrsd_paper/binomial.c b/lib/ftrsd/ftrsd_paper/binomial.c similarity index 100% rename from lib/sfrsd2/sfrsd_paper/binomial.c rename to lib/ftrsd/ftrsd_paper/binomial.c diff --git a/lib/sfrsd2/sfrsd_paper/binomial_subs.c b/lib/ftrsd/ftrsd_paper/binomial_subs.c similarity index 100% rename from lib/sfrsd2/sfrsd_paper/binomial_subs.c rename to lib/ftrsd/ftrsd_paper/binomial_subs.c diff --git a/lib/sfrsd2/sfrsd_paper/bmdata-2.dat b/lib/ftrsd/ftrsd_paper/bmdata-2.dat similarity index 100% rename from lib/sfrsd2/sfrsd_paper/bmdata-2.dat rename to lib/ftrsd/ftrsd_paper/bmdata-2.dat diff --git a/lib/sfrsd2/sfrsd_paper/bmdata.dat b/lib/ftrsd/ftrsd_paper/bmdata.dat similarity index 100% rename from lib/sfrsd2/sfrsd_paper/bmdata.dat rename to lib/ftrsd/ftrsd_paper/bmdata.dat diff --git a/lib/sfrsd2/sfrsd_paper/fig_ntrials_vs_nhard.gnuplot b/lib/ftrsd/ftrsd_paper/fig_ntrials_vs_nhard.gnuplot similarity index 100% rename from lib/sfrsd2/sfrsd_paper/fig_ntrials_vs_nhard.gnuplot rename to lib/ftrsd/ftrsd_paper/fig_ntrials_vs_nhard.gnuplot diff --git a/lib/sfrsd2/sfrsd_paper/fig_psuccess.gnuplot b/lib/ftrsd/ftrsd_paper/fig_psuccess.gnuplot similarity index 100% rename from lib/sfrsd2/sfrsd_paper/fig_psuccess.gnuplot rename to lib/ftrsd/ftrsd_paper/fig_psuccess.gnuplot diff --git a/lib/ftrsd/ftrsd_paper/fig_psuccess.pdf b/lib/ftrsd/ftrsd_paper/fig_psuccess.pdf new file mode 100644 index 000000000..9539d07c5 Binary files /dev/null and b/lib/ftrsd/ftrsd_paper/fig_psuccess.pdf differ diff --git a/lib/sfrsd2/sfrsd_paper/fig_wer.gnuplot b/lib/ftrsd/ftrsd_paper/fig_wer.gnuplot similarity index 100% rename from lib/sfrsd2/sfrsd_paper/fig_wer.gnuplot rename to lib/ftrsd/ftrsd_paper/fig_wer.gnuplot diff --git a/lib/sfrsd2/sfrsd_paper/fig_wer2.gnuplot b/lib/ftrsd/ftrsd_paper/fig_wer2.gnuplot similarity index 100% rename from lib/sfrsd2/sfrsd_paper/fig_wer2.gnuplot rename to lib/ftrsd/ftrsd_paper/fig_wer2.gnuplot diff --git a/lib/sfrsd2/sfrsd_paper/ftdata-10000-tight.dat b/lib/ftrsd/ftrsd_paper/ftdata-10000-tight.dat similarity index 100% rename from lib/sfrsd2/sfrsd_paper/ftdata-10000-tight.dat rename to lib/ftrsd/ftrsd_paper/ftdata-10000-tight.dat diff --git a/lib/sfrsd2/sfrsd_paper/ftdata-100000-loose.dat b/lib/ftrsd/ftrsd_paper/ftdata-100000-loose.dat similarity index 100% rename from lib/sfrsd2/sfrsd_paper/ftdata-100000-loose.dat rename to lib/ftrsd/ftrsd_paper/ftdata-100000-loose.dat diff --git a/lib/sfrsd2/sfrsd_paper/ftdata-2.dat b/lib/ftrsd/ftrsd_paper/ftdata-2.dat similarity index 100% rename from lib/sfrsd2/sfrsd_paper/ftdata-2.dat rename to lib/ftrsd/ftrsd_paper/ftdata-2.dat diff --git a/lib/sfrsd2/sfrsd_paper/sfrsd.lyx b/lib/ftrsd/ftrsd_paper/ftrsd.lyx similarity index 100% rename from lib/sfrsd2/sfrsd_paper/sfrsd.lyx rename to lib/ftrsd/ftrsd_paper/ftrsd.lyx diff --git a/lib/sfrsd2/sfrsd_paper/mfsk.f90 b/lib/ftrsd/ftrsd_paper/mfsk.f90 similarity index 100% rename from lib/sfrsd2/sfrsd_paper/mfsk.f90 rename to lib/ftrsd/ftrsd_paper/mfsk.f90 diff --git a/lib/sfrsd2/sfrsd_paper/prob.f90 b/lib/ftrsd/ftrsd_paper/prob.f90 similarity index 100% rename from lib/sfrsd2/sfrsd_paper/prob.f90 rename to lib/ftrsd/ftrsd_paper/prob.f90 diff --git a/lib/sfrsd2/sfrsd_paper/stats-100000-24db-3.dat b/lib/ftrsd/ftrsd_paper/stats-100000-24db-3.dat similarity index 100% rename from lib/sfrsd2/sfrsd_paper/stats-100000-24db-3.dat rename to lib/ftrsd/ftrsd_paper/stats-100000-24db-3.dat diff --git a/lib/sfrsd2/init_rs.c b/lib/ftrsd/init_rs.c similarity index 100% rename from lib/sfrsd2/init_rs.c rename to lib/ftrsd/init_rs.c diff --git a/lib/sfrsd2/int.h b/lib/ftrsd/int.h similarity index 100% rename from lib/sfrsd2/int.h rename to lib/ftrsd/int.h diff --git a/lib/sfrsd2/rs2.h b/lib/ftrsd/rs2.h similarity index 100% rename from lib/sfrsd2/rs2.h rename to lib/ftrsd/rs2.h diff --git a/lib/sfrsd2/rsdtest.f90 b/lib/ftrsd/rsdtest.f90 similarity index 100% rename from lib/sfrsd2/rsdtest.f90 rename to lib/ftrsd/rsdtest.f90 diff --git a/lib/sfrsd2/sfrsd.c b/lib/ftrsd/sfrsd.c similarity index 100% rename from lib/sfrsd2/sfrsd.c rename to lib/ftrsd/sfrsd.c diff --git a/lib/sfrsd2/sfrsd2.h b/lib/ftrsd/sfrsd2.h similarity index 64% rename from lib/sfrsd2/sfrsd2.h rename to lib/ftrsd/sfrsd2.h index 486f33c3a..4ef7ab47c 100644 --- a/lib/sfrsd2/sfrsd2.h +++ b/lib/ftrsd/sfrsd2.h @@ -1,3 +1,3 @@ -void sfrsd2_(int mrsym[], int mrprob[], int mr2sym[], int mr2prob[], +void ftrsd2_(int mrsym[], int mrprob[], int mr2sym[], int mr2prob[], int* ntrials0, int* verbose0, int correct[], int param[], int indexes[], double tt[], int ntry[]); diff --git a/lib/sfrsd2/sfrsd3.c b/lib/ftrsd/sfrsd3.c similarity index 100% rename from lib/sfrsd2/sfrsd3.c rename to lib/ftrsd/sfrsd3.c