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

Fix several undefined variables.

Browse Source
This commit is contained in:
Joe Taylor 2021-01-13 14:23:50 -05:00
parent 80a7b8c8af
commit 0922a6ca6e
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lib/qra/q65/q65.f90
View File

@ -60,7 +60,7 @@ subroutine q65_symspec(iwave,nmax,iz,jz,s1)
end subroutine q65_symspec end subroutine q65_symspec
subroutine q65_dec_q3(df,s1,iz,jz,ia,lag1,lag2,i0,j0,ccf,ccf1,ccf2, & subroutine q65_dec_q3(df,s1,iz,jz,ia,lag1,lag2,i0,j0,ccf,ccf1,ccf2, &
ia2,s3,LL,snr2,dat4,idec,decoded) ia2,s3,LL,nfqso,dtstep,xdt,f0,snr2,dat4,idec,decoded)
character*37 decoded character*37 decoded
integer itone(85) integer itone(85)

2
lib/qra/q65/q65_sync.f90
View File

@ -102,7 +102,7 @@ subroutine q65_sync(nutc,iwave,ntrperiod,nfqso,ntol,ndepth,lclearave, &
! Try list decoding via "Deep Likelihood". ! Try list decoding via "Deep Likelihood".
call timer('list_dec',0) call timer('list_dec',0)
call q65_dec_q3(df,s1,iz,jz,ia,lag1,lag2,i0,j0,ccf,ccf1,ccf2, & call q65_dec_q3(df,s1,iz,jz,ia,lag1,lag2,i0,j0,ccf,ccf1,ccf2, &
ia2,s3,LL,snr2,dat4,idec,decoded) ia2,s3,LL,nfqso,dtstep,xdt,f0,snr2,dat4,idec,decoded)
call timer('list_dec',1) call timer('list_dec',1)
endif endif