[Dart-dev] [3855] DART/trunk/ncep_obs/prep_bufr/src/prepbufr_03Z.f: make the test tighter for obs closer to the initial cutoff

[nancy at ucar.edu]

An HTML attachment was scrubbed...
URL: http://mailman.ucar.edu/pipermail/dart-dev/attachments/20090506/a49cb492/attachment.html 
-------------- next part --------------
Modified: DART/trunk/ncep_obs/prep_bufr/src/prepbufr_03Z.f
===================================================================
--- DART/trunk/ncep_obs/prep_bufr/src/prepbufr_03Z.f	2009-05-06 21:00:07 UTC (rev 3854)
+++ DART/trunk/ncep_obs/prep_bufr/src/prepbufr_03Z.f	2009-05-06 21:00:57 UTC (rev 3855)
@@ -411,7 +411,7 @@
 c    on bufr files marked 06Z (which contain data from 3Z to 9Z) to
 c    allow obs_seq files from 03:01Z to 03:00Z+1day to be created.
 
-        if( abs(hour01 - 3.0) .gt. 0.001)  go to 200 
+        if( abs(hour01 - 3.0) .gt. 0.0001)  go to 200 
         tdata(8) = hour01 + 24.0
         pdata(8) = hour01 + 24.0
         qdata(8) = hour01 + 24.0