* Hash table generated by hasher
HMOD   DATA  378L
HTAB   EQU    *
*
       BSZ     6
*
       EXT     VTTERM  
       DATA    C'VTTERM  '
       IP      VTTERM  
*
       EXT     GTACL$  
       DATA    C'GTACL$  '
       IP      GTACL$  
*
       EXT     DGETL$  
       DATA    C'DGETL$  '
       IP      DGETL$  
*
       EXT     VTOP    
       DATA    C'VTOP    '
       IP      VTOP    
*
       EXT     AMATCH  
       DATA    C'AMATCH  '
       IP      AMATCH  
*
       EXT     STRIM   
       DATA    C'STRIM   '
       IP      STRIM   
*
       EXT     MAKPAT  
       DATA    C'MAKPAT  '
       IP      MAKPAT  
*
       BSZ     6
*
       BSZ     6
*
       EXT     VTUPD   
       DATA    C'VTUPD   '
       IP      VTUPD   
*
       BSZ     6
*
       BSZ     6
*
       BSZ     6
*
       EXT     RTN$$   
       DATA    C'RTN$$   '
       IP      RTN$$   
*
       EXT     PUTCH   
       DATA    C'PUTCH   '
       IP      PUTCH   
*
       BSZ     6
*
       BSZ     6
*
       BSZ     6
*
       EXT     PARSCL  
       DATA    C'PARSCL  '
       IP      PARSCL  
*
       BSZ     6
*
       EXT     MKSACL  
       DATA    C'MKSACL  '
       IP      MKSACL  
*
       EXT     VTILIN  
       DATA    C'VTILIN  '
       IP      VTILIN  
*
       EXT     PTOC    
       DATA    C'PTOC    '
       IP      PTOC    
*
       EXT     TTYP$V  
       DATA    C'TTYP$V  '
       IP      TTYP$V  
*
       EXT     FILCPY  
       DATA    C'FILCPY  '
       IP      FILCPY  
*
       EXT     JDATE   
       DATA    C'JDATE   '
       IP      JDATE   
*
       EXT     TTYP$Q  
       DATA    C'TTYP$Q  '
       IP      TTYP$Q  
*
       EXT     TTYP$R  
       DATA    C'TTYP$R  '
       IP      TTYP$R  
*
       EXT     CPSEG$  
       DATA    C'CPSEG$  '
       IP      CPSEG$  
*
       EXT     COF$    
       DATA    C'COF$    '
       IP      COF$    
*
       EXT     CHKINP  
       DATA    C'CHKINP  '
       IP      CHKINP  
*
       BSZ     6
*
       BSZ     6
*
       BSZ     6
*
       BSZ     6
*
       EXT     VTPRT   
       DATA    C'VTPRT   '
       IP      VTPRT   
*
       BSZ     6
*
       BSZ     6
*
       BSZ     6
*
       EXT     TTYP$F  
       DATA    C'TTYP$F  '
       IP      TTYP$F  
*
       EXT     DECODE  
       DATA    C'DECODE  '
       IP      DECODE  
*
       BSZ     6
*
       BSZ     6
*
       BSZ     6
*
       EXT     VT$DSW  
       DATA    C'VT$DSW  '
       IP      VT$DSW  
*
       EXT     VTMSG   
       DATA    C'VTMSG   '
       IP      VTMSG   
*
       EXT     TTYP$L  
       DATA    C'TTYP$L  '
       IP      TTYP$L  
*
       EXT     MATCH   
       DATA    C'MATCH   '
       IP      MATCH   
*
       EXT     LOCATE  
       DATA    C'LOCATE  '
       IP      LOCATE  
*
       EXT     FINDF$  
       DATA    C'FINDF$  '
       IP      FINDF$  
*
       EXT     PUTDEC  
       DATA    C'PUTDEC  '
       IP      PUTDEC  
*
       EXT     CTOP    
       DATA    C'CTOP    '
       IP      CTOP    
*
       EXT     VTOC    
       DATA    C'VTOC    '
       IP      VTOC    
*
       BSZ     6
*
       BSZ     6
*
       BSZ     6
*
       BSZ     6
*
       BSZ     6
*
       BSZ     6
*
       BSZ     6
*
       EXT     DSEEK$  
       DATA    C'DSEEK$  '
       IP      DSEEK$  
*
       BSZ     6
*
       EXT     TMARK$  
       DATA    C'TMARK$  '
       IP      TMARK$  
*
       BSZ     6
*
       EXT     DMPCM$  
       DATA    C'DMPCM$  '
       IP      DMPCM$  
*
       EXT     VTOPT   
       DATA    C'VTOPT   '
       IP      VTOPT   
*
       BSZ     6
*
       BSZ     6
*
       EXT     VT$POS  
       DATA    C'VT$POS  '
       IP      VT$POS  
*
       BSZ     6
*
       EXT     LOPEN$  
       DATA    C'LOPEN$  '
       IP      LOPEN$  
*
       BSZ     6
*
       BSZ     6
*
       EXT     PTOV    
       DATA    C'PTOV    '
       IP      PTOV    
*
       EXT     SUBSTR  
       DATA    C'SUBSTR  '
       IP      SUBSTR  
*
       BSZ     6
*
       EXT     GCIFU$  
       DATA    C'GCIFU$  '
       IP      GCIFU$  
*
       EXT     DMPFD$  
       DATA    C'DMPFD$  '
       IP      DMPFD$  
*
       EXT     GETCCL  
       DATA    C'GETCCL  '
       IP      GETCCL  
*
       EXT     VTDLIN  
       DATA    C'VTDLIN  '
       IP      VTDLIN  
*
       EXT     REWIND  
       DATA    C'REWIND  '
       IP      REWIND  
*
       EXT     TQUIT$  
       DATA    C'TQUIT$  '
       IP      TQUIT$  
*
       EXT     GETWRD  
       DATA    C'GETWRD  '
       IP      GETWRD  
*
       EXT     VT$RDF  
       DATA    C'VT$RDF  '
       IP      VT$RDF  
*
       EXT     MAKSUB  
       DATA    C'MAKSUB  '
       IP      MAKSUB  
*
       BSZ     6
*
       BSZ     6
*
       BSZ     6
*
       BSZ     6
*
       BSZ     6
*
       EXT     FILSET  
       DATA    C'FILSET  '
       IP      FILSET  
*
       EXT     WRITEF  
       DATA    C'WRITEF  '
       IP      WRITEF  
*
       BSZ     6
*
       BSZ     6
*
       EXT     VT$GSQ  
       DATA    C'VT$GSQ  '
       IP      VT$GSQ  
*
       EXT     CTOC    
       DATA    C'CTOC    '
       IP      CTOC    
*
       EXT     LENGTH  
       DATA    C'LENGTH  '
       IP      LENGTH  
*
       EXT     AT$SWT  
       DATA    C'AT$SWT  '
       IP      AT$SWT  
*
       BSZ     6
*
       EXT     VT$PUT  
       DATA    C'VT$PUT  '
       IP      VT$PUT  
*
       EXT     VT$ALC  
       DATA    C'VT$ALC  '
       IP      VT$ALC  
*
       BSZ     6
*
       BSZ     6
*
       EXT     DELARG  
       DATA    C'DELARG  '
       IP      DELARG  
*
       EXT     MAPFD   
       DATA    C'MAPFD   '
       IP      MAPFD   
*
       EXT     VT$ILN  
       DATA    C'VT$ILN  '
       IP      VT$ILN  
*
       EXT     VT$CEL  
       DATA    C'VT$CEL  '
       IP      VT$CEL  
*
       BSZ     6
*
       EXT     EQUAL   
       DATA    C'EQUAL   '
       IP      EQUAL   
*
       BSZ     6
*
       BSZ     6
*
       BSZ     6
*
       EXT     MKTEMP  
       DATA    C'MKTEMP  '
       IP      MKTEMP  
*
       EXT     RMTEMP  
       DATA    C'RMTEMP  '
       IP      RMTEMP  
*
       BSZ     6
*
       EXT     ISADSK  
       DATA    C'ISADSK  '
       IP      ISADSK  
*
       EXT     MKDIR$  
       DATA    C'MKDIR$  '
       IP      MKDIR$  
*
       EXT     ISATTY  
       DATA    C'ISATTY  '
       IP      ISATTY  
*
       EXT     ZMEM$   
       DATA    C'ZMEM$   '
       IP      ZMEM$   
*
       EXT     ITOC    
       DATA    C'ITOC    '
       IP      ITOC    
*
       EXT     MAPSU   
       DATA    C'MAPSU   '
       IP      MAPSU   
*
       EXT     GETKWD  
       DATA    C'GETKWD  '
       IP      GETKWD  
*
       EXT     INDEX   
       DATA    C'INDEX   '
       IP      INDEX   
*
       BSZ     6
*
       EXT     DMARK$  
       DATA    C'DMARK$  '
       IP      DMARK$  
*
       EXT     TREAD$  
       DATA    C'TREAD$  '
       IP      TREAD$  
*
       BSZ     6
*
       BSZ     6
*
       BSZ     6
*
       BSZ     6
*
       BSZ     6
*
       EXT     LTOC    
       DATA    C'LTOC    '
       IP      LTOC    
*
       BSZ     6
*
       BSZ     6
*
       BSZ     6
*
       EXT     PG$BRK  
       DATA    C'PG$BRK  '
       IP      PG$BRK  
*
       EXT     GTTYPE  
       DATA    C'GTTYPE  '
       IP      GTTYPE  
*
       BSZ     6
*
       EXT     GETLIN  
       DATA    C'GETLIN  '
       IP      GETLIN  
*
       BSZ     6
*
       BSZ     6
*
       BSZ     6
*
       BSZ     6
*
       BSZ     6
*
       BSZ     6
*
       BSZ     6
*
       BSZ     6
*
       EXT     CTOV    
       DATA    C'CTOV    '
       IP      CTOV    
*
       EXT     CATSUB  
       DATA    C'CATSUB  '
       IP      CATSUB  
*
       BSZ     6
*
       EXT     ICOMN$  
       DATA    C'ICOMN$  '
       IP      ICOMN$  
*
       EXT     VT$DLN  
       DATA    C'VT$DLN  '
       IP      VT$DLN  
*
       EXT     PAGE    
       DATA    C'PAGE    '
       IP      PAGE    
*
       EXT     TCOOK$  
       DATA    C'TCOOK$  '
       IP      TCOOK$  
*
       BSZ     6
*
       EXT     FLUSH$  
       DATA    C'FLUSH$  '
       IP      FLUSH$  
*
       EXT     RTOC    
       DATA    C'RTOC    '
       IP      RTOC    
*
       BSZ     6
*
       EXT     GETA$PLG
       DATA    C'GETA$PLG'
       IP      GETA$PLG
*
       EXT     CANT    
       DATA    C'CANT    '
       IP      CANT    
*
       EXT     ESC     
       DATA    C'ESC     '
       IP      ESC     
*
       BSZ     6
*
       EXT     SEEKF   
       DATA    C'SEEKF   '
       IP      SEEKF   
*
       BSZ     6
*
       BSZ     6
*
       BSZ     6
*
       EXT     MKPA$   
       DATA    C'MKPA$   '
       IP      MKPA$   
*
       EXT     VTGETL  
       DATA    C'VTGETL  '
       IP      VTGETL  
*
       EXT     READF   
       DATA    C'READF   '
       IP      READF   
*
       EXT     LDTMP$  
       DATA    C'LDTMP$  '
       IP      LDTMP$  
*
       BSZ     6
*
       BSZ     6
*
       EXT     MAPUP   
       DATA    C'MAPUP   '
       IP      MAPUP   
*
       BSZ     6
*
       EXT     MAPDN   
       DATA    C'MAPDN   '
       IP      MAPDN   
*
       EXT     STRCMP  
       DATA    C'STRCMP  '
       IP      STRCMP  
*
       BSZ     6
*
       EXT     LOOKAC  
       DATA    C'LOOKAC  '
       IP      LOOKAC  
*
       EXT     STAKE   
       DATA    C'STAKE   '
       IP      STAKE   
*
       BSZ     6
*
       EXT     DATE    
       DATA    C'DATE    '
       IP      DATE    
*
       EXT     CHUNK$  
       DATA    C'CHUNK$  '
       IP      CHUNK$  
*
       BSZ     6
*
       EXT     VT$IER  
       DATA    C'VT$IER  '
       IP      VT$IER  
*
       EXT     PATSIZ  
       DATA    C'PATSIZ  '
       IP      PATSIZ  
*
       EXT     INPUT   
       DATA    C'INPUT   '
       IP      INPUT   
*
       BSZ     6
*
       EXT     DREAD$  
       DATA    C'DREAD$  '
       IP      DREAD$  
*
       EXT     CTOMN   
       DATA    C'CTOMN   '
       IP      CTOMN   
*
       EXT     CTOA    
       DATA    C'CTOA    '
       IP      CTOA    
*
       EXT     MKTR$   
       DATA    C'MKTR$   '
       IP      MKTR$   
*
       EXT     VTREAD  
       DATA    C'VTREAD  '
       IP      VTREAD  
*
       EXT     REMOVE  
       DATA    C'REMOVE  '
       IP      REMOVE  
*
       EXT     CTOI    
       DATA    C'CTOI    '
       IP      CTOI    
*
       EXT     GCDIR$  
       DATA    C'GCDIR$  '
       IP      GCDIR$  
*
       BSZ     6
*
       BSZ     6
*
       EXT     VFYUSR  
       DATA    C'VFYUSR  '
       IP      VFYUSR  
*
       EXT     CALL$$  
       DATA    C'CALL$$  '
       IP      CALL$$  
*
       EXT     GTATTR  
       DATA    C'GTATTR  '
       IP      GTATTR  
*
       EXT     ADDSET  
       DATA    C'ADDSET  '
       IP      ADDSET  
*
       EXT     STRLSR  
       DATA    C'STRLSR  '
       IP      STRLSR  
*
       EXT     VT$DB1  
       DATA    C'VT$DB1  '
       IP      VT$DB1  
*
       EXT     VT$DB2  
       DATA    C'VT$DB2  '
       IP      VT$DB2  
*
       EXT     VT$DB3  
       DATA    C'VT$DB3  '
       IP      VT$DB3  
*
       EXT     VTPAD   
       DATA    C'VTPAD   '
       IP      VTPAD   
*
       EXT     MKPACL  
       DATA    C'MKPACL  '
       IP      MKPACL  
*
       EXT     ERROR   
       DATA    C'ERROR   '
       IP      ERROR   
*
       EXT     GETTO   
       DATA    C'GETTO   '
       IP      GETTO   
*
       EXT     DWRIT$  
       DATA    C'DWRIT$  '
       IP      DWRIT$  
*
       EXT     RMSEG$  
       DATA    C'RMSEG$  '
       IP      RMSEG$  
*
       EXT     SCOPY   
       DATA    C'SCOPY   '
       IP      SCOPY   
*
       BSZ     6
*
       BSZ     6
*
       BSZ     6
*
       EXT     EXPAND  
       DATA    C'EXPAND  '
       IP      EXPAND  
*
       EXT     SYS$$   
       DATA    C'SYS$$   '
       IP      SYS$$   
*
       EXT     VT$DB   
       DATA    C'VT$DB   '
       IP      VT$DB   
*
       EXT     GTEMP   
       DATA    C'GTEMP   '
       IP      GTEMP   
*
       EXT     REMARK  
       DATA    C'REMARK  '
       IP      REMARK  
*
       BSZ     6
*
       BSZ     6
*
       BSZ     6
*
       EXT     TPUTL$  
       DATA    C'TPUTL$  '
       IP      TPUTL$  
*
       BSZ     6
*
       BSZ     6
*
       EXT     IOFL$   
       DATA    C'IOFL$   '
       IP      IOFL$   
*
       BSZ     6
*
       EXT     DOPEN$  
       DATA    C'DOPEN$  '
       IP      DOPEN$  
*
       EXT     CHKSTR  
       DATA    C'CHKSTR  '
       IP      CHKSTR  
*
       EXT     DODASH  
       DATA    C'DODASH  '
       IP      DODASH  
*
       BSZ     6
*
       BSZ     6
*
       BSZ     6
*
       BSZ     6
*
       EXT     GKLARG  
       DATA    C'GKLARG  '
       IP      GKLARG  
*
       EXT     FIRST$  
       DATA    C'FIRST$  '
       IP      FIRST$  
*
       EXT     CTOD    
       DATA    C'CTOD    '
       IP      CTOD    
*
       BSZ     6
*
       EXT     VTSTOP  
       DATA    C'VTSTOP  '
       IP      VTSTOP  
*
       EXT     GVLARG  
       DATA    C'GVLARG  '
       IP      GVLARG  
*
       EXT     VT$DEF  
       DATA    C'VT$DEF  '
       IP      VT$DEF  
*
       EXT     CTOL    
       DATA    C'CTOL    '
       IP      CTOL    
*
       EXT     BPONU$  
       DATA    C'BPONU$  '
       IP      BPONU$  
*
       BSZ     6
*
       BSZ     6
*
       EXT     VTINFO  
       DATA    C'VTINFO  '
       IP      VTINFO  
*
       EXT     VT$DEL  
       DATA    C'VT$DEL  '
       IP      VT$DEL  
*
       EXT     TRUNC   
       DATA    C'TRUNC   '
       IP      TRUNC   
*
       EXT     FOLLOW  
       DATA    C'FOLLOW  '
       IP      FOLLOW  
*
       BSZ     6
*
       BSZ     6
*
       BSZ     6
*
       EXT     INIT    
       DATA    C'INIT    '
       IP      INIT    
*
       EXT     GETVDN  
       DATA    C'GETVDN  '
       IP      GETVDN  
*
       EXT     UPKFN$  
       DATA    C'UPKFN$  '
       IP      UPKFN$  
*
       BSZ     6
*
       BSZ     6
*
       BSZ     6
*
       EXT     SZFIL$  
       DATA    C'SZFIL$  '
       IP      SZFIL$  
*
       EXT     ISNULL  
       DATA    C'ISNULL  '
       IP      ISNULL  
*
       EXT     SPROT$  
       DATA    C'SPROT$  '
       IP      SPROT$  
*
       EXT     TWRIT$  
       DATA    C'TWRIT$  '
       IP      TWRIT$  
*
       EXT     GCTOL   
       DATA    C'GCTOL   '
       IP      GCTOL   
*
       EXT     TYPE    
       DATA    C'TYPE    '
       IP      TYPE    
*
       EXT     EXECN   
       DATA    C'EXECN   '
       IP      EXECN   
*
       BSZ     6
*
       BSZ     6
*
       BSZ     6
*
       BSZ     6
*
       BSZ     6
*
       EXT     VT$GET  
       DATA    C'VT$GET  '
       IP      VT$GET  
*
       EXT     VT$NDF  
       DATA    C'VT$NDF  '
       IP      VT$NDF  
*
       BSZ     6
*
       EXT     GCTOI   
       DATA    C'GCTOI   '
       IP      GCTOI   
*
       BSZ     6
*
       BSZ     6
*
       BSZ     6
*
       BSZ     6
*
       EXT     VTINIT  
       DATA    C'VTINIT  '
       IP      VTINIT  
*
       EXT     GFNAM$  
       DATA    C'GFNAM$  '
       IP      GFNAM$  
*
       BSZ     6
*
       EXT     PARSDT  
       DATA    C'PARSDT  '
       IP      PARSDT  
*
       EXT     VTBAUD  
       DATA    C'VTBAUD  '
       IP      VTBAUD  
*
       EXT     CHKARG  
       DATA    C'CHKARG  '
       IP      CHKARG  
*
       EXT     PRINT   
       DATA    C'PRINT   '
       IP      PRINT   
*
       EXT     REONU$  
       DATA    C'REONU$  '
       IP      REONU$  
*
       EXT     LDSEG$  
       DATA    C'LDSEG$  '
       IP      LDSEG$  
*
       EXT     DPUTL$  
       DATA    C'DPUTL$  '
       IP      DPUTL$  
*
       EXT     MNTOC   
       DATA    C'MNTOC   '
       IP      MNTOC   
*
       EXT     TSCAN$  
       DATA    C'TSCAN$  '
       IP      TSCAN$  
*
       EXT     FCOPY   
       DATA    C'FCOPY   '
       IP      FCOPY   
*
       EXT     SFDATA  
       DATA    C'SFDATA  '
       IP      SFDATA  
*
       EXT     STRBSR  
       DATA    C'STRBSR  '
       IP      STRBSR  
*
       EXT     GETA$F  
       DATA    C'GETA$F  '
       IP      GETA$F  
*
       EXT     WKDAY   
       DATA    C'WKDAY   '
       IP      WKDAY   
*
       EXT     OMATCH  
       DATA    C'OMATCH  '
       IP      OMATCH  
*
       BSZ     6
*
       EXT     PUTLIT  
       DATA    C'PUTLIT  '
       IP      PUTLIT  
*
       EXT     MAPSTR  
       DATA    C'MAPSTR  '
       IP      MAPSTR  
*
       EXT     SWT     
       DATA    C'SWT     '
       IP      SWT     
*
       BSZ     6
*
       EXT     ISPH$   
       DATA    C'ISPH$   '
       IP      ISPH$   
*
       BSZ     6
*
       EXT     FILTST  
       DATA    C'FILTST  '
       IP      FILTST  
*
       EXT     OPEN    
       DATA    C'OPEN    '
       IP      OPEN    
*
       EXT     ENCODE  
       DATA    C'ENCODE  '
       IP      ENCODE  
*
       BSZ     6
*
       EXT     IOINIT  
       DATA    C'IOINIT  '
       IP      IOINIT  
*
       BSZ     6
*
       EXT     CREATE  
       DATA    C'CREATE  '
       IP      CREATE  
*
       EXT     VT$ERR  
       DATA    C'VT$ERR  '
       IP      VT$ERR  
*
       EXT     GETA$P  
       DATA    C'GETA$P  '
       IP      GETA$P  
*
       EXT     CPFIL$  
       DATA    C'CPFIL$  '
       IP      CPFIL$  
*
       BSZ     6
*
       BSZ     6
*
       EXT     TGETL$  
       DATA    C'TGETL$  '
       IP      TGETL$  
*
       EXT     VT$IDF  
       DATA    C'VT$IDF  '
       IP      VT$IDF  
*
       EXT     VTMOVE  
       DATA    C'VTMOVE  '
       IP      VTMOVE  
*
       EXT     INIT$F  
       DATA    C'INIT$F  '
       IP      INIT$F  
*
       EXT     MARKF   
       DATA    C'MARKF   '
       IP      MARKF   
*
       BSZ     6
*
       BSZ     6
*
       BSZ     6
*
       EXT     PUTLIN  
       DATA    C'PUTLIN  '
       IP      PUTLIN  
*
       BSZ     6
*
       BSZ     6
*
       BSZ     6
*
       BSZ     6
*
       BSZ     6
*
       EXT     MKFD$   
       DATA    C'MKFD$   '
       IP      MKFD$   
*
       BSZ     6
*
       BSZ     6
*
       BSZ     6
*
       BSZ     6
*
       EXT     VT$OUT  
       DATA    C'VT$OUT  '
       IP      VT$OUT  
*
       EXT     PARSTM  
       DATA    C'PARSTM  '
       IP      PARSTM  
*
       EXT     CTOR    
       DATA    C'CTOR    '
       IP      CTOR    
*
       EXT     GETFD$  
       DATA    C'GETFD$  '
       IP      GETFD$  
*
       EXT     ATOC    
       DATA    C'ATOC    '
       IP      ATOC    
*
       EXT     GFDATA  
       DATA    C'GFDATA  '
       IP      GFDATA  
*
       EXT     GETCH   
       DATA    C'GETCH   '
       IP      GETCH   
*
       BSZ     6
*
       BSZ     6
*
       BSZ     6
*
       EXT     VT$REL  
       DATA    C'VT$REL  '
       IP      VT$REL  
*
       EXT     LUTEMP  
       DATA    C'LUTEMP  '
       IP      LUTEMP  
*
       EXT     VTENB   
       DATA    C'VTENB   '
       IP      VTENB   
*
       BSZ     6
*
       EXT     EXEC    
       DATA    C'EXEC    '
       IP      EXEC    
*
       EXT     PARSA$  
       DATA    C'PARSA$  '
       IP      PARSA$  
*
       EXT     DTOC    
       DATA    C'DTOC    '
       IP      DTOC    
*
       EXT     GFNARG  
       DATA    C'GFNARG  '
       IP      GFNARG  
*
       EXT     SZSEG$  
       DATA    C'SZSEG$  '
       IP      SZSEG$  
*
       BSZ     6
*
       EXT     SDROP   
       DATA    C'SDROP   '
       IP      SDROP   
*
       BSZ     6
*
       BSZ     6
*
       BSZ     6
*
       EXT     GETARG  
       DATA    C'GETARG  '
       IP      GETARG  
*
       EXT     RMFIL$  
       DATA    C'RMFIL$  '
       IP      RMFIL$  
*
       BSZ     6
*
       EXT     STCLOS  
       DATA    C'STCLOS  '
       IP      STCLOS  
*
       BSZ     6
*
       EXT     SETERR  
       DATA    C'SETERR  '
       IP      SETERR  
*
       BSZ     6
*
       EXT     FINFO$  
       DATA    C'FINFO$  '
       IP      FINFO$  
*
       EXT     VT$CLR  
       DATA    C'VT$CLR  '
       IP      VT$CLR  
*
       EXT     WIND    
       DATA    C'WIND    '
       IP      WIND    
*
       EXT     VTPUTL  
       DATA    C'VTPUTL  '
       IP      VTPUTL  
*
       EXT     GITOC   
       DATA    C'GITOC   '
       IP      GITOC   
*
       EXT     GLTOC   
       DATA    C'GLTOC   '
       IP      GLTOC   
*
       EXT     MOVE$   
       DATA    C'MOVE$   '
       IP      MOVE$   
*
       EXT     CLOSE   
       DATA    C'CLOSE   '
       IP      CLOSE   
*
       BSZ     6
*
       EXT     VTCLR   
       DATA    C'VTCLR   '
       IP      VTCLR   
*
       EXT     TSEEK$  
       DATA    C'TSEEK$  '
       IP      TSEEK$  
*
       OCT     0