Fix bug in JT4 decodes with MinW=G.

git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@5690 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
This commit is contained in:
Joe Taylor 2015-07-06 17:26:40 +00:00
parent 529444e713
commit 1942652c2a
2 changed files with 3 additions and 3 deletions

View File

@ -38,7 +38,7 @@ subroutine decode4(dat,npts,dtx,nfreq,flip,mode4,ndepth,neme,minw, &
enddo
do ich=ich1,ich2
nchips=nch(ich)
nchips=min(nch(ich),70)
nspchip=1260/nchips
k=istart
phi=0.d0

View File

@ -55,7 +55,7 @@ subroutine wsjt4(dat,npts,nutc,NClearAve,minsync,ntol,emedelay,dttol, &
call timer('sync4 ',1)
call timer('zplt ',0)
do ich=4,6
do ich=4,7
z(1:458,1:65)=zz(274:731,1:65,ich)
call zplt(z,ich-4,syncz,dtxz,nfreqz,flipz,sync2z,0,emedelay,dttol, &
nfqso,ntol)
@ -176,5 +176,5 @@ subroutine wsjt4(dat,npts,nutc,NClearAve,minsync,ntol,emedelay,dttol, &
deepave,cqual,char(ichar('A')+ich-1),ndeepave
endif
990 return
990 return
end subroutine wsjt4