[Dart-dev] [4280] DART/trunk/obs_def/obs_def_radar_mod.f90: For David Dowell; add an obs type RADAR_CLEARAIR_REFLECTIVITY

[nancy at ucar.edu]

Revision: 4280
Author:   nancy
Date:     2010-02-16 08:37:57 -0700 (Tue, 16 Feb 2010)
Log Message:
-----------
For David Dowell; add an obs type RADAR_CLEARAIR_REFLECTIVITY
which in the dart code is treated identically to RADAR_REFLECTIVITY.

Modified Paths:
--------------
    DART/trunk/obs_def/obs_def_radar_mod.f90

-------------- next part --------------
Modified: DART/trunk/obs_def/obs_def_radar_mod.f90
===================================================================
--- DART/trunk/obs_def/obs_def_radar_mod.f90	2010-02-16 15:33:50 UTC (rev 4279)
+++ DART/trunk/obs_def/obs_def_radar_mod.f90	2010-02-16 15:37:57 UTC (rev 4280)
@@ -30,6 +30,7 @@
 ! BEGIN DART PREPROCESS KIND LIST
 ! DOPPLER_RADIAL_VELOCITY, KIND_VELOCITY
 ! RADAR_REFLECTIVITY, KIND_RADAR_REFLECTIVITY
+! RADAR_CLEARAIR_REFLECTIVITY, KIND_RADAR_REFLECTIVITY
 ! PRECIPITATION_FALL_SPEED, KIND_POWER_WEIGHTED_FALL_SPEED
 ! END DART PREPROCESS KIND LIST
 !-----------------------------------------------------------------------------
@@ -49,6 +50,8 @@
 !     call get_expected_radial_vel(state, location, obs_def%key, obs_val, istatus)
 !  case(RADAR_REFLECTIVITY)
 !     call get_expected_radar_ref(state, location, obs_val, istatus)
+!  case(RADAR_CLEARAIR_REFLECTIVITY)
+!     call get_expected_radar_ref(state, location, obs_val, istatus)
 !  case(PRECIPITATION_FALL_SPEED)
 !     call get_expected_fall_velocity(state, location, obs_val, istatus)
 ! END DART PREPROCESS GET_EXPECTED_OBS_FROM_DEF
@@ -60,6 +63,8 @@
 !      call read_radial_vel(obs_def%key, ifile, fileformat)
 !   case(RADAR_REFLECTIVITY)
 !      call read_radar_ref(obs_val, obs_def%key)
+!  case(RADAR_CLEARAIR_REFLECTIVITY)
+!      call read_radar_ref(obs_val, obs_def%key)
 !   case(PRECIPITATION_FALL_SPEED)
 !      continue
 ! END DART PREPROCESS READ_OBS_DEF
@@ -71,6 +76,8 @@
 !      call write_radial_vel(obs_def%key, ifile, fileformat)
 !   case(RADAR_REFLECTIVITY)
 !      continue
+!   case(RADAR_CLEARAIR_REFLECTIVITY)
+!      continue
 !   case(PRECIPITATION_FALL_SPEED)
 !      continue
 ! END DART PREPROCESS WRITE_OBS_DEF
@@ -84,6 +91,8 @@
 !      continue
 !   case(PRECIPITATION_FALL_SPEED)
 !      continue
+!   case(RADAR_CLEARAIR_REFLECTIVITY)
+!      continue
 ! END DART PREPROCESS INTERACTIVE_OBS_DEF
 !-----------------------------------------------------------------------------