From 915571827c47031e10792891578896de1fe88671 Mon Sep 17 00:00:00 2001
From: Joe Taylor <joe@princeton.edu>
Date: Tue, 29 Jun 2021 10:17:42 -0400
Subject: [PATCH] Fix a compiler warning.

---
 lib/qra/q65/q65.f90 | 1 +
 1 file changed, 1 insertion(+)

diff --git a/lib/qra/q65/q65.f90 b/lib/qra/q65/q65.f90
index 914932705..8aabe4152 100644
--- a/lib/qra/q65/q65.f90
+++ b/lib/qra/q65/q65.f90
@@ -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