From 129ee5439a79dd82adc1b7185821b196476698f2 Mon Sep 17 00:00:00 2001 From: Joe Taylor Date: Sat, 10 Feb 2024 09:47:11 -0500 Subject: [PATCH] Correct a typo. Always output summary decoding results. --- lib/superfox/sfoxtest.f90 | 28 ++++++++++++---------------- 1 file changed, 12 insertions(+), 16 deletions(-) diff --git a/lib/superfox/sfoxtest.f90 b/lib/superfox/sfoxtest.f90 index d1a869dec..3c1821b58 100644 --- a/lib/superfox/sfoxtest.f90 +++ b/lib/superfox/sfoxtest.f90 @@ -54,7 +54,7 @@ program sfoxtest call sfox_init(mm0,nn0,kk0,itu,fspread,delay) syncwidth=100.0 baud=12000.0/NSPS - tsym=1.0/naud + tsym=1.0/baud bw=NQ*baud maxerr=(NN-KK)/2 tsync=NSYNC/12000.0 @@ -181,22 +181,18 @@ program sfoxtest enddo ! ifile fgoodsync=float(ngoodsync)/nfiles fgood=float(ngood)/nfiles - if(snrdb.eq.0.0) then - if(isnr.eq.0) write(*,1300) -1300 format(' SNR iters fsync fgood averr worst rmsf rmst'/ & - '-----------------------------------------------------') - ave_harderr=float(ntot)/nfiles - rmst=sqrt(sqt/ngoodsync) - rmsf=sqrt(sqf/ngoodsync) - write(*,1310) snr,nfiles,fgoodsync,fgood,ave_harderr,nworst, & - rmsf,rmst -1310 format(f7.2,i6,2f7.2,f7.1,i6,f7.2,f6.3) - - if(fgood.le.0.5 .and. fgood0.gt.0.5) then - threshold=isnr + 1 - (fgood0-0.50)/(fgood0-fgood+0.000001) - endif - fgood0=fgood + if(isnr.eq.0) write(*,1300) +1300 format(' SNR iters fsync fgood averr worst rmsf rmst'/ & + '------------------------------------------------------') + ave_harderr=float(ntot)/nfiles + rmst=sqrt(sqt/ngoodsync) + rmsf=sqrt(sqf/ngoodsync) + write(*,1310) snr,nfiles,fgoodsync,fgood,ave_harderr,nworst,rmsf,rmst +1310 format(f7.2,i6,2f7.2,f7.1,i6,f7.2,f6.3) + if(fgood.le.0.5 .and. fgood0.gt.0.5) then + threshold=isnr + 1 - (fgood0-0.50)/(fgood0-fgood+0.000001) endif + fgood0=fgood if(snrdb.ne.0.0) exit ! if(fgood.eq.0.0) exit if(fgoodsync.lt.0.5) exit