source: LMDZ5/branches/testing/libf/phymar/parerob.F90 @ 5445

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

Merged trunk changes -r2070:2158 into testing branch. Compilation problems introduced by revision r2155 have been corrected by hand

File size: 801 bytes
RevLine 
[2089]1MODULE PAREROB
2
3
4#include "tsmbkind.h"
5
6IMPLICIT NONE
7
8SAVE
9
10!*
11!     PAREROB   D. VASILJEVIC  91/03/05
12
13!     DIMENSIONS FOR ARRAYS FOR OBS. ERROR CORRELATION
14
15
16!     VARIABLE     / TYPE /               MEANING
17!     --------       ----                 ------
18!     JPMXXENT        I     MAX. NO. OF X ENTRIES IN THE CORREL. TABLE
19!     JPMXYENT        I     MAX. NO. OF Y ENTRIES IN THE CORREL. TABLE
20!     JPRZPAR         I
21!     JPCZR           I
22!     JPCXR           I
23!     JPCZRCOR        I
24!*
25
26INTEGER_M, PARAMETER :: JPMXXENT=9
27INTEGER_M, PARAMETER :: JPMXYENT=9
28INTEGER_M, PARAMETER :: JPRZPAR=10
29INTEGER_M, PARAMETER :: JPCZR=8
30INTEGER_M, PARAMETER :: JPCXR=8
31INTEGER_M, PARAMETER :: JPCZRCOR=2
32
33!     ------------------------------------------------------------------
34
35END MODULE PAREROB
Note: See TracBrowser for help on using the repository browser.