Default ibwmin set to 0 in qra_params().

This commit is contained in:
Joe Taylor 2020-10-16 18:42:31 -04:00
parent 2aa999ba44
commit 8542af30f9
1 changed files with 1 additions and 1 deletions

View File

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