From 8542af30f9a8109b56798e93f4219d233b28d340 Mon Sep 17 00:00:00 2001
From: Joe Taylor <joe@princeton.edu>
Date: Fri, 16 Oct 2020 18:42:31 -0400
Subject: [PATCH] Default ibwmin set to 0 in qra_params().

---
 lib/qra64a.f90 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/qra64a.f90 b/lib/qra64a.f90
index 0691cea78..ae810d044 100644
--- a/lib/qra64a.f90
+++ b/lib/qra64a.f90
@@ -101,7 +101,7 @@ subroutine qra_params(ndepth,maxaptype,idf0max,idt0max,ibwmin,ibwmax)
 
   integer iparam(6)
   logical first,ex
-  data iparam/3,5,11,5,9,9/     !Default values
+  data iparam/3,5,11,5,0,9/     !Default values
   data first/.true./
   save first,iparam