mirror of
https://github.com/saitohirga/WSJT-X.git
synced 2024-11-21 19:55:20 -05:00
Correct flawed initial values for deltaa(1:2) in polfit.f90.
This commit is contained in:
parent
808b5f556d
commit
84e07c346a
@ -17,7 +17,7 @@ subroutine polfit(y,npts,a)
|
||||
ipk=maxloc(y)
|
||||
a(3)=(ipk(1)-1)*45.0
|
||||
|
||||
deltaa(1:2)=0.1*(a(2)-a(1))
|
||||
deltaa(1:2)=0.1*a(2)
|
||||
deltaa(3)=10.0
|
||||
nterms=3
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user