diff --git a/lib/fsk4hf/ft8b.f90 b/lib/fsk4hf/ft8b.f90 index 51acfb93a..1fc055a86 100644 --- a/lib/fsk4hf/ft8b.f90 +++ b/lib/fsk4hf/ft8b.f90 @@ -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