C    FROM CTSLB.COM 
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
      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)
C
      REAL DSLABL(256)
      EQUIVALENCE (DSDSNO,DSLABL(1))
C    END: BYTE 1112

