w4kek/WSJT-X
1
0
Fork 0
mirror of https://github.com/saitohirga/WSJT-X.git synced 2025-05-29 21:02:26 -04:00
Code Issues Packages Projects Releases Wiki Activity

Adjust Q65 jitter-loop ranges according to ndepth.

Browse Source
This commit is contained in:
Joe Taylor 2020-11-20 17:07:11 -05:00
parent 7ff3d598c8
commit d9cb870540
1 changed files with 11 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
lib/qra/q65/q65_loops.f90
View File

@ -25,16 +25,20 @@ subroutine q65_loops(c00,nutc,npts2,nsps,mode,mode64,nsubmode,nFadingModel, &
allocate(c0(0:npts2-1)) allocate(c0(0:npts2-1))
irc=-99 irc=-99
s3lim=20. s3lim=20.
! ibwmax=11
! if(mode64.le.4) ibwmax=9 idfmax=3
! ibwmin=ibwmax idtmax=3
! idtmax=3
! call qra_params(ndepth,maxaptype,idfmax,idtmax,ibwmin,ibwmax,maxdist)
idfmax=5
idtmax=5
ibwmin=1 ibwmin=1
ibwmax=2 ibwmax=2
maxdist=15 maxdist=15
if(ndepth.ge.2) then
idfmax=5
idtmax=5
maxdist=25
endif
if(ndepth.eq.3) then
ibwmax=5
endif
LL=64*(mode64+2) LL=64*(mode64+2)
NN=63 NN=63
napmin=99 napmin=99