C    FROM CTSLX.COM
C    DUMMY TILL TBUFF
C     SPECIAL COMMON SCRTCH
      COMMON/SCRTCH/DUM0
      INTEGER       DUM0(375)
C
C    SECTION CTSLAB:
      COMMON/SCRTCH/DSDSNO,LBLSZ,DSFREC,DSLREC,VOFRWD,VOYEAR,LASTYR,
     1 DSSEC,BASEYR,VOKEY,KEYS,     NAME,   UNITS,DSCMPR,YEAROR,
     2 OBSTIM,STA,   LOCATN,    GAPCOD,DSDELT,NMEMS,MEMNAM,
     3 MSUB,    MKIND,    FMT,    DUML,    DUM1
      INTEGER       DSDSNO,LBLSZ,DSFREC,DSLREC,VOFRWD,VOYEAR,LASTYR,
     1 DSSEC,BASEYR,VOKEY,KEYS(100),NAME(2),UNITS,DSCMPR,YEAROR,
     2 OBSTIM,STA(2),LOCATN(10),GAPCOD,DSDELT,NMEMS,MEMNAM(2,20),
     3 MSUB(20),MKIND(20),FMT(20),DUML(25),DUM1(289)
C
      REAL DSLABL(256),TBUFF(545)
      INTEGER   ASVEC(2)
      EQUIVALENCE (DSDSNO,DSLABL(1)),(DSDSNO,TBUFF(1)),
     1            (DUM0(1),ASVEC(1))

