w4kek/WSJT-X
1
0
Fork 0
mirror of https://github.com/saitohirga/WSJT-X.git synced 2025-09-04 06:07:50 -04:00
Code Issues Packages Projects Releases Wiki Activity

Discourage jt65sim from crashing when 11025 sample rate is selected.

Browse Source
This commit is contained in:
Steve Franke 2018-11-29 10:34:27 -06:00
parent 5741407070
commit 9cebf3a540
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/jt65sim.f90
View File

@ -297,9 +297,9 @@ program jt65sim
endif endif
dat=aimag(cdat) + xnoise !Add the generated noise dat(1:npts)=aimag(cdat(1:npts)) + xnoise(1:npts) !Add the generated noise
if(snrdb.lt.90.0) then if(snrdb.lt.90.0) then
dat=rms*dat(1:npts) dat(1:npts)=rms*dat(1:npts)
else else
datpk=maxval(abs(dat(1:npts))) datpk=maxval(abs(dat(1:npts)))
fac=32766.9/datpk fac=32766.9/datpk