[Dart-dev] [3862] DART/trunk/observations/radar/create_obs_radar_sequence.f90: removing yet another tab
nancy at ucar.edu
nancy at ucar.edu
Wed May 6 16:17:14 MDT 2009
An HTML attachment was scrubbed...
URL: http://mailman.ucar.edu/pipermail/dart-dev/attachments/20090506/a025023d/attachment.html
-------------- next part --------------
Modified: DART/trunk/observations/radar/create_obs_radar_sequence.f90
===================================================================
--- DART/trunk/observations/radar/create_obs_radar_sequence.f90 2009-05-06 22:15:22 UTC (rev 3861)
+++ DART/trunk/observations/radar/create_obs_radar_sequence.f90 2009-05-06 22:17:13 UTC (rev 3862)
@@ -405,8 +405,8 @@
! Add the height increment and check for 'too high'.
vloc = vloc + h
-if(vloc.gt.ceiling) then ! max. height for radar obs = 8.5km
- qc = .false. ! bad data
+if(vloc.gt.ceiling) then ! max. height for radar obs = 8.5km
+ qc = .false. ! bad data
return
endif
@@ -436,7 +436,7 @@
call set_radial_vel(defkey, radar_location, beam_direction, nyquist_velocity)
endif
-qc = .true. ! all good
+qc = .true. ! all good
end subroutine compute_location
More information about the Dart-dev
mailing list