From f9a771b4221f5939f784bfcd879596ff65dce2d5 Mon Sep 17 00:00:00 2001
From: Joe Taylor <joe@princeton.edu>
Date: Sat, 6 Feb 2021 09:43:14 -0500
Subject: [PATCH] Q65 parameter ibwa should not be larger in Normal/Deep than
 in Fast.  Corrected.

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

diff --git a/lib/q65_decode.f90 b/lib/q65_decode.f90
index 3212fbc56..74928a33e 100644
--- a/lib/q65_decode.f90
+++ b/lib/q65_decode.f90
@@ -115,13 +115,13 @@ contains
     ibwa=max(1,int(1.8*log(baud*mode_q65)) + 1)
     ibwb=min(10,ibwa+3)
     if(iand(ndepth,3).ge.2) then
-       ibwa=max(1,int(1.8*log(baud*mode_q65)) + 2)
+       ibwa=max(1,int(1.8*log(baud*mode_q65)) + 1)
        ibwb=min(10,ibwa+5)
     else if(iand(ndepth,3).eq.3) then
        ibwa=max(1,ibwa-1)
        ibwb=min(10,ibwb+1)
     endif
-    
+
 ! Generate codewords for full-AP list decoding    
     call q65_set_list(mycall,hiscall,hisgrid,codewords,ncw) 
     dgen=0