mirror of
https://github.com/saitohirga/WSJT-X.git
synced 2024-10-01 01:26:39 -04:00
We now have only 4 levels of AP decoding. Modify test_q65 accordingly.
This commit is contained in:
parent
d9cb870540
commit
6da4be174c
@ -4,7 +4,7 @@ program test_q65
|
|||||||
character*22 msg
|
character*22 msg
|
||||||
character*8 arg
|
character*8 arg
|
||||||
character*1 csubmode
|
character*1 csubmode
|
||||||
integer naptype(0:6)
|
integer naptype(0:4)
|
||||||
logical decok
|
logical decok
|
||||||
|
|
||||||
nargs=iargc()
|
nargs=iargc()
|
||||||
@ -89,9 +89,9 @@ program test_q65
|
|||||||
!1000 format(/'Depth:',i2,' AP:',i2,' df:',i3,' dt:',i3,' bw1:',i3,' bw2:',i3, &
|
!1000 format(/'Depth:',i2,' AP:',i2,' df:',i3,' dt:',i3,' bw1:',i3,' bw2:',i3, &
|
||||||
! ' dist:',i3)
|
! ' dist:',i3)
|
||||||
|
|
||||||
write(*,1010) (j,j=0,6)
|
write(*,1010) (j,j=0,4)
|
||||||
write(12,1010) (j,j=0,6)
|
write(12,1010) (j,j=0,4)
|
||||||
1010 format(' SNR Mode d Dop Sync DecN Dec1 Bad',i6,6i4,' tdec'/73('-'))
|
1010 format(' SNR Mode d Dop Sync DecN Dec1 Bad',5i5,' tdec'/70('-'))
|
||||||
|
|
||||||
dterr=tsym/4.0
|
dterr=tsym/4.0
|
||||||
nferr=max(1,nint(0.5*baud),nint(fdop/3.0))
|
nferr=max(1,nint(0.5*baud),nint(fdop/3.0))
|
||||||
@ -142,7 +142,7 @@ program test_q65
|
|||||||
ndec1,nfalse,naptype,tdec/nfiles
|
ndec1,nfalse,naptype,tdec/nfiles
|
||||||
write(12,1100) snr1,ntrperiod,csubmode,ndepth,fDop,nsync,ndecn, &
|
write(12,1100) snr1,ntrperiod,csubmode,ndepth,fDop,nsync,ndecn, &
|
||||||
ndec1,nfalse,naptype,tdec/nfiles
|
ndec1,nfalse,naptype,tdec/nfiles
|
||||||
1100 format(f5.1,i4,a1,i3,f5.1,3i5,i4,i6,6i4,f6.2)
|
1100 format(f5.1,i4,1x,a1,i3,f5.1,3i5,i4,i6,4i5,f6.2)
|
||||||
if(ndec1.lt.nfiles/2 .and. ndec10.ge.nfiles/2) then
|
if(ndec1.lt.nfiles/2 .and. ndec10.ge.nfiles/2) then
|
||||||
snr_thresh=snr1 + float(nfiles/2 - ndec1)/(ndec10-ndec1)
|
snr_thresh=snr1 + float(nfiles/2 - ndec1)/(ndec10-ndec1)
|
||||||
open(13,file='snr_thresh.out',status='unknown',position='append')
|
open(13,file='snr_thresh.out',status='unknown',position='append')
|
||||||
|
Loading…
Reference in New Issue
Block a user