From 0922a6ca6ef8bdd329c77730730d81cda08489f1 Mon Sep 17 00:00:00 2001 From: Joe Taylor Date: Wed, 13 Jan 2021 14:23:50 -0500 Subject: [PATCH] Fix several undefined variables. --- lib/qra/q65/q65.f90 | 2 +- lib/qra/q65/q65_sync.f90 | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/lib/qra/q65/q65.f90 b/lib/qra/q65/q65.f90 index 60ade8776..cb0cf8b6b 100644 --- a/lib/qra/q65/q65.f90 +++ b/lib/qra/q65/q65.f90 @@ -60,7 +60,7 @@ subroutine q65_symspec(iwave,nmax,iz,jz,s1) end subroutine q65_symspec 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 integer itone(85) diff --git a/lib/qra/q65/q65_sync.f90 b/lib/qra/q65/q65_sync.f90 index 0f8c534c2..a3d5d7c83 100644 --- a/lib/qra/q65/q65_sync.f90 +++ b/lib/qra/q65/q65_sync.f90 @@ -102,7 +102,7 @@ subroutine q65_sync(nutc,iwave,ntrperiod,nfqso,ntol,ndepth,lclearave, & ! Try list decoding via "Deep Likelihood". call timer('list_dec',0) 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) endif