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

Go to the documentation of this file.
00001 !     #####################
00002       MODULE MODD_CH_SURF
00003 !     ######################
00004 !
00005 !!
00006 !!    PURPOSE
00007 !!    -------
00008 !  this module is for the surface scheme only     
00009 !   
00010 !
00011 !!
00012 !!**  IMPLICIT ARGUMENTS
00013 !!    ------------------
00014 !!      None
00015 !!
00016 !
00017 !!    AUTHOR
00018 !!    ------
00019 !!  P. Tulet  (16/01/01) *Meteo France*
00020 !!
00021 !!    MODIFICATIONS
00022 !!    -------------
00023 !-------------------------------------------------------------------------------
00024 !
00025 !*       0.   DECLARATIONS
00026 !             ------------
00027 !
00028 IMPLICIT NONE
00029 !
00030 REAL, SAVE, DIMENSION(:),   ALLOCATABLE :: XSREALMASSMOLVAL ! final molecular
00031                                                             ! diffusivity value
00032 REAL, SAVE, DIMENSION(:),   ALLOCATABLE :: XSREALREACTVAL   ! final chemical
00033                                                             ! reactivity factor
00034                                                             ! with biology
00035 REAL, SAVE, DIMENSION(:,:), ALLOCATABLE :: XSREALHENRYVAL   ! chemical Henry
00036                                                             ! constant value
00037 !
00038 END MODULE MODD_CH_SURF
00039 
00040