[Dart-dev] [3213] DART/branches/nancy_work/obs_def: My test branch: add new preprocess comments to the 1d mod for

nancy at subversion.ucar.edu nancy at subversion.ucar.edu
Tue Feb 5 15:21:44 MST 2008


An HTML attachment was scrubbed...
URL: http://mailman.ucar.edu/pipermail/dart-dev/attachments/20080205/b3316a23/attachment.html
-------------- next part --------------
Modified: DART/branches/nancy_work/obs_def/DEFAULT_obs_def_mod.F90
===================================================================
--- DART/branches/nancy_work/obs_def/DEFAULT_obs_def_mod.F90	2008-02-05 22:14:02 UTC (rev 3212)
+++ DART/branches/nancy_work/obs_def/DEFAULT_obs_def_mod.F90	2008-02-05 22:21:44 UTC (rev 3213)
@@ -3,6 +3,17 @@
 ! University Corporation for Atmospheric Research
 ! Licensed under the GPL -- www.gpl.org/licenses/gpl.html
 
+!----------------------------------------------------------------------
+! Start of any obs_def_xxx_mod specfic executable module code
+
+! DART PREPROCESS MODULE CODE INSERTED HERE
+
+! End of any user-defined obs_def_xxx_mod module code
+!----------------------------------------------------------------------
+
+!----------------------------------------------------------------------
+! Start of main obs_def_mod module code
+
 module obs_def_mod
 
 ! <next few lines under version control, do not edit>
@@ -25,22 +36,6 @@
 use  assim_model_mod, only : get_state_meta_data, interpolate
 use     obs_kind_mod, only : assimilate_this_obs_kind, evaluate_this_obs_kind, max_obs_kinds, &
                              get_obs_kind_name, map_def_index, get_kind_from_menu
-use     obs_kind_mod, only : KIND_RAW_STATE_VARIABLE, KIND_U_WIND_COMPONENT, &
-                             KIND_V_WIND_COMPONENT, KIND_SURFACE_PRESSURE, &
-                             KIND_TEMPERATURE, KIND_SPECIFIC_HUMIDITY, KIND_PRESSURE, &
-                             KIND_VERTICAL_VELOCITY, KIND_RAINWATER_MIXING_RATIO, &
-                             KIND_DEW_POINT_TEMPERATURE, KIND_DENSITY, KIND_VELOCITY, &
-                             KIND_RADAR_REFLECTIVITY, KIND_1D_INTEGRAL, &
-                             KIND_GRAUPEL_MIXING_RATIO, KIND_SNOW_MIXING_RATIO, &
-                             KIND_GPSRO, KIND_CLOUD_LIQUID_WATER, KIND_CLOUD_ICE, &
-                             KIND_CONDENSATIONAL_HEATING, KIND_VAPOR_MIXING_RATIO, &
-                             KIND_ICE_NUMBER_CONCENTRATION, KIND_GEOPOTENTIAL_HEIGHT, &
-                             KIND_POTENTIAL_TEMPERATURE, KIND_SOIL_MOISTURE, &
-                             KIND_GRAV_WAVE_DRAG_EFFIC, KIND_GRAV_WAVE_STRESS_FRACTION, &
-                             KIND_TRACER_SOURCE, KIND_TRACER_CONCENTRATION, &
-                             KIND_MEAN_SOURCE, KIND_SOURCE_PHASE, &
-                             KIND_VORTEX_LON, KIND_VORTEX_LAT, &
-                             KIND_VORTEX_PMIN, KIND_VORTEX_WMAX 
 
 ! DART PREPROCESS USE FOR OBS_KIND_MOD INSERTED HERE
 

Modified: DART/branches/nancy_work/obs_def/obs_def_1d_state_mod.f90
===================================================================
--- DART/branches/nancy_work/obs_def/obs_def_1d_state_mod.f90	2008-02-05 22:14:02 UTC (rev 3212)
+++ DART/branches/nancy_work/obs_def/obs_def_1d_state_mod.f90	2008-02-05 22:21:44 UTC (rev 3213)
@@ -3,8 +3,6 @@
 ! University Corporation for Atmospheric Research
 ! Licensed under the GPL -- www.gpl.org/licenses/gpl.html
 
-module obs_def_1d_state_mod
-
 ! <next few lines under version control, do not edit>
 ! $URL$
 ! $Id$
@@ -49,6 +47,9 @@
 !         call interactive_1d_integral(obs_def%key)
 ! END DART PREPROCESS INTERACTIVE_OBS_DEF
 
+! BEGIN DART PREPROCESS MODULE CODE
+module obs_def_1d_state_mod
+
 use        types_mod, only : r8
 use    utilities_mod, only : register_module, error_handler, E_ERR, E_MSG
 use     location_mod, only : location_type, set_location, get_location 
@@ -290,3 +291,4 @@
 !----------------------------------------------------------------------
 
 end module obs_def_1d_state_mod
+! END DART PREPROCESS MODULE CODE


More information about the Dart-dev mailing list