From 7d069c5617dab7239f59dc4a6a9f0660d9ca2f0f Mon Sep 17 00:00:00 2001
From: Joe Taylor <joe@princeton.edu>
Date: Mon, 1 Feb 2021 15:52:25 -0500
Subject: [PATCH] Don't get too close to the Wide Graps frequency limits.

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

diff --git a/lib/qra/q65/q65.f90 b/lib/qra/q65/q65.f90
index 94e4d3ba1..9735d2d7b 100644
--- a/lib/qra/q65/q65.f90
+++ b/lib/qra/q65/q65.f90
@@ -436,8 +436,8 @@ subroutine q65_ccf_22(s1,iz,jz,nfqso,ipk,jpk,f0,xdt,ccf2)
   xdt=jpk*dtstep
 
 ! Save parameters for best candidates
-  i1=nfa/df
-  i2=nfb/df
+  i1=max(nfa,100)/df
+  i2=min(nfb,4900)/df
   jzz=i2-i1+1
   call pctile(ccf2(i1:i2),jzz,40,base)
   ccf2=ccf2/base