SURFEX v7.3: /home/dasprezs/EXPORT_v7_3/src/OFFLIN/modd

Go to the documentation of this file.
00001 !     ####################
00002       MODULE MODD_SELECT
00003 !     ####################
00004 !
00005 !!****  *MODD_SELECT - declaration of surface ATM
00006 !!
00007 !!    PURPOSE
00008 !!    -------
00009 !     Declaration of surface parameters
00010 !
00011 !!
00012 !!**  IMPLICIT ARGUMENTS
00013 !!    ------------------
00014 !!      None 
00015 !!
00016 !!    REFERENCE
00017 !!    ---------
00018 !!
00019 !!    AUTHOR
00020 !!    ------
00021 !!      P. Le Moigne *Meteo France*
00022 !!
00023 !!    MODIFICATIONS
00024 !!    -------------
00025 !!      Original       3/2009
00026 !
00027 !*       0.   DECLARATIONS
00028 !             ------------
00029 !
00030 !
00031 IMPLICIT NONE
00032 !
00033 !-----------------------------------------------------------------------------------------------------
00034 LOGICAL    :: LSELECT = .FALSE.
00035               ! activates output selection from namelist
00036 !
00037  CHARACTER(LEN=12), DIMENSION(200)    :: CNAME_SELECT
00038               ! name of output fields in namelist
00039 !
00040 LOGICAL    :: LSELECT_USER
00041  CHARACTER(LEN=12), DIMENSION(:), POINTER    :: CNAME_USER
00042 !
00043 !-----------------------------------------------------------------------------------------------------
00044 !
00045 END MODULE MODD_SELECT