LOGICAL ok_oasis
      PARAMETER (ok_oasis = .FALSE.)
c
      CHARACTER*4 cchan
      PARAMETER (cchan="PIPE")
c      PARAMETER (cchan="CLIM")

      INTEGER jpmaxfld
      PARAMETER(jpmaxfld = 20)