source: LMDZ6/branches/IPSLCM6.0.13/libf/phymar/Mod_SISVAT_aux.f90 @ 3012

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

Inclusion de la physique de MAR


Integration of MAR physics

File size: 1.4 KB
Line 
1     module Mod_SISVAT_aux
2
3!--------------------------------------------------------------------------+
4!    module Mod_SISVAT_aux                            Fri  2-Feb-2013  MAR |
5!    module Mod_SISVAT_aux  contains specific variables (and constants)    |
6!           used by Soil/Ice Snow Vegetation Atmosphere Transfer Scheme    |
7!                                                                          |
8!--------------------------------------------------------------------------+
9
10
11
12! General Variables
13! =================
14
15      use Mod_Real
16      use Mod_SISVAT_dim
17
18
19      IMPLICIT NONE
20
21
22! SISVAT .main. specific variables (and constants)
23! ================================================
24
25      character(len= 1) ::  SepLab                        ! OUTPUT ASCII File Labels
26      character(len= 6) ::  FilLab                        !
27
28      integer, SAVE           ::  nwUNIT                        ! OUTPUT File  Unit Number (New)
29
30! Energy and Mass Budget
31! ~~~~~~~~~~~~~~~~~~~~~~
32! #e1 integer, SAVE           ::  noEBal                        ! Energy Imbalances Counter
33
34                                                          ! H2O    Conservation
35! #m0 integer, SAVE           ::  noWBal                        ! Water  Imbalances Counter
36
37                                                          ! * Mass Conservation
38! #m1 integer, SAVE           ::  noSBal                        ! Water  Imbalances Counter
39
40     end module Mod_SISVAT_aux
Note: See TracBrowser for help on using the repository browser.