diff --git a/src/core_ocean/mpas_ocn_global_diagnostics.F b/src/core_ocean/mpas_ocn_global_diagnostics.F index d98320434b..c2b296a68b 100644 --- a/src/core_ocean/mpas_ocn_global_diagnostics.F +++ b/src/core_ocean/mpas_ocn_global_diagnostics.F @@ -414,7 +414,7 @@ subroutine ocn_compute_global_diagnostics(domain, timeLevel, timeIndex, dt)!{{{ variableIndex = 0 ! time, in days, using a 360 day calendar - read (diagnostics % xtime % scalar, '(i4,5(a1,i2))'), timeYYYY, timeChar, timeMM, timeChar, timeDD, timeChar, timeH, timeChar, timeM, timeChar, timeS + read (diagnostics % xtime % scalar, '(i4,5(a1,i2))') timeYYYY, timeChar, timeMM, timeChar, timeDD, timeChar, timeH, timeChar, timeM, timeChar, timeS ! subtract 31.0 because calendar starts on 00-01-01 time_days = timeYYYY*360.0 + timeMM*30.0 + timeDD + (timeH + (timeM + timeS/60.0)/60.0)/24.0 - 31.0