comicsansg/ft8d
1
0
Fork 0
mirror of https://github.com/pavel-demin/ft8d.git synced 2025-04-04 10:38:46 -04:00
Code Issues Packages Projects Releases Wiki Activity

remove NH1

Browse Source
This commit is contained in:
Pavel Demin 2018-10-13 22:32:59 +02:00
parent f9e209f399
commit ae19dcded2
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
ft8_params.f90
View File

@ -6,7 +6,7 @@ parameter (NN=NS+ND) !Total channel symbols (79)
parameter (NSPS=640) !Samples per symbol at 4000 S/s
parameter (NZ=NSPS*NN) !Samples in full 15 s waveform (50,560)
parameter (NMAX=15*4000) !Samples in iwave (60,000)
parameter (NFFT1=2*NSPS, NH1=NFFT1/2) !Length of FFTs for symbol spectra
parameter (NFFT1=2*NSPS) !Length of FFTs for symbol spectra
parameter (NSTEP=NSPS/4) !Rough time-sync step size
parameter (NHSYM=NMAX/NSTEP-3) !Number of symbol spectra (1/4-sym steps)
parameter (NDOWN=20) !Downsample factor

2
sync8.f90
View File

@ -40,7 +40,7 @@ subroutine sync8(dd,nfa,nfb,syncmin,nfqso,s,candidate,ncand,sbase)
enddo
call baseline(savg,nfa,nfb,sbase)
! savg=savg/NHSYM
! do i=1,NH1
! do i=1,NFFT1
! write(51,3051) i*df,savg(i),db(savg(i))
!3051 format(f10.3,e12.3,f12.3)
! enddo