source: LMDZ6/branches/DYNAMICO-conv/libf/phymar/pardim.F90 @ 3301

Last change on this file since 3301 was 2089, checked in by Laurent Fairhead, 10 years ago

Inclusion de la physique de MAR


Integration of MAR physics

File size: 678 bytes
Line 
1MODULE PARDIM
2
3
4#include "tsmbkind.h"
5
6IMPLICIT NONE
7
8SAVE
9
10!     ------------------------------------------------------------------
11
12
13!     JPMXLE : MAXIMUM NUMBER OF LEVELS
14!     JPMXGL : MAXIMUM NUMBER OF GAUSSIAN LATITUDES
15
16!     JPCSS : MAXIMUM NUMBER OF LEVELS IN SOIL         
17
18!     JPFPPYX : Maximum number of fields in catalogue cilipdy
19
20!     JPNULNAM : Fortran unit number used for namelist reading
21
22INTEGER_M, PARAMETER :: JPMXLE=200
23INTEGER_M, PARAMETER :: JPMXGL=1001
24INTEGER_M, PARAMETER :: JPCSS=5
25INTEGER_M, PARAMETER :: JPFPPYX=17
26INTEGER_M, PARAMETER :: JPNULNAM=4
27
28!     ------------------------------------------------------------------
29END MODULE PARDIM
Note: See TracBrowser for help on using the repository browser.