source: LMDZ5/trunk/libf/phylmd/sisvat/VAR_SV.F90 @ 1892

Last change on this file since 1892 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
RevLine 
[1865]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
[1872]14!$OMP THREADPRIVATE(klonv)
[1865]15      INTEGER,SAVE      :: knonv
[1872]16!$OMP THREADPRIVATE(knonv)
[1865]17
18END MODULE VAR_SV
Note: See TracBrowser for help on using the repository browser.