From 9b35eeaeadf68189fa2764427b8b4684000dd4f7 Mon Sep 17 00:00:00 2001
From: Bill Somerville <bill@classdesign.com>
Date: Wed, 6 Jan 2021 15:48:07 +0000
Subject: [PATCH] Revert "Add s1 to the diagnostic output."

This reverts commit 5fe0bd350855f8a435c1ae3efa9ea7380ab87b86.
---
 lib/qra/q65/q65_sync.f90 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/qra/q65/q65_sync.f90 b/lib/qra/q65/q65_sync.f90
index 07f7a7d97..1ed8fdbe6 100644
--- a/lib/qra/q65/q65_sync.f90
+++ b/lib/qra/q65/q65_sync.f90
@@ -166,7 +166,7 @@ subroutine q65_sync(nutc,iwave,ntrperiod,mode_q65,codewords,ncw,nsps,   &
 !### TEMPORARY
   if(f0.le.0.0 .or. xdt.lt.-90.) then
      write(71) iz,jz,ia2,ccf_best,ipk,jpk,nfqso,mode_q65,df,xdt,f0,  &
-          imsg_best,ccf,ccf1,s1
+          imsg_best,ccf,ccf1
   endif
 !###