TYPE T_Diag_DB_Rec1

DIAGNOSTICS_MODULE Types

Description:

The T_Diag_DB_Rec1 is intended as a database of the diagnostics object 1-D Arrays. If we want to go through every diagnostic we can just go through the database and use each one that is "assigned"

The Short name, level, Grib Id, and Longname are intended for use in making the GrADS control file with 

  write ( iu, "(A,1X,I4,I4,1X,A)" ) Name, level, grib, LongName

TYPE T_Diag_DB_Rec1

LOGICAL :: assigned is the Array pointer assigned
TYPE T_OPTIONAL_ARRAY1,POINTER :: Array The Optional array
LOGICAL :: for_history Is this to be written to history?
CHARACTER(LEN=256) :: Description General description
CHARACTER(LEN=80) :: Name Short name
INTEGER :: Level Grads level
INTEGER :: GRIB GRIB ID
CHARACTER(LEN=80) :: LongName Grads control file info
CHARACTER(LEN=80) :: Units Units
REAL :: Accumulator time accumulator
End Type T_Diag_DB_Rec1
Poseidon Ocean Model (Release: c_92_rp1 )
Documentation automation by Paul Schopf's DocFort Perl scripts.