fixed another bug

MintonGroup · Jul 20, 2023 · 12481e8 · 12481e8
1 parent 6578dc5
commit 12481e8
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/util/util_t_from_scale.f90 b/src/util/util_t_from_scale.f90
@@ -26,7 +26,7 @@ function util_t_from_scale(scale,start,finish) result(time)
     real(DP) :: tol = 1e-11_DP
     integer(I4B) :: maxiter = 1000
     integer(I4B) :: i
-    real(DP) :: a, b, c
+    real(DP) :: a, b, c, temp
 
 
     a = start