C-------------------------------------------------------------
C***  SET PRIMARY GRID DIMENSIONS AND PRESSURE OUTPUT LEVELS
      PARAMETER (IM=493,JM=461,LM=38,LSM=10)
C-------------------------------------------------------------
C***  SET THE NUMBER OF PEs IN THE I-DIRECTION AND J-DIRECTION
      PARAMETER(INPES=4,JNPES=4)
C-------------------------------------------------------------
C
      PARAMETER(IGSTL=-5,IGSTR=5)
      PARAMETER(JGSTL=-5,JGSTR=5)
      PARAMETER(ITAIL=IM-(INPES*(IM/INPES)))
      PARAMETER(JTAIL=JM-(JNPES*(JM/JNPES)))
C
      PARAMETER(IDIM1=IGSTL,IDIM2=IM/INPES+IGSTR+1)
      PARAMETER(JDIM1=JGSTL,JDIM2=JM/JNPES+JGSTR+1)
C
C-------------------------------------------------------------
