c     begin include file cslptyp.inc

c     + + + COMMON BLOCK DESCRIPTION + + +
c     + + + INSERT DESCRIPTION HERE  + + +

      common /slptyp/   islope

c     + + + VARIABLE DECLARATIONS + + +

      integer           islope

c     + + + VARIABLE DEFINITIONS + + +

c     islope : flag for slope input
c              islope = 0  location and point slope steepness
c              islope = 1  slope length and steepness pairs

c     end include file cslptyp.inc