mirror of
https://github.com/saitohirga/WSJT-X.git
synced 2025-03-23 20:48:33 -04:00
Prevent a crash when widegraph lower limit is 0 Hz.
This commit is contained in:
parent
79133f15c6
commit
1d590b81f5
@ -581,7 +581,7 @@ subroutine q65_write_red(iz,xdt,ccf2_avg,ccf2)
|
||||
|
||||
rewind 17
|
||||
write(17,1000) xdt
|
||||
do i=nint(nfa/df),nint(nfb/df)
|
||||
do i=max(1,nint(nfa/df)),nint(nfb/df)
|
||||
freq=i*df
|
||||
write(17,1000) freq,ccf2_avg(i),ccf2(i)
|
||||
1000 format(f10.3,2e12.3)
|
||||
|
Loading…
Reference in New Issue
Block a user