[Dart-dev] [3207] DART/trunk/obs_def/obs_def_reanalysis_bufr_mod.f90: Added 2 additional types (AIRCRAFT_SPECIFIC_HUMIDITY,

[nancy at subversion.ucar.edu]

An HTML attachment was scrubbed...
URL: http://mailman.ucar.edu/pipermail/dart-dev/attachments/20080204/db373ed8/attachment.html
-------------- next part --------------
Modified: DART/trunk/obs_def/obs_def_reanalysis_bufr_mod.f90
===================================================================
--- DART/trunk/obs_def/obs_def_reanalysis_bufr_mod.f90	2008-01-30 20:51:25 UTC (rev 3206)
+++ DART/trunk/obs_def/obs_def_reanalysis_bufr_mod.f90	2008-02-04 22:03:48 UTC (rev 3207)
@@ -18,9 +18,11 @@
 !AIRCRAFT_U_WIND_COMPONENT,    KIND_U_WIND_COMPONENT
 !AIRCRAFT_V_WIND_COMPONENT,    KIND_V_WIND_COMPONENT
 !AIRCRAFT_TEMPERATURE,         KIND_TEMPERATURE
+!AIRCRAFT_SPECIFIC_HUMIDITY,   KIND_SPECIFIC_HUMIDITY
 !ACARS_U_WIND_COMPONENT,       KIND_U_WIND_COMPONENT
 !ACARS_V_WIND_COMPONENT,       KIND_V_WIND_COMPONENT
 !ACARS_TEMPERATURE,            KIND_TEMPERATURE
+!ACARS_SPECIFIC_HUMIDITY,      KIND_SPECIFIC_HUMIDITY
 !MARINE_SFC_U_WIND_COMPONENT,  KIND_U_WIND_COMPONENT
 !MARINE_SFC_V_WIND_COMPONENT,  KIND_V_WIND_COMPONENT
 !MARINE_SFC_TEMPERATURE,       KIND_TEMPERATURE
@@ -53,7 +55,8 @@
 !              MARINE_SFC_TEMPERATURE, LAND_SFC_TEMPERATURE, ATOV_TEMPERATURE, &
 !              AIRS_TEMPERATURE )
 !            call interpolate(state, location, KIND_TEMPERATURE, obs_val, istatus)
-!         case(RADIOSONDE_SPECIFIC_HUMIDITY, MARINE_SFC_SPECIFIC_HUMIDITY, &
+!         case(RADIOSONDE_SPECIFIC_HUMIDITY, AIRCRAFT_SPECIFIC_HUMIDITY, & 
+!              ACARS_SPECIFIC_HUMIDITY, MARINE_SFC_SPECIFIC_HUMIDITY, &
 !              LAND_SFC_SPECIFIC_HUMIDITY, AIRS_SPECIFIC_HUMIDITY)
 !            call interpolate(state, location, KIND_SPECIFIC_HUMIDITY, obs_val, istatus)
 !            !!! UNITS in original BUFR are g/kg; This is converted to kg/kg by
@@ -68,12 +71,12 @@
 !case(RADIOSONDE_U_WIND_COMPONENT, RADIOSONDE_V_WIND_COMPONENT, RADIOSONDE_SURFACE_PRESSURE, &
 !   RADIOSONDE_TEMPERATURE, RADIOSONDE_SPECIFIC_HUMIDITY, &
 !   AIRCRAFT_U_WIND_COMPONENT, AIRCRAFT_V_WIND_COMPONENT, &
-!   AIRCRAFT_TEMPERATURE, ACARS_U_WIND_COMPONENT, ACARS_V_WIND_COMPONENT, &
-!   ACARS_TEMPERATURE, MARINE_SFC_U_WIND_COMPONENT, MARINE_SFC_V_WIND_COMPONENT, &
-!   MARINE_SFC_TEMPERATURE, MARINE_SFC_SPECIFIC_HUMIDITY,  LAND_SFC_U_WIND_COMPONENT, &
-!   LAND_SFC_V_WIND_COMPONENT, LAND_SFC_TEMPERATURE, LAND_SFC_SPECIFIC_HUMIDITY, &
-!   SAT_U_WIND_COMPONENT, SAT_V_WIND_COMPONENT, ATOV_TEMPERATURE, AIRS_TEMPERATURE, &
-!   AIRS_SPECIFIC_HUMIDITY )
+!   AIRCRAFT_TEMPERATURE, AIRCRAFT_SPECIFIC_HUMIDITY, ACARS_U_WIND_COMPONENT, & 
+!   ACARS_V_WIND_COMPONENT, ACARS_TEMPERATURE, ACARS_SPECIFIC_HUMIDITY, &
+!   MARINE_SFC_U_WIND_COMPONENT, MARINE_SFC_V_WIND_COMPONENT, MARINE_SFC_TEMPERATURE, & 
+!   MARINE_SFC_SPECIFIC_HUMIDITY,  LAND_SFC_U_WIND_COMPONENT, LAND_SFC_V_WIND_COMPONENT, & 
+!   LAND_SFC_TEMPERATURE, LAND_SFC_SPECIFIC_HUMIDITY, SAT_U_WIND_COMPONENT, &
+!   SAT_V_WIND_COMPONENT, ATOV_TEMPERATURE, AIRS_TEMPERATURE, AIRS_SPECIFIC_HUMIDITY )
 !      continue
 ! END DART PREPROCESS READ_OBS_DEF
 
@@ -81,12 +84,12 @@
 !case(RADIOSONDE_U_WIND_COMPONENT, RADIOSONDE_V_WIND_COMPONENT, RADIOSONDE_SURFACE_PRESSURE, &
 !   RADIOSONDE_TEMPERATURE, RADIOSONDE_SPECIFIC_HUMIDITY, &
 !   AIRCRAFT_U_WIND_COMPONENT, AIRCRAFT_V_WIND_COMPONENT, &
-!   AIRCRAFT_TEMPERATURE, ACARS_U_WIND_COMPONENT, ACARS_V_WIND_COMPONENT, &
-!   ACARS_TEMPERATURE, MARINE_SFC_U_WIND_COMPONENT, MARINE_SFC_V_WIND_COMPONENT, &
-!   MARINE_SFC_TEMPERATURE, MARINE_SFC_SPECIFIC_HUMIDITY,  LAND_SFC_U_WIND_COMPONENT, &
-!   LAND_SFC_V_WIND_COMPONENT, LAND_SFC_TEMPERATURE, LAND_SFC_SPECIFIC_HUMIDITY, &
-!   SAT_U_WIND_COMPONENT, SAT_V_WIND_COMPONENT, ATOV_TEMPERATURE, AIRS_TEMPERATURE, &
-!   AIRS_SPECIFIC_HUMIDITY )
+!   AIRCRAFT_TEMPERATURE, AIRCRAFT_SPECIFIC_HUMIDITY, ACARS_U_WIND_COMPONENT, &
+!   ACARS_V_WIND_COMPONENT, ACARS_TEMPERATURE, ACARS_SPECIFIC_HUMIDITY, &
+!   MARINE_SFC_U_WIND_COMPONENT, MARINE_SFC_V_WIND_COMPONENT, MARINE_SFC_TEMPERATURE, &
+!   MARINE_SFC_SPECIFIC_HUMIDITY,  LAND_SFC_U_WIND_COMPONENT, LAND_SFC_V_WIND_COMPONENT, &
+!   LAND_SFC_TEMPERATURE, LAND_SFC_SPECIFIC_HUMIDITY, SAT_U_WIND_COMPONENT, &
+!   SAT_V_WIND_COMPONENT, ATOV_TEMPERATURE, AIRS_TEMPERATURE, AIRS_SPECIFIC_HUMIDITY )
 !      continue
 ! END DART PREPROCESS WRITE_OBS_DEF
 
@@ -94,12 +97,12 @@
 !case(RADIOSONDE_U_WIND_COMPONENT, RADIOSONDE_V_WIND_COMPONENT, RADIOSONDE_SURFACE_PRESSURE, &
 !   RADIOSONDE_TEMPERATURE, RADIOSONDE_SPECIFIC_HUMIDITY, &
 !   AIRCRAFT_U_WIND_COMPONENT, AIRCRAFT_V_WIND_COMPONENT, &
-!   AIRCRAFT_TEMPERATURE, ACARS_U_WIND_COMPONENT, ACARS_V_WIND_COMPONENT, &
-!   ACARS_TEMPERATURE, MARINE_SFC_U_WIND_COMPONENT, MARINE_SFC_V_WIND_COMPONENT, &
-!   MARINE_SFC_TEMPERATURE, MARINE_SFC_SPECIFIC_HUMIDITY,  LAND_SFC_U_WIND_COMPONENT, &
-!   LAND_SFC_V_WIND_COMPONENT, LAND_SFC_TEMPERATURE, LAND_SFC_SPECIFIC_HUMIDITY, &
-!   SAT_U_WIND_COMPONENT, SAT_V_WIND_COMPONENT, ATOV_TEMPERATURE, AIRS_TEMPERATURE, &
-!   AIRS_SPECIFIC_HUMIDITY )
+!   AIRCRAFT_TEMPERATURE, AIRCRAFT_SPECIFIC_HUMIDITY, ACARS_U_WIND_COMPONENT, &
+!   ACARS_V_WIND_COMPONENT, ACARS_TEMPERATURE, ACARS_SPECIFIC_HUMIDITY, &
+!   MARINE_SFC_U_WIND_COMPONENT, MARINE_SFC_V_WIND_COMPONENT, MARINE_SFC_TEMPERATURE, &
+!   MARINE_SFC_SPECIFIC_HUMIDITY,  LAND_SFC_U_WIND_COMPONENT, LAND_SFC_V_WIND_COMPONENT, &
+!   LAND_SFC_TEMPERATURE, LAND_SFC_SPECIFIC_HUMIDITY, SAT_U_WIND_COMPONENT, &
+!   SAT_V_WIND_COMPONENT, ATOV_TEMPERATURE, AIRS_TEMPERATURE, AIRS_SPECIFIC_HUMIDITY )
 !      continue
 ! END DART PREPROCESS INTERACTIVE_OBS_DEF