mirror of
https://github.com/saitohirga/WSJT-X.git
synced 2025-08-02 22:22:33 -04:00
Merge branch 'release-2.2.0' of bitbucket.org:k1jt/wsjtx into release-2.2.0
This commit is contained in:
commit
6af862c054
@ -176,8 +176,8 @@ contains
|
|||||||
endif
|
endif
|
||||||
df=12000.0/8192.0 !df = 1.465 Hz
|
df=12000.0/8192.0 !df = 1.465 Hz
|
||||||
if(bVHF) then
|
if(bVHF) then
|
||||||
ia=max(1,nint(nfa/df)-ntol)
|
ia=max(1,nint((nfa-100)/df))
|
||||||
ib=min(NSZ,nint(nfb/df)+ntol)
|
ib=min(NSZ,nint((nfb+100)/df))
|
||||||
nz=ib-ia+1
|
nz=ib-ia+1
|
||||||
call lorentzian(savg(ia),nz,a)
|
call lorentzian(savg(ia),nz,a)
|
||||||
baseline=a(1)
|
baseline=a(1)
|
||||||
|
Loading…
x
Reference in New Issue
Block a user