Cosmetic change

This commit is contained in:
Bill Somerville
2020-10-23 03:32:22 +01:00
parent 308d815fb5
commit 5efe448a9c
+1 -1
View File
@@ -202,7 +202,7 @@ program jt9
if (mode .eq. 241) then
ntol = min (ntol, 100)
else if (mode .eq. 74) then
else if (mode .eq. 65 + 9) then
ntol = 20
else
ntol = min (ntol, 1000)