w4kek/WSJT-X
1
0
Fork 0
mirror of https://github.com/saitohirga/WSJT-X.git synced 2024-11-26 06:08:42 -05:00
Code Issues Packages Projects Releases Wiki Activity

Process one more 3456-sample chunk in ft4d.

Browse Source
This commit is contained in:
Joe Taylor 2019-02-14 15:21:01 -05:00
parent 55e0e32e59
commit e4ba9f25fd
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lib/ft4/ft4d.f90
View File

@ -43,7 +43,7 @@ program ft4d
iarg=iarg+2 iarg=iarg+2
endif endif
nfa=0 nfa=0
nfb=4200 nfb=4224
ncontest=4 ncontest=4
ndecodes=0 ndecodes=0
nfqso=1500 nfqso=1500
@ -60,7 +60,7 @@ program ft4d
close(10) close(10)
cdatetime=infile(1:13)//'.000' cdatetime=infile(1:13)//'.000'
nsteps=npts/3456 nsteps=(npts-60000)/3456 + 1
do n=1,nsteps do n=1,nsteps
i0=(n-1)*3456 + 1 i0=(n-1)*3456 + 1
call ft4_decode(cdatetime,0.0,nfa,nfb,nQSOProgress,ncontest, & call ft4_decode(cdatetime,0.0,nfa,nfb,nQSOProgress,ncontest, &