include file: cparbrp.cdk 31
#if defined (DOC)
!*
! AUTHOR P. Koclas *CMC/AES
!
! Revision:
!       P. Koclas *CMC/AES February  1995:
!              Changed parameter values
!       J. Halle  *CMC/AES June 2002:
!              -decrease JPMXNEL to 100
!              -increase JPMXNLV to 300
!              -re-define JPLNG
!       Y.J. Rochon *ARQX/EC Feb 2006:
!              -Increased JPMXBK to 100
!       Y.J. Rochon *ARQX/EC Feb 2007:
!              -Increased JPMXNLV to 500
!       S. Heilliette  *ARMA February 2008:
!              -increase JPMXNLV to  620
!               to accomodate iasi in background check mode 
!
!      JPMXBK =MAXIMUM NUMBER OF BLOCKS
!      JPMXNEL=MAXIMUM NUMBER OF ELEMENTS
!      JPMXNLV=MAXIMUM NUMBER OF LEVELS
!      JPMX3D =MAXIMUM 3d-DEPTH  OF REPORT
!      PPMIS  =VALUE OF MISSING DATA
!
#endif
      INTEGER JPMXBK,JPMXNEL,JPMXNLV,JPMX3D,JPLNG
      REAL*8 PPMIS
!pik  PARAMETER (JPMXBK=6,JPMXNEL=500,JPMXNLV=40,PPMIS=-999.)
!jmb  PARAMETER (JPMXBK=6,JPMXNEL=200,JPMXNLV=50,PPMIS=-999.)
!she  PARAMETER (JPMXBK=10,JPMXNEL=100,JPMXNLV=300,PPMIS=-999.)
!yjr  PARAMETER (JPMXBK=10,JPMXNEL=100,JPMXNLV=300,PPMIS=-999.)
!yjr  PARAMETER (JPMXBK=100,JPMXNEL=100,JPMXNLV=300,PPMIS=-999.)
      PARAMETER (JPMXBK=100,JPMXNEL=100,JPMXNLV=620,PPMIS=-999.)
      PARAMETER (JPMX3D=400)
      PARAMETER (JPLNG=MIN(4000000,JPMXNLV*JPMXNEL*JPMX3D))
!
!-----------------------------------------------------------------------
!