source: LMDZ5/branches/LF-private/libf/phylmd/sisvat/VAR_SV.F90 @ 4990

Last change on this file since 4990 was 1872, checked in by Laurent Fairhead, 11 years ago

Correction de bugs suite à l'intégration de SISVAT


Bug corrections following integration of SISVAT

File size: 425 bytes
Line 
1MODULE VAR_SV
2
3IMPLICIT NONE
4! +
5! +   LMDZ_SV dims
6! +   ===================
7! +
8!      INTEGER,PARAMETER :: nsol=nsoilmx-1
9!      INTEGER,PARAMETER :: nsno=nsnowmx
10      INTEGER,PARAMETER    :: nsol=10      !8
11      INTEGER,PARAMETER    :: nsno=35
12      INTEGER,PARAMETER :: nb_wri=1
13      INTEGER,SAVE      :: klonv
14!$OMP THREADPRIVATE(klonv)
15      INTEGER,SAVE      :: knonv
16!$OMP THREADPRIVATE(knonv)
17
18END MODULE VAR_SV
Note: See TracBrowser for help on using the repository browser.