mirror of
https://github.com/saitohirga/WSJT-X.git
synced 2024-11-27 06:38:44 -05:00
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:
parent
529444e713
commit
1942652c2a
@ -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
|
||||
|
@ -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
|
||||
|
Loading…
Reference in New Issue
Block a user