Turn off ap.

git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@7890 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
This commit is contained in:
Steven Franke 2017-07-15 00:33:25 +00:00
parent c492cb1bd9
commit c1666a0069

View File

@ -114,7 +114,7 @@ subroutine ft8b(dd0,newdat,nfqso,ndepth,lsubtract,iaptype,icand,sync0,f1,xdt,
! nera=1
! nera=3
nap=0
if(ndepth.eq.3) nap=2
! if(ndepth.eq.3) nap=2
do iap=0,nap !### Temporary ###
nera=1