[Dart-dev] [6276] DART/trunk/obs_def/obs_def_tpw_mod.f90: added the option of specifying TERRA, AQUA, or AMSR specific

[nancy at ucar.edu]

Revision: 6276
Author:   nancy
Date:     2013-06-25 16:55:10 -0600 (Tue, 25 Jun 2013)
Log Message:
-----------
added the option of specifying TERRA, AQUA, or AMSR specific
observation types, as well as the original MODIS general type.

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

-------------- next part --------------
Modified: DART/trunk/obs_def/obs_def_tpw_mod.f90
===================================================================
--- DART/trunk/obs_def/obs_def_tpw_mod.f90	2013-06-25 22:16:46 UTC (rev 6275)
+++ DART/trunk/obs_def/obs_def_tpw_mod.f90	2013-06-25 22:55:10 UTC (rev 6276)
@@ -16,18 +16,17 @@
 ! lat/lon location, and the specific humidity for a given location
 ! where the vertical is either pressure or model levels.
 
-! change 'INSTRUMENT' below to a more specific string that identifies
-! the source for this data type (e.g. name of the satellite, agency
-! which supplies the data, etc).  if you have more than one, make a
-! line for each in the kind section, each with a different first string
-! and all using the same KIND_TOTAL_PRECIPITABLE_WATER as the second
-! string.  in the case statements below that either replicate the lines
-! or make the case line:  case(string1|string2|string3) etc.
 ! keep in mind that fortran allows only 31 characters in parameter
-! definitions, which is what this string is going to be used for.
+! definitions (which is what this string is going to be used for).
+! if the platform name gets longer than 5 chars, consider going
+! to something like xxx_TOTAL_PRECIP_WATER to give you room to
+! put in more descriptive platform names.
 
 ! BEGIN DART PREPROCESS KIND LIST
-! INSTRUMENT_TOTAL_PRECIP_WATER,  KIND_TOTAL_PRECIPITABLE_WATER
+!  AQUA_TOTAL_PRECIPITABLE_WATER, KIND_TOTAL_PRECIPITABLE_WATER
+! TERRA_TOTAL_PRECIPITABLE_WATER, KIND_TOTAL_PRECIPITABLE_WATER
+!  AMSR_TOTAL_PRECIPITABLE_WATER, KIND_TOTAL_PRECIPITABLE_WATER
+! MODIS_TOTAL_PRECIPITABLE_WATER, KIND_TOTAL_PRECIPITABLE_WATER
 ! END DART PREPROCESS KIND LIST
 
 ! BEGIN DART PREPROCESS USE OF SPECIAL OBS_DEF MODULE
@@ -35,23 +34,31 @@
 ! END DART PREPROCESS USE OF SPECIAL OBS_DEF MODULE
 
 ! BEGIN DART PREPROCESS GET_EXPECTED_OBS_FROM_DEF
-!         case(INSTRUMENT_TOTAL_PRECIP_WATER)
+!         case(AQUA_TOTAL_PRECIPITABLE_WATER,TERRA_TOTAL_PRECIPITABLE_WATER)
 !            call get_expected_tpw(state, location, obs_val, istatus)
+!         case(AMSR_TOTAL_PRECIPITABLE_WATER,MODIS_TOTAL_PRECIPITABLE_WATER)
+!            call get_expected_tpw(state, location, obs_val, istatus)
 ! END DART PREPROCESS GET_EXPECTED_OBS_FROM_DEF
 
 ! BEGIN DART PREPROCESS READ_OBS_DEF
-!         case(INSTRUMENT_TOTAL_PRECIP_WATER)
+!         case(AQUA_TOTAL_PRECIPITABLE_WATER,TERRA_TOTAL_PRECIPITABLE_WATER)
 !           continue
+!         case(AMSR_TOTAL_PRECIPITABLE_WATER,MODIS_TOTAL_PRECIPITABLE_WATER)
+!           continue
 ! END DART PREPROCESS READ_OBS_DEF
 
 ! BEGIN DART PREPROCESS WRITE_OBS_DEF
-!         case(INSTRUMENT_TOTAL_PRECIP_WATER)
+!         case(AQUA_TOTAL_PRECIPITABLE_WATER,TERRA_TOTAL_PRECIPITABLE_WATER)
 !           continue
+!         case(AMSR_TOTAL_PRECIPITABLE_WATER,MODIS_TOTAL_PRECIPITABLE_WATER)
+!           continue
 ! END DART PREPROCESS WRITE_OBS_DEF
 
 ! BEGIN DART PREPROCESS INTERACTIVE_OBS_DEF
-!         case(INSTRUMENT_TOTAL_PRECIP_WATER)
+!         case(AQUA_TOTAL_PRECIPITABLE_WATER,TERRA_TOTAL_PRECIPITABLE_WATER)
 !           continue
+!         case(AMSR_TOTAL_PRECIPITABLE_WATER,MODIS_TOTAL_PRECIPITABLE_WATER)
+!           continue
 ! END DART PREPROCESS INTERACTIVE_OBS_DEF
 
 ! BEGIN DART PREPROCESS MODULE CODE