source: LMDZ6/trunk/libf/phylmd/rrtm/pardim.F90 @ 5018

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

Corrections à la version r1989 pour permettre la compilation avec RRTM
Inclusion de la licence CeCILL_V2 pour RRTM


Changes to revision r1989 to enable RRTM code compilation
RRTM part put under CeCILL_V2 licence

  • Property copyright set to
    Name of program: LMDZ
    Creation date: 1984
    Version: LMDZ5
    License: CeCILL version 2
    Holder: Laboratoire de m\'et\'eorologie dynamique, CNRS, UMR 8539
    See the license file in the root directory
File size: 638 bytes
Line 
1MODULE PARDIM
2
3USE PARKIND1  ,ONLY : JPIM     ,JPRB
4
5IMPLICIT NONE
6
7SAVE
8
9!     ------------------------------------------------------------------
10
11!     JPMXLE : MAXIMUM NUMBER OF LEVELS
12!     JPMXGL : MAXIMUM NUMBER OF GAUSSIAN LATITUDES
13
14!     JPFPPYX : Maximum number of fields in catalogue cilipdy
15
16!     JPNULNAM : Fortran unit number used for namelist reading
17
18INTEGER(KIND=JPIM), PARAMETER :: JPMXLE=200
19INTEGER(KIND=JPIM), PARAMETER :: JPMXGL=2056
20INTEGER(KIND=JPIM), PARAMETER :: JPFPPYX=17
21INTEGER(KIND=JPIM), PARAMETER :: JPNULNAM=4
22
23!     ------------------------------------------------------------------
24END MODULE PARDIM
Note: See TracBrowser for help on using the repository browser.