[Dart-dev] [6345] DART/trunk/obs_kind/DEFAULT_obs_kind_mod.F90: added wind turbine power kind for martin.

[nancy at ucar.edu]

Revision: 6345
Author:   nancy
Date:     2013-07-31 13:41:26 -0600 (Wed, 31 Jul 2013)
Log Message:
-----------
added wind turbine power kind for martin.

Modified Paths:
--------------
    DART/trunk/obs_kind/DEFAULT_obs_kind_mod.F90

-------------- next part --------------
Modified: DART/trunk/obs_kind/DEFAULT_obs_kind_mod.F90
===================================================================
--- DART/trunk/obs_kind/DEFAULT_obs_kind_mod.F90	2013-07-31 15:45:32 UTC (rev 6344)
+++ DART/trunk/obs_kind/DEFAULT_obs_kind_mod.F90	2013-07-31 19:41:26 UTC (rev 6345)
@@ -170,6 +170,10 @@
 integer, parameter, public :: &
     KIND_CLW_PATH                    = 64
 
+! kind for wind power
+integer, parameter, public :: &
+    KIND_WIND_TURBINE_POWER          = 65
+
 ! kinds for planetary remote sensing (wglawson, c.lee)
 integer, parameter, public :: &
     KIND_SKIN_TEMPERATURE            = 70, &
@@ -501,6 +505,7 @@
 obs_kind_names(62) = obs_kind_type(KIND_LANDMASK, 'KIND_LANDMASK')
 obs_kind_names(63) = obs_kind_type(KIND_EDGE_NORMAL_SPEED, 'KIND_EDGE_NORMAL_SPEED')
 obs_kind_names(64) = obs_kind_type(KIND_CLW_PATH, 'KIND_CLW_PATH')
+obs_kind_names(65) = obs_kind_type(KIND_WIND_TURBINE_POWER, 'KIND_WIND_TURBINE_POWER')
 
 obs_kind_names(70) = obs_kind_type(KIND_SKIN_TEMPERATURE, 'KIND_SKIN_TEMPERATURE')
 obs_kind_names(71) = obs_kind_type(KIND_NADIR_RADIANCE, 'KIND_NADIR_RADIANCE')