From 238ccff1109334a7f1397afb855083c30684889a Mon Sep 17 00:00:00 2001 From: Steven Franke Date: Sun, 16 Jul 2017 17:08:09 +0000 Subject: [PATCH] Properly round the printed snr. git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@7917 ab8295b8-cf94-4d9e-aec4-7959e3be5d79 --- lib/fsk4hf/ft8b.f90 | 2 +- lib/ft8_decode.f90 | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/lib/fsk4hf/ft8b.f90 b/lib/fsk4hf/ft8b.f90 index 75cf4d83d..81594d0d0 100644 --- a/lib/fsk4hf/ft8b.f90 +++ b/lib/fsk4hf/ft8b.f90 @@ -145,7 +145,7 @@ subroutine ft8b(dd0,newdat,nfqso,ndepth,lsubtract,iaptype,icand,sync0,f1,xdt, llra=2.0*rxdatap/(ss*ss) ! llr's for use with ap apmag=4.0 nap=0 -! if(ndepth.eq.3) nap=2 + if(ndepth.eq.3) nap=2 do iap=0,nap !### Temporary ### nera=1 diff --git a/lib/ft8_decode.f90 b/lib/ft8_decode.f90 index 689575642..38b08083f 100644 --- a/lib/ft8_decode.f90 +++ b/lib/ft8_decode.f90 @@ -77,7 +77,7 @@ contains call timer('ft8b ',0) call ft8b(dd,newdat,nfqso,ndepth,lsubtract,iaptype,icand,sync,f1, & xdt,apsym,nharderrors,dmin,nbadcrc,iap,ipass,iera,message,xsnr) - nsnr=xsnr + nsnr=nint(xsnr) xdt=xdt-0.6 call timer('ft8b ',1) if(nbadcrc.eq.0 .and. associated(this%callback)) then