source: LMDZ6/trunk/libf/phylmd/inlandsis/VAR_SV.F90 @ 5185

Last change on this file since 5185 was 3792, checked in by evignon, 4 years ago

Ajout de INLANDSIS, nouvelle interface entre LMDZ et la neige de SISVAT
Etienne, 04/01/2021

File size: 512 bytes
RevLine 
[3792]1MODULE VAR_SV
2
3
4IMPLICIT NONE
5
6INCLUDE "dimsoil.h"
7
8! +
9! +   LMDZ_SV dims
10! +   ===================
11! +
12!      INTEGER,PARAMETER :: nsol=nsoilmx-1
13!      INTEGER,PARAMETER :: nsno=nsnowmx
14     
15      INTEGER, PARAMETER    :: nsol=nsoilmx-1
16      INTEGER, PARAMETER    :: nsot=nsoilmx+1
17      INTEGER, PARAMETER    :: nsno=nsnowmx
18      INTEGER, PARAMETER    :: nb_wri=1
19      INTEGER,SAVE      :: klonv
20!$OMP THREADPRIVATE(klonv)
21      INTEGER,SAVE      :: knonv
22!$OMP THREADPRIVATE(knonv)
23
24
25
26END MODULE VAR_SV
Note: See TracBrowser for help on using the repository browser.