parerob.F90

Go to the documentation of this file.

MODULE parerob


#include "tsmbkind.h"

IMPLICIT NONE

SAVE

!*
!     PAREROB   D. VASILJEVIC  91/03/05

!     DIMENSIONS FOR ARRAYS FOR OBS. ERROR CORRELATION


!     VARIABLE     / TYPE /               MEANING
!     --------       ----                 ------
!     JPMXXENT        I     MAX. NO. OF X ENTRIES IN THE CORREL. TABLE
!     JPMXYENT        I     MAX. NO. OF Y ENTRIES IN THE CORREL. TABLE
!     JPRZPAR         I
!     JPCZR           I
!     JPCXR           I
!     JPCZRCOR        I
!*

integer_m, PARAMETER :: jpmxxent=9
integer_m, PARAMETER :: jpmxyent=9
integer_m, PARAMETER :: jprzpar=10
integer_m, PARAMETER :: jpczr=8
integer_m, PARAMETER :: jpcxr=8
integer_m, PARAMETER :: jpczrcor=2

!     ------------------------------------------------------------------

END MODULE parerob