id	summary	reporter	owner	description	type	status	priority	milestone	component	version	resolution	keywords	cc
772	dateclock won't compile with gfortran.	kate		"I got this error from gfortran:

{{{
dateclock.f90:569:42:

           IF (DateNumber.ge.REAL(gregorian*86400,r8)) THEN
                                          1
Error: Arithmetic overflow at (1)
}}}


It compiles with this fix:

{{{
diff --git a/ROMS/Utility/dateclock.F b/ROMS/Utility/dateclock.F
index 55c6da41..6d8d17d4 100644
--- a/ROMS/Utility/dateclock.F
+++ b/ROMS/Utility/dateclock.F
@@ -586,7 +586,7 @@
             MyDateNumber=DateNumber+Rclock%DateNumber(1)
           END IF
         ELSE
-          IF (DateNumber.ge.REAL(gregorian*86400,r8)) THEN
+          IF (DateNumber.ge.REAL(gregorian,r8)*86400) THEN
             MyDateNumber=DateNumber/86400.0_r8
           ELSE
             MyDateNumber=(DateNumber+Rclock%DateNumber(2))/86400.0_r8
}}}
"	bug	closed	major	Release ROMS/TOMS 3.7	Nonlinear	3.7	Fixed