From 96aa4fd85c178075a9a47ad81777e76cfe73032d Mon Sep 17 00:00:00 2001
From: Joe Taylor <joe@princeton.edu>
Date: Fri, 20 Jan 2023 11:08:28 -0500
Subject: [PATCH] Reduce maxiters from 33 67 100 to 20 40 60.

---
 lib/q65_decode.f90 | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/lib/q65_decode.f90 b/lib/q65_decode.f90
index 4e7558739..4990a24ec 100644
--- a/lib/q65_decode.f90
+++ b/lib/q65_decode.f90
@@ -134,18 +134,18 @@ contains
     baud=12000.0/nsps
     this%callback => callback
     nFadingModel=1
-    maxiters=33
+    maxiters=20
     ibwa=max(1,int(1.8*log(baud*mode_q65)) + 1)
     ibwb=min(10,ibwa+2)
     if(iand(ndepth,3).ge.2) then
        ibwa=max(1,int(1.8*log(baud*mode_q65)) + 1)
        ibwb=min(10,ibwa+5)
-       maxiters=67
+       maxiters=40
     endif
     if(iand(ndepth,3).eq.3) then
        ibwa=max(1,ibwa-1)
        ibwb=min(10,ibwb+1)
-       maxiters=100
+       maxiters=60
     endif
 ! Generate codewords for full-AP list decoding
     if(ichar(hiscall(1:1)).eq.0) hiscall=' '