From cac6577127153e3513b051f698d8431cd69693a4 Mon Sep 17 00:00:00 2001
From: Joe Taylor <joe@princeton.edu>
Date: Tue, 22 Dec 2020 09:43:25 -0500
Subject: [PATCH] Extend the DT range for 30 s Q65 submodes to include EME
 delays.

---
 lib/q65_sync.f90 | 6 ++----
 1 file changed, 2 insertions(+), 4 deletions(-)

diff --git a/lib/q65_sync.f90 b/lib/q65_sync.f90
index bcf776318..96bb77e1f 100644
--- a/lib/q65_sync.f90
+++ b/lib/q65_sync.f90
@@ -102,11 +102,9 @@ subroutine q65_sync(nutc,iwave,nmax,mode_q65,codewords,ncw,nsps,nfqso,ntol, &
   dtstep=nsps/(NSTEP*12000.0)                 !Step size in seconds
   lag1=-1.0/dtstep
   lag2=1.0/dtstep + 0.9999
+  if(nsps.ge.3600 .and. emedelay.gt.0) lag2=4.0/dtstep + 0.9999  !Include EME
   j0=0.5/dtstep
-  if(nsps.ge.7200) then
-     j0=1.0/dtstep              !Nominal index for start of signal
-     lag2=4.0/dtstep + 0.9999   !Include EME delays
-  endif
+  if(nsps.ge.7200) j0=1.0/dtstep              !Nominal start-signal index
 
   if(ncw.lt.1) go to 100