source:
LMDZ5/branches/testing/libf/phymar/Mod_SISVAT_qSo.f90
@
5038
Last change on this file since 5038 was 2160, checked in by , 10 years ago | |
---|---|
File size: 946 bytes |
Line | |
---|---|
1 | module Mod_SISVAT_qSo |
2 | |
3 | !--------------------------------------------------------------------------+ |
4 | ! module Mod_SISVAT_qSo Fri 2-Feb-2013 MAR | |
5 | ! module Mod_SISVAT_qSo 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_qSo specific variables (and constants) |
24 | ! ================================================ |
25 | |
26 | ! OUTPUT/Verification: H2O Conservation |
27 | ! #mw logical :: mwopen = .false. ! IO Switch |
28 | |
29 | ! #mw real(kind=real8), SAVE :: timewr ! |
30 | |
31 | |
32 | |
33 | end module Mod_SISVAT_qSo |
Note: See TracBrowser
for help on using the repository browser.