[Dart-dev] [3852] DART/trunk/ncep_obs/create_real_obs.f90: make the start of the bins be closer to the initial cutoff so we don' t lose

[nancy at ucar.edu]

An HTML attachment was scrubbed...
URL: http://mailman.ucar.edu/pipermail/dart-dev/attachments/20090506/c0a5e834/attachment.html 
-------------- next part --------------
Modified: DART/trunk/ncep_obs/create_real_obs.f90
===================================================================
--- DART/trunk/ncep_obs/create_real_obs.f90	2009-05-06 16:11:44 UTC (rev 3851)
+++ DART/trunk/ncep_obs/create_real_obs.f90	2009-05-06 20:57:02 UTC (rev 3852)
@@ -38,8 +38,8 @@
 data obstime/'06','12','18','24'/
 
 real(r8) :: bin_beg(5), bin_end(5)
-data bin_beg/ 3.01_r8,  9.01_r8, 15.01_r8, 21.01_r8, 3.01_r8/
-data bin_end/ 9.00_r8, 15.00_r8, 21.00_r8, 27.00_r8, 27.00_r8/
+data bin_beg/ 3.001_r8,  9.001_r8, 15.001_r8, 21.001_r8,  3.001_r8/
+data bin_end/ 9.000_r8, 15.000_r8, 21.000_r8, 27.000_r8, 27.000_r8/
 
 ! ----------------------------------------------------------------------
 ! Declare namelist parameters