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

Merge branch 'release-2.2.0' of bitbucket.org:k1jt/wsjtx into release-2.2.0

Browse Source
This commit is contained in:
Bill Somerville 2020-06-01 16:48:01 +01:00
commit 6af862c054
No known key found for this signature in database
GPG Key ID: D864B06D1E81618F
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/jt65_decode.f90
View File

@ -176,8 +176,8 @@ contains
endif
df=12000.0/8192.0 !df = 1.465 Hz
if(bVHF) then
ia=max(1,nint(nfa/df)-ntol)
ib=min(NSZ,nint(nfb/df)+ntol)
ia=max(1,nint((nfa-100)/df))
ib=min(NSZ,nint((nfb+100)/df))
nz=ib-ia+1
call lorentzian(savg(ia),nz,a)
baseline=a(1)