C
C
C     + + + PARAMETERS + + +
      INTEGER    MAXPTH
      PARAMETER (MAXPTH = 1000)
C
      COMMON /DSSINF/NPATH,DSSDSN,        DSSFL,        DTYPI
      INTEGER        NPATH,DSSDSN(MAXPTH),DSSFL(MAXPTH),DTYPI(MAXPTH)
C
      COMMON /CPTHNM/DTPKWL,   CPATH,       CTYPE
      CHARACTER*64             CPATH(MAXPTH)
      CHARACTER*8    DTPKWL(4),             CTYPE(MAXPTH)
C
C     + + + EQUIVALENCES + + +
      EQUIVALENCE (DTPKWL,DTPKW1)
      CHARACTER*1  DTPKW1(32)
C
