source: LMDZ6/branches/IPSLCM6.0.14/libf/phymar/Mod_SISVAT_cdf.f90 @ 5420

Last change on this file since 5420 was 2089, checked in by Laurent Fairhead, 10 years ago

Inclusion de la physique de MAR


Integration of MAR physics

File size: 1.9 KB
Line 
1      module Mod_SISVAT_cdf
2
3!--------------------------------------------------------------------------+
4!                                                     Thu 16-May-2013  MAR |
5!     module Mod_SISVAT_cdf contains Surface Energy Balance   Variables of |
6!                Soil/Ice Snow Vegetation Atmosphere Transfer Scheme       |
7!                OUTPUT on a netcdf file by SISVAT stand alone version     |
8!                                                                          |
9!     version 3.p.4.1 created by H. Gallee,           Thu 16-May-2013      |
10!           Last Modification by H. Gallee,           Thu 16-May-2013      |
11!                                                                          |
12!--------------------------------------------------------------------------+
13
14
15      use Mod_Real
16
17
18      IMPLICIT NONE
19
20
21! SISVAT INPUT        Variables
22! -----------------------------
23
24
25
26! SISVAT INPUT/OUTPUT Variables
27! -----------------------------
28
29
30
31! SISVAT OUTPUT       Variables
32! -----------------------------
33
34      real(kind=real8), SAVE,ALLOCATABLE ,dimension(:,:,:)  ::  SOsoNC_xyn  ! Absorbed Solar    Radiation               [W/m2]
35      real(kind=real8), SAVE,ALLOCATABLE ,dimension(:,:,:)  ::  IRsoNC_xyn  ! Absorbed IR       Radiation               [W/m2]
36      real(kind=real8), SAVE,ALLOCATABLE ,dimension(:,:,:)  ::  HSsoNC_xyn  ! Absorbed Sensible Heat Flux               [W/m2]
37      real(kind=real8), SAVE,ALLOCATABLE ,dimension(:,:,:)  ::  HLsoNC_xyn  ! Absorbed Latent   Heat Flux               [W/m2]
38      real(kind=real8), SAVE,ALLOCATABLE ,dimension(:,:,:)  ::  HLs_NC_xyn  ! Evaporation                          [mm w.e./s]
39      real(kind=real8), SAVE,ALLOCATABLE ,dimension(:,:,:)  ::  HLv_NC_xyn  ! Transpiration                             [W/m2]
40      real(kind=real8), SAVE,ALLOCATABLE ,dimension(:,:,:)  ::  eta_NC_xyn  ! Soil              Humidity               [m3/m2]
41
42
43      end module Mod_SISVAT_cdf
Note: See TracBrowser for help on using the repository browser.