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:
Joe Taylor 2015-11-24 18:20:45 +00:00
parent 4680817a93
commit 1a08ce3383
2 changed files with 5 additions and 3 deletions

View File

@ -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

View File

@ -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)