Fix a compiler warning.

This commit is contained in:
Joe Taylor 2021-06-29 10:17:42 -04:00
parent 146fa7b9c2
commit 915571827c

View File

@ -453,6 +453,7 @@ subroutine q65_ccf_22(s1,iz,jz,nfqso,ntol,ndepth,ntrperiod,iavg,ipk,jpk, &
ibest=0
lagpk=0
lagbest=0
idrift_best=0
do i=ia,ib
ccfmax=0.
do lag=lag1,lag2