Remove s from ft8b argument list.

git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@7763 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
This commit is contained in:
Steven Franke 2017-07-01 14:58:34 +00:00
parent 4c88ab860b
commit 624ef493a8

View File

@ -56,7 +56,7 @@ contains
xdt=candidate(2,icand) xdt=candidate(2,icand)
nsnr=min(99,nint(10.0*log10(sync) - 25.5)) !### empirical ### nsnr=min(99,nint(10.0*log10(sync) - 25.5)) !### empirical ###
call timer('ft8b ',0) call timer('ft8b ',0)
call ft8b(dd,s,nfqso,f1,xdt,nharderrors,dmin,nbadcrc,message,xsnr) call ft8b(dd,nfqso,f1,xdt,nharderrors,dmin,nbadcrc,message,xsnr)
nsnr=xsnr nsnr=xsnr
xdt=xdt-0.6 xdt=xdt-0.6
call timer('ft8b ',1) call timer('ft8b ',1)