mirror of
https://github.com/saitohirga/WSJT-X.git
synced 2025-05-23 18:02:29 -04:00
Correct a bug in computing the value of Doppler spread for FST4. Thanks to N2BP!
This commit is contained in:
parent
48ae40d781
commit
05ae0ee9af
@ -996,7 +996,7 @@ contains
|
|||||||
do i=-ia,ia !Find freq range that has 50% of signal power
|
do i=-ia,ia !Find freq range that has 50% of signal power
|
||||||
sum2=sum2 + ss(i)-avg
|
sum2=sum2 + ss(i)-avg
|
||||||
if(sum2.ge.0.25*sum1 .and. xi1.eq.-999.0) then
|
if(sum2.ge.0.25*sum1 .and. xi1.eq.-999.0) then
|
||||||
xi1=i - 1 + (sum2-0.25*sum1)/(sum2-sum2z)
|
xi1=i - 1 + (0.25*sum1-sum2)/(sum2-sum2z)
|
||||||
endif
|
endif
|
||||||
if(sum2.ge.0.50*sum1 .and. xi2.eq.-999.0) then
|
if(sum2.ge.0.50*sum1 .and. xi2.eq.-999.0) then
|
||||||
xi2=i - 1 + (sum2-0.50*sum1)/(sum2-sum2z)
|
xi2=i - 1 + (sum2-0.50*sum1)/(sum2-sum2z)
|
||||||
|
Loading…
x
Reference in New Issue
Block a user