mirror of
https://github.com/saitohirga/WSJT-X.git
synced 2025-04-11 05:48:33 -04:00
Tweaks to sfox_sync routine.
This commit is contained in:
parent
577f6f3097
commit
161f456101
@ -34,12 +34,13 @@ subroutine sfox_sync(crcvd,fsample,isync,f,t)
|
||||
|
||||
pmax=0.
|
||||
ntol=100
|
||||
iz=nint(ntol/df)
|
||||
iz=nint(ntol/df)+2
|
||||
i0=nint(1500.0/df)
|
||||
ipk=-999
|
||||
jpk=-999
|
||||
jz=nsz-8*NS
|
||||
allocate(ccf(-iz:iz,1:jz))
|
||||
ccf=0.
|
||||
do j=1,jz
|
||||
do i=-iz,iz
|
||||
p=0.
|
||||
|
Loading…
Reference in New Issue
Block a user