[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