From 7fe18a0a8ccfd1362817c17d5653acce211692a9 Mon Sep 17 00:00:00 2001
From: Joe Taylor <joe@princeton.edu>
Date: Mon, 19 Oct 2020 18:56:54 -0400
Subject: [PATCH] Reset the default values in qra_params.f90.

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

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