;+
; Defines the POAM2 DMP structure using the IDL __define method.
;
; To use, put this procedure in your IDL_PATH. Then create the
; structure by executing
;
;    IDL> struct={poam2_dmp_data}
;
; which will create 1 structure. If you need an array of them, use
; replicate, as in
;
;   IDL> array_of_structs=replicate({poam2_dmp_data},100)
;
;  which will create a vector of 100 of POAM2 DMP structures.
;
;-

PRO poam2_dmp_data__define

   dmp = {poam2_dmp_data, $         ;; [1]
           rev : 0l, $           ;; The 
           alt  : fltarr(61),$ ;; Altitude (km) - from POAM2 file
           lat  : fltarr(61),$ ;; N latitude 
           lon  : fltarr(61),$ ;; E longitude
           dir  : fltarr(61),$ ;; in deg (cw from N) - from POAM2
           Theta    : fltarr(61),$ ;; Potential Temperature (K)
           Temp     : fltarr(61),$ ;;  Temperature (K)
           DelHT    : fltarr(61),$ ;; magnitude of horizontal Temperature o
                                    ;; Gradient (K/km)
           LOSDelT  : fltarr(61),$ ;; T Gradient along Line-of-Sight (K/km)
           GeopHgt  : fltarr(61),$ ;; Geopotential Height (m)
           ZonWnd   : fltarr(61),$ ;; Analysis Zonal Wind (m/s)      [2] 
           MerWnd   : fltarr(61),$ ;; Analysis Meridional Wind (m/s) [2] 
           PV       : fltarr(61),$ ;; Analysis PV (1e-4 K m^2 (kg s)^-1)
           sPV      : fltarr(61),$ ;; ("scaled PV" (1e-4 1/s, "vorticity units")
           EqL      : fltarr(61),$ ;; Equivalent Latitude from PV 
           DelHPV   : fltarr(61),$ ;; magnitude of horizontal PV gradient
                                    ;; (normalized w/re average at theta level)
           LOSDelPV : fltarr(61),$ ;; PV gradient along Line-of-Sight
                                    ;; ((1e-4 K m^2 (kg s)^-1)/km)

          ;; The following 3 fields are in deg of Equivalent Latitude

           EqL_VEC  : fltarr(61),$ ;Distance from vortex edge center [3]
           EqL_VEI  : fltarr(61),$ ;Distance from inner vortex edge
           EqL_VEO  : fltarr(61),$ ;Distance  outer vortex edge
           DynTropo : 0.0,$     ;Dynamical tropopause altitude (km)   [4]
           TmpTropo : 0.0 }     ;WMO tropopause altitude (km)         [5]


;
; [1] Bad data is signified with a -999.0
;
; [2] Winds from NCEP/CPC analyses are "balance" winds (Randel, 1987,
;     JAS, 44, 2179--2186).
;
; [3] For the Vortex Edge Criteria fields (EqL_{VEC,VEI,VEO}) a value
;     of 500 is given when the input data are good, but the vortex is
;     not defined in that hemisphere at that potential temperature.
;
; [4] Dynamical tropopause - PV = 3.5x10e-6 K m^2 (kg s)^-1, 380K
;     in tropics (+/-20deg) if value from PV is at pressure less than 65hPa.
;
; [5] WMO Tropopause definition - lowest altitude where dT/dz < 2 K/km
;     and remains less then 2 K/km for at least 2 km above.

  RETURN
END 

;+
;@file_comments
; <pre>
; NAME:  
; $Id: poam2_dmp_data__define.pro,v 1.2 2007/02/07 21:05:45 whdaffer Exp $
; PURPOSE:   Define a structure useful in reading POAM2 DMP data
;
; AUTHOR:  William H. Daffer
;          818-354-4007
;          William.Daffer@jpl.nasa.gov
;
; </pre>
;-
; MODIFICATION HISTORY:
;
; $Log: poam2_dmp_data__define.pro,v $
; Revision 1.2  2007/02/07 21:05:45  whdaffer
; Spelling
;
; Revision 1.1  2007/02/07 20:37:41  whdaffer
; Initial rev
;
;
;
;Copyright 2007, by the California Institute of Technology.
;ALL RIGHTS RESERVED.  United States Government Sponsorship
;acknowledged.  Any commercial use must be negotiated with the Office
;of Technology Transfer at the California Institute of Technology.
;
;This software may be subject to U.S.  export control laws and
;regulations.  By accepting this document, the user agrees to comply
;with all applicable U.S.  export laws and regulations.  User has the
;responsibility to obtain export licenses, or other export authority as
;may be required before exporting such information to foreign countries
;or providing access to foreign persons.
;
;