SURFEX v7.3: /home/dasprezs/EXPORT_v7_3/src/SURFEX/modn_prep_surf

Go to the documentation of this file.
00001 !     ##################
00002       MODULE MODN_PREP_SURF_ATM
00003 !     ##################
00004 !
00005 !!****  *MODN_PREP_SURF_ATM* - declaration of namelist NAM_PREP_SURF_ATM
00006 !!
00007 !!    PURPOSE
00008 !!    -------
00009 !
00010 !!
00011 !!**  IMPLICIT ARGUMENTS
00012 !!    ------------------
00013 !!
00014 !!    REFERENCE
00015 !!    ---------
00016 !!
00017 !!       
00018 !!    AUTHOR
00019 !!    ------
00020 !!      V. Masson    *Meteo France*
00021 !!
00022 !!    MODIFICATIONS
00023 !!    -------------
00024 !!      Original    01/2004                    
00025 !-------------------------------------------------------------------------------
00026 !
00027 !*       0.   DECLARATIONS
00028 !             ------------
00029 !
00030 !
00031 IMPLICIT NONE
00032 !
00033  CHARACTER(LEN=28) :: CFILE        ! file name
00034  CHARACTER(LEN=6)  :: CFILETYPE    ! file type
00035  CHARACTER(LEN=28) :: CFILEPGD        ! file name
00036  CHARACTER(LEN=6)  :: CFILEPGDTYPE    ! file type
00037 INTEGER           :: NYEAR        ! YEAR for surface
00038 INTEGER           :: NMONTH       ! MONTH for surface
00039 INTEGER           :: NDAY         ! DAY for surface
00040 REAL              :: XTIME        ! TIME for surface
00041 
00042 !
00043 NAMELIST/NAM_PREP_SURF_ATM/CFILE, CFILETYPE, CFILEPGD, CFILEPGDTYPE, NYEAR, NMONTH, NDAY, XTIME
00044 !
00045 !-------------------------------------------------------------------------------
00046 !
00047 END MODULE MODN_PREP_SURF_ATM