mirror of
https://github.com/saitohirga/WSJT-X.git
synced 2024-11-22 12:23:37 -05:00
Correct the S/N scale in jt65sim; set some params for command-line use of jt9.
git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@6172 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
This commit is contained in:
parent
4680817a93
commit
1a08ce3383
@ -18,10 +18,11 @@ subroutine fillcom(nutc0,ndepth0,nrxfreq,mode,tx9,flow,fsplit,fhigh)
|
||||
nfa=flow
|
||||
nfsplit=fsplit
|
||||
nfb=fhigh
|
||||
ntol=3
|
||||
kin=1024
|
||||
ntol=20
|
||||
kin=648000
|
||||
nzhsym=181
|
||||
ndepth=ndepth0
|
||||
dttol=3.0
|
||||
if (tx9) then
|
||||
ntxmode=9
|
||||
else
|
||||
|
@ -98,7 +98,8 @@ program jt65sim
|
||||
endif
|
||||
enddo
|
||||
|
||||
sig=10.0**(0.05*nsnr)
|
||||
bandwidth_ratio=2500.0/6000.0
|
||||
sig=sqrt(2*bandwidth_ratio)*10.0**(0.05*nsnr)
|
||||
if(nsnr.gt.90.0) sig=1.0
|
||||
write(*,1020) ifile,isig,f0,csubmode,nsnr,sig,msg
|
||||
1020 format(i4,i4,f10.3,1x,a1,i5,f8.4,2x,a22)
|
||||
|
Loading…
Reference in New Issue
Block a user