[Dart-dev] DART/branches Revision: 13015

[dart at ucar.edu]

nancy at ucar.edu
2019-03-14 16:16:20 -0600 (Thu, 14 Mar 2019)
99
moved get_calendar_string() out of the if() conditional
but forgot to delete the original line.  




Modified: DART/branches/recam/assimilation_code/modules/io/dart_time_io_mod.f90
===================================================================
--- DART/branches/recam/assimilation_code/modules/io/dart_time_io_mod.f90	2019-03-14 21:59:07 UTC (rev 13014)
+++ DART/branches/recam/assimilation_code/modules/io/dart_time_io_mod.f90	2019-03-14 22:16:20 UTC (rev 13015)
@@ -231,6 +231,7 @@
 ! don't reuse string3 here, please.
 write(string3,*)'You may need to supply a model-specific "write_model_time()" to write the time.'
 
+! see what kind of calendar dart is currently running with.
 call get_calendar_string(dart_calendar)
 
 ios = nf90_inq_varid(ncid, "time", VarID)
@@ -276,7 +277,6 @@
    ios = nf90_put_att(ncid, VarID, "long_name", "valid time of the model state")
    call nc_check(ios, routine, "time long_name")
 
-   call get_calendar_string(dart_calendar)
    if (dart_calendar == 'NO_CALENDAR') then
       ios = nf90_put_att(ncid, VarID, "calendar", "none")
       call nc_check(ios, routine, "calendar long_name")