source: LMDZ5/branches/testing/libf/phymar/Mod_SISVAT_BDu.f90 @ 2435

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

Merged trunk changes -r2070:2158 into testing branch. Compilation problems introduced by revision r2155 have been corrected by hand

File size: 859 bytes
Line 
1     module Mod_SISVAT_BDu
2
3!--------------------------------------------------------------------------+
4!    module Mod_SISVAT_BDu                            Fri  2-Feb-2013  MAR |
5!    module Mod_SISVAT_BDu  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      use Mod_SISVAT_dat
18
19
20      IMPLICIT NONE
21
22
23! SISVAT_BDu    specific variables (and constants)
24! ================================================
25
26      logical           ::  logust = .false.
27
28      real(kind=real8), SAVE  ::  etaust(0:nsot)
29
30
31
32     end module Mod_SISVAT_BDu
Note: See TracBrowser for help on using the repository browser.