SURFEX v7.3
General documentation of Surfex
|
00001 !! 00002 !! ##################### 00003 MODULE MODD_TREEDRAG 00004 !! ##################### 00005 !! 00006 !!*** *MODD_TREEDRAG* 00007 !! 00008 !! PURPOSE 00009 !! ------- 00010 ! Declaration to take into account tree drag in the atmospheric model 00011 ! instead of SURFEX. The Z0 forest is therefore reduced to 00012 ! the Z0 grass 00013 !! 00014 !!** AUTHOR 00015 !! ------ 00016 !! C.Lac *CNRM* 00017 ! 00018 !! MODIFICATIONS 00019 !! ------------- 00020 !! Original 30/06/11 00021 !! 00022 !----------------------------------------------------------------------------- 00023 ! 00024 !* 0. DECLARATIONS 00025 ! ----------------- 00026 IMPLICIT NONE 00027 LOGICAL :: LTREEDRAG=.FALSE. ! flag used to take into account tree drag in 00028 ! ! the atmospheric model instead of SURFEX. 00029 ! 00030 END MODULE MODD_TREEDRAG