|
SURFEX v7.3
General documentation of Surfex
|
|
SURFEX v7.3
General documentation of Surfex
|
00001 ! ################## 00002 MODULE MODN_PREP_TEB 00003 ! ################## 00004 ! 00005 !!**** *MODN_PREP_TEB* - declaration of namelist NAM_PREP_TEB 00006 !! 00007 !! PURPOSE 00008 !! ------- 00009 ! The purpose of this module is to specify the namelist NAM_PREP_TEB 00010 ! 00011 !! 00012 !!** IMPLICIT ARGUMENTS 00013 !! ------------------ 00014 !! 00015 !! REFERENCE 00016 !! --------- 00017 !! 00018 !! 00019 !! AUTHOR 00020 !! ------ 00021 !! V. Masson *Meteo France* 00022 !! 00023 !! MODIFICATIONS 00024 !! ------------- 00025 !! Original 01/2004 00026 !------------------------------------------------------------------------------- 00027 ! 00028 !* 0. DECLARATIONS 00029 ! ------------ 00030 ! 00031 USE MODD_PREP_TEB, ONLY : CFILE_TEB, CTYPE, CFILEPGD_TEB, CTYPEPGD, & 00032 CFILE_WS, CTYPE_WS, CFILE_TS, CTYPE_TS, & 00033 XWS_ROOF, XWS_ROAD, XHUI_BLD, & 00034 XTS_ROOF, XTS_ROAD, XTS_WALL, XTI_BLD, XTI_ROAD 00035 00036 ! 00037 IMPLICIT NONE 00038 ! 00039 INTEGER :: NYEAR ! YEAR for surface 00040 INTEGER :: NMONTH ! MONTH for surface 00041 INTEGER :: NDAY ! DAY for surface 00042 REAL :: XTIME ! TIME for surface 00043 LOGICAL :: LTEB_CANOPY ! flag to use air layers inside the canopy 00044 CHARACTER(LEN=4) :: CROAD_DIR ! flag to use uniform road orientation or not 00045 CHARACTER(LEN=4) :: CWALL_OPT ! flag to use uniform walls or 2 separated walls 00046 ! 00047 NAMELIST/NAM_PREP_TEB/CFILE_TEB, CTYPE, CFILEPGD_TEB, CTYPEPGD, & 00048 CFILE_WS, CTYPE_WS, XWS_ROOF, XWS_ROAD, & 00049 CFILE_TS, CTYPE_TS, XTS_ROOF, XTS_ROAD, & 00050 XTS_WALL, XTI_BLD, XTI_ROAD, XHUI_BLD, & 00051 NYEAR, NMONTH, NDAY, XTIME, LTEB_CANOPY, & 00052 CROAD_DIR, CWALL_OPT 00053 ! 00054 END MODULE MODN_PREP_TEB
1.8.0
