source: dynamico_lmdz/aquaplanet/LMDZ5/libf/phymar/Mod_SISVAT_BSn.f90 @ 4031

Last change on this file since 4031 was 3990, checked in by millour, 8 years ago

An updated LMDZ5 (based on LMDZ rev 2786) to play with.
EM
File size: 1.1 KB
Line 
1     module Mod_SISVAT_BSn
2
3!--------------------------------------------------------------------------+
4!    module Mod_SISVAT_BSn                            Fri  2-Feb-2013  MAR |
5!    module Mod_SISVAT_BSn  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_BSn    specific variables (and constants)
23! ================================================
24
25      logical           ::  BlowIn = .false.
26
27      real(kind=real8), SAVE  ::  FacSBS,FacUBS                 !
28      real(kind=real8), SAVE  ::  Por_BS                        ! Snow       Porosity
29      real(kind=real8), SAVE  ::  SheaBS                        !
30      real(kind=real8), SAVE  ::  rCd10n                        ! GM97:   assumed neutral stabil.
31
32
33     end module Mod_SISVAT_BSn
Note: See TracBrowser for help on using the repository browser.