Fix potential spurious failure from uninitialized variable

2019-11-15 00:19:24 +01:00
parent 4e466d739c
commit bf73aa141b
1 changed files with 2 additions and 0 deletions
@@ -1503,6 +1503,8 @@ C     $      '      .' )
      NC = 0
      RESET = .TRUE.
      ERRMAX = RZERO
+      RALS = RONE
+      RBETS = RONE
 *
      DO 100 IN = 1, NIDIM
         N = IDIM( IN )