Reset the default values in qra_params.f90.

This commit is contained in:
Joe Taylor 2020-10-19 18:56:54 -04:00
parent a17a519324
commit 7fe18a0a8c

View File

@ -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