[Dart-dev] [3899] DART/trunk/diagnostics/threed_sphere/obs_seq_to_netcdf.f90: make test for last time use the end of the final bin,

nancy at ucar.edu nancy at ucar.edu
Tue Jun 2 11:47:25 MDT 2009


An HTML attachment was scrubbed...
URL: http://mailman.ucar.edu/pipermail/dart-dev/attachments/20090602/4478d02b/attachment.html 
-------------- next part --------------
Modified: DART/trunk/diagnostics/threed_sphere/obs_seq_to_netcdf.f90
===================================================================
--- DART/trunk/diagnostics/threed_sphere/obs_seq_to_netcdf.f90	2009-06-02 17:18:13 UTC (rev 3898)
+++ DART/trunk/diagnostics/threed_sphere/obs_seq_to_netcdf.f90	2009-06-02 17:47:25 UTC (rev 3899)
@@ -191,7 +191,7 @@
 
 Nepochs = get_schedule_length(schedule)
 call get_time_from_schedule(TimeMin, schedule,       1, 1)
-call get_time_from_schedule(TimeMax, schedule, Nepochs, 1)
+call get_time_from_schedule(TimeMax, schedule, Nepochs, 2)
 call get_calendar_string(calendarstring)
 
 U_obs_loc = set_location_missing()


More information about the Dart-dev mailing list