perm filename BAIPD8.FAI[10X,AIL]3 blob
sn#187859 filedate 1975-11-21 generic text, type T, neo UTF8
TITLE BAIPD8
BEGIN BAIPD8
$BEGIN←←.+1
ASCII /M/
0
LINK PDLNK,.-1
EXTERNAL M
,M
1
POINT 7,.-4
REFB+PROCB+UNTYPE
XWD 2*0,1
0
0
XWD 0,.+4
XWD .-10,0
XWD M,0
XWD M,0
ASCII /OUT/
0
LINK PDLNK,.-1
EXTERNAL OUT
,OUT
3
POINT 7,.-4
REFB+PROCB+UNTYPE
XWD 2*1,2
0
0
XWD 0,.+4
XWD .-10,0
XWD OUT,0
XWD OUT,0
0+INTEGR+VALUE
0+STRING+VALUE
ASCII /BREAKSET/
0
LINK PDLNK,.-1
EXTERNAL BREAKSET
,BREAKSET
10
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*1,3
0
0
XWD 0,.+4
XWD .-10,0
XWD BREAKSET,0
XWD BREAKSET,0
0+INTEGR+VALUE
0+STRING+VALUE
0+INTEGR+VALUE
ASCII /INPUT/
0
LINK PDLNK,.-1
EXTERNAL INPUT
,INPUT
5
POINT 7,.-4
REFB+PROCB+STRING
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD INPUT,0
XWD INPUT,0
0+INTEGR+VALUE
0+INTEGR+VALUE
ASCII /LOOKUP/
0
LINK PDLNK,.-1
EXTERNAL LOOKUP
,LOOKUP
6
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*1,3
0
0
XWD 0,.+4
XWD .-10,0
XWD LOOKUP,0
XWD LOOKUP,0
0+INTEGR+VALUE
0+STRING+VALUE
0+INTEGR+REFRNC
ASCII /WR_INI/
0
LINK PDLNK,.-1
EXTERNAL WR.INI
,WR.INI
6
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*2,3
0
0
XWD 0,.+4
XWD .-10,0
XWD WR.INI,0
XWD WR.INI,0
0+STRING+VALUE
0+STRING+VALUE
0+INTEGR+VALUE
0+INTEGR+VALUE
ASCII /OPEN/
0
LINK PDLNK,.-1
EXTERNAL OPEN
,OPEN
4
POINT 7,.-4
REFB+PROCB+UNTYPE
XWD 2*1,10
0
0
XWD 0,.+4
XWD .-10,0
XWD OPEN,0
XWD OPEN,0
0+INTEGR+VALUE
0+STRING+VALUE
0+INTEGR+VALUE
0+INTEGR+VALUE
0+INTEGR+VALUE
0+INTEGR+REFRNC
0+INTEGR+REFRNC
0+INTEGR+REFRNC
ASCII /SETPL/
0
LINK PDLNK,.-1
EXTERNAL SETPL
,SETPL
5
POINT 7,.-4
REFB+PROCB+UNTYPE
XWD 2*0,5
0
0
XWD 0,.+4
XWD .-10,0
XWD SETPL,0
XWD SETPL,0
0+INTEGR+VALUE
0+INTEGR+REFRNC
0+INTEGR+REFRNC
0+INTEGR+REFRNC
ASCII /POINT/
0
LINK PDLNK,.-1
EXTERNAL POINT
,POINT
5
POINT 7,.-4
REFB+PROCB+INTEGR
XWD 2*0,4
0
0
XWD 0,.+4
XWD .-10,0
XWD POINT,0
XWD POINT,0
0+INTEGR+VALUE
0+INTEGR+REFRNC
0+INTEGR+VALUE
ASCII /BBPP./
0
LINK PDLNK,.-1
EXTERNAL .BBPP.
,.BBPP.
5
POINT 7,.-4
REFB+PROCB+INTEGR
XWD 2*0,4
0
0
XWD 0,.+4
XWD .-10,0
XWD .BBPP.,0
XWD .BBPP.,0
0+INTEGR+VALUE
0+INTEGR+REFRNC
0+INTEGR+VALUE
ASCII /$PINT/
0
LINK PDLNK,.-1
EXTERNAL .$PINT
,.$PINT
5
POINT 7,.-4
REFB+PROCB+UNTYPE
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD .$PINT,0
XWD .$PINT,0
0+INTEGR+VALUE
ASCII /$PREL/
0
LINK PDLNK,.-1
EXTERNAL .$PREL
,.$PREL
5
POINT 7,.-4
REFB+PROCB+UNTYPE
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD .$PREL,0
XWD .$PREL,0
0+FLOTNG+VALUE
ASCII /$PITM/
0
LINK PDLNK,.-1
EXTERNAL .$PITM
,.$PITM
5
POINT 7,.-4
REFB+PROCB+UNTYPE
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD .$PITM,0
XWD .$PITM,0
0+ITMVAR+VALUE
ASCII /$PSET/
0
LINK PDLNK,.-1
EXTERNAL .$PSET
,.$PSET
5
POINT 7,.-4
REFB+PROCB+UNTYPE
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD .$PSET,0
XWD .$PSET,0
0+SET+VALUE
ASCII /$PLST/
0
LINK PDLNK,.-1
EXTERNAL .$PLST
,.$PLST
5
POINT 7,.-4
REFB+PROCB+UNTYPE
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD .$PLST,0
XWD .$PLST,0
0+UNTYPE+VALUE
ASCII /$PSTR/
0
LINK PDLNK,.-1
EXTERNAL .$PSTR
,.$PSTR
5
POINT 7,.-4
REFB+PROCB+UNTYPE
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD .$PSTR,0
XWD .$PSTR,0
0+STRING+VALUE
ASCII /$PREC/
0
LINK PDLNK,.-1
EXTERNAL .$PREC
,.$PREC
5
POINT 7,.-4
REFB+PROCB+UNTYPE
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD .$PREC,0
XWD .$PREC,0
0+PNTVAR+VALUE
ASCII /SETPRINT/
0
LINK PDLNK,.-1
EXTERNAL SETPRINT
,SETPRINT
10
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*1,2
0
0
XWD 0,.+4
XWD .-10,0
XWD SETPRINT,0
XWD SETPRINT,0
0+STRING+VALUE
0+INTEGR+VALUE
ASCII /GETPRINT/
0
LINK PDLNK,.-1
EXTERNAL GETPRINT
,GETPRINT
10
POINT 7,.-5
REFB+PROCB+INTEGR
XWD 2*0,1
0
0
XWD 0,.+4
XWD .-10,0
XWD GETPRINT,0
XWD GETPRINT,0
ASCII /EQU/
0
LINK PDLNK,.-1
EXTERNAL EQU
,EQU
3
POINT 7,.-4
REFB+PROCB+INTEGR
XWD 2*2,1
0
0
XWD 0,.+4
XWD .-10,0
XWD EQU,0
XWD EQU,0
0+STRING+VALUE
0+STRING+VALUE
ASCII /CVS/
0
LINK PDLNK,.-1
EXTERNAL CVS
,CVS
3
POINT 7,.-4
REFB+PROCB+STRING
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD CVS,0
XWD CVS,0
0+INTEGR+VALUE
ASCII /CVD/
0
LINK PDLNK,.-1
EXTERNAL CVD
,CVD
3
POINT 7,.-4
REFB+PROCB+INTEGR
XWD 2*1,1
0
0
XWD 0,.+4
XWD .-10,0
XWD CVD,0
XWD CVD,0
0+STRING+VALUE
ASCII /SCAN/
0
LINK PDLNK,.-1
EXTERNAL SCAN
,SCAN
4
POINT 7,.-4
REFB+PROCB+STRING
XWD 2*0,4
0
0
XWD 0,.+4
XWD .-10,0
XWD SCAN,0
XWD SCAN,0
0+STRING+REFRNC
0+INTEGR+VALUE
0+INTEGR+REFRNC
ASCII /RELEASE/
0
LINK PDLNK,.-1
EXTERNAL RELEASE
,RELEASE
7
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD RELEASE,0
XWD RELEASE,0
0+INTEGR+VALUE
0+DEFLT+INTEGR+VALUE
ASCII /LINOUT/
0
LINK PDLNK,.-1
EXTERNAL LINOUT
,LINOUT
6
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD LINOUT,0
XWD LINOUT,0
0+INTEGR+VALUE
0+INTEGR+VALUE
ASCII /CLOSE/
0
LINK PDLNK,.-1
EXTERNAL CLOSE
,CLOSE
5
POINT 7,.-4
REFB+PROCB+UNTYPE
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD CLOSE,0
XWD CLOSE,0
0+INTEGR+VALUE
0+DEFLT+INTEGR+VALUE
ASCII /CLOSO/
0
LINK PDLNK,.-1
EXTERNAL CLOSO
,CLOSO
5
POINT 7,.-4
REFB+PROCB+UNTYPE
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD CLOSO,0
XWD CLOSO,0
0+INTEGR+VALUE
0+DEFLT+INTEGR+VALUE
ASCII /CLOSIN/
0
LINK PDLNK,.-1
EXTERNAL CLOSIN
,CLOSIN
6
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD CLOSIN,0
XWD CLOSIN,0
0+INTEGR+VALUE
0+DEFLT+INTEGR+VALUE
ASCII /CVOS/
0
LINK PDLNK,.-1
EXTERNAL CVOS
,CVOS
4
POINT 7,.-4
REFB+PROCB+STRING
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD CVOS,0
XWD CVOS,0
0+UNTYPE+VALUE
ASCII /ENTER/
0
LINK PDLNK,.-1
EXTERNAL ENTER
,ENTER
5
POINT 7,.-4
REFB+PROCB+UNTYPE
XWD 2*0,4
0
0
XWD 0,.+4
XWD .-10,0
XWD ENTER,0
XWD ENTER,0
0+INTEGR+VALUE
0+STRING+VALUE
0+INTEGR+REFRNC
ASCII /MTAPE/
0
LINK PDLNK,.-1
EXTERNAL MTAPE
,MTAPE
5
POINT 7,.-4
REFB+PROCB+UNTYPE
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD MTAPE,0
XWD MTAPE,0
0+INTEGR+VALUE
0+INTEGR+VALUE
ASCII /WORDIN/
0
LINK PDLNK,.-1
EXTERNAL WORDIN
,WORDIN
6
POINT 7,.-5
REFB+PROCB+INTEGR
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD WORDIN,0
XWD WORDIN,0
0+INTEGR+VALUE
ASCII /WORDOUT/
0
LINK PDLNK,.-1
EXTERNAL WORDOUT
,WORDOUT
7
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD WORDOUT,0
XWD WORDOUT,0
0+INTEGR+VALUE
0+UNTYPE+VALUE
ASCII /CVO/
0
LINK PDLNK,.-1
EXTERNAL CVO
,CVO
3
POINT 7,.-4
REFB+PROCB+INTEGR
XWD 2*1,1
0
0
XWD 0,.+4
XWD .-10,0
XWD CVO,0
XWD CVO,0
0+STRING+VALUE
ASCII /USETI/
0
LINK PDLNK,.-1
EXTERNAL USETI
,USETI
5
POINT 7,.-4
REFB+PROCB+UNTYPE
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD USETI,0
XWD USETI,0
0+INTEGR+VALUE
0+INTEGR+VALUE
ASCII /USETO/
0
LINK PDLNK,.-1
EXTERNAL USETO
,USETO
5
POINT 7,.-4
REFB+PROCB+UNTYPE
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD USETO,0
XWD USETO,0
0+INTEGR+VALUE
0+INTEGR+VALUE
ASCII /CVSIX/
0
LINK PDLNK,.-1
EXTERNAL CVSIX
,CVSIX
5
POINT 7,.-4
REFB+PROCB+INTEGR
XWD 2*1,1
0
0
XWD 0,.+4
XWD .-10,0
XWD CVSIX,0
XWD CVSIX,0
0+STRING+VALUE
ASCII /CVFIL/
0
LINK PDLNK,.-1
EXTERNAL CVFIL
,CVFIL
5
POINT 7,.-4
REFB+PROCB+INTEGR
XWD 2*1,3
0
0
XWD 0,.+4
XWD .-10,0
XWD CVFIL,0
XWD CVFIL,0
0+STRING+VALUE
0+INTEGR+REFRNC
0+INTEGR+REFRNC
ASCII /CALL/
0
LINK PDLNK,.-1
EXTERNAL CALL
,CALL
4
POINT 7,.-4
REFB+PROCB+INTEGR
XWD 2*1,2
0
0
XWD 0,.+4
XWD .-10,0
XWD CALL,0
XWD CALL,0
0+INTEGR+VALUE
0+STRING+VALUE
ASCII /RENAME/
0
LINK PDLNK,.-1
EXTERNAL RENAME
,RENAME
6
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*1,4
0
0
XWD 0,.+4
XWD .-10,0
XWD RENAME,0
XWD RENAME,0
0+INTEGR+VALUE
0+STRING+VALUE
0+INTEGR+VALUE
0+INTEGR+REFRNC
ASCII /ERENAME/
0
LINK PDLNK,.-1
EXTERNAL ERENAME
,ERENAME
7
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*1,7
0
0
XWD 0,.+4
XWD .-10,0
XWD ERENAME,0
XWD ERENAME,0
0+INTEGR+VALUE
0+STRING+VALUE
0+INTEGR+VALUE
0+INTEGR+VALUE
0+INTEGR+VALUE
0+INTEGR+VALUE
0+INTEGR+REFRNC
ASCII /EDFILE/
0
LINK PDLNK,.-1
EXTERNAL EDFILE
,EDFILE
6
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*1,4
0
0
XWD 0,.+4
XWD .-10,0
XWD EDFILE,0
XWD EDFILE,0
0+STRING+VALUE
0+INTEGR+VALUE
0+INTEGR+VALUE
0+DEFLT+INTEGR+VALUE
ASCII /CVASC/
0
LINK PDLNK,.-1
EXTERNAL CVASC
,CVASC
5
POINT 7,.-4
REFB+PROCB+INTEGR
XWD 2*1,1
0
0
XWD 0,.+4
XWD .-10,0
XWD CVASC,0
XWD CVASC,0
0+STRING+VALUE
ASCII /CVSTR/
0
LINK PDLNK,.-1
EXTERNAL CVSTR
,CVSTR
5
POINT 7,.-4
REFB+PROCB+STRING
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD CVSTR,0
XWD CVSTR,0
0+INTEGR+VALUE
ASCII /CVASTR/
0
LINK PDLNK,.-1
EXTERNAL CVASTR
,CVASTR
6
POINT 7,.-5
REFB+PROCB+STRING
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD CVASTR,0
XWD CVASTR,0
0+INTEGR+VALUE
ASCII /CVXSTR/
0
LINK PDLNK,.-1
EXTERNAL CVXSTR
,CVXSTR
6
POINT 7,.-5
REFB+PROCB+STRING
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD CVXSTR,0
XWD CVXSTR,0
0+INTEGR+VALUE
ASCII /CV6STR/
0
LINK PDLNK,.-1
EXTERNAL CV6STR
,CV6STR
6
POINT 7,.-5
REFB+PROCB+STRING
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD CV6STR,0
XWD CV6STR,0
0+INTEGR+VALUE
ASCII /SUBSR/
0
LINK PDLNK,.-1
EXTERNAL .SUBSR
,.SUBSR
5
POINT 7,.-4
REFB+PROCB+STRING
XWD 2*1,3
0
0
XWD 0,.+4
XWD .-10,0
XWD .SUBSR,0
XWD .SUBSR,0
0+STRING+VALUE
0+INTEGR+VALUE
0+INTEGR+VALUE
ASCII /SUBST/
0
LINK PDLNK,.-1
EXTERNAL .SUBST
,.SUBST
5
POINT 7,.-4
REFB+PROCB+STRING
XWD 2*1,3
0
0
XWD 0,.+4
XWD .-10,0
XWD .SUBST,0
XWD .SUBST,0
0+STRING+VALUE
0+INTEGR+VALUE
0+INTEGR+VALUE
ASCII /SETBREAK/
0
LINK PDLNK,.-1
EXTERNAL SETBREAK
,SETBREAK
10
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*3,2
0
0
XWD 0,.+4
XWD .-10,0
XWD SETBREAK,0
XWD SETBREAK,0
0+INTEGR+VALUE
0+STRING+VALUE
0+STRING+VALUE
0+STRING+VALUE
ASCII /GETBREAK/
0
LINK PDLNK,.-1
EXTERNAL GETBREAK
,GETBREAK
10
POINT 7,.-5
REFB+PROCB+INTEGR
XWD 2*0,1
0
0
XWD 0,.+4
XWD .-10,0
XWD GETBREAK,0
XWD GETBREAK,0
ASCII /RELBREAK/
0
LINK PDLNK,.-1
EXTERNAL RELBREAK
,RELBREAK
10
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD RELBREAK,0
XWD RELBREAK,0
0+INTEGR+VALUE
ASCII /STDBRK/
0
LINK PDLNK,.-1
EXTERNAL STDBRK
,STDBRK
6
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD STDBRK,0
XWD STDBRK,0
0+INTEGR+VALUE
ASCII /ARRYIN/
0
LINK PDLNK,.-1
EXTERNAL ARRYIN
,ARRYIN
6
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*0,4
0
0
XWD 0,.+4
XWD .-10,0
XWD ARRYIN,0
XWD ARRYIN,0
0+INTEGR+VALUE
0+UNTYPE+REFRNC
0+INTEGR+VALUE
ASCII /ARRYOUT/
0
LINK PDLNK,.-1
EXTERNAL ARRYOUT
,ARRYOUT
7
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*0,4
0
0
XWD 0,.+4
XWD .-10,0
XWD ARRYOUT,0
XWD ARRYOUT,0
0+INTEGR+VALUE
0+UNTYPE+REFRNC
0+INTEGR+VALUE
ASCII /SETFORMAT/
0
LINK PDLNK,.-1
EXTERNAL SETFORMAT
,SETFORMAT
11
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD SETFORMAT,0
XWD SETFORMAT,0
0+INTEGR+VALUE
0+INTEGR+VALUE
ASCII /CVG/
0
LINK PDLNK,.-1
EXTERNAL CVG
,CVG
3
POINT 7,.-4
REFB+PROCB+STRING
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD CVG,0
XWD CVG,0
0+FLOTNG+VALUE
ASCII /CVF/
0
LINK PDLNK,.-1
EXTERNAL CVF
,CVF
3
POINT 7,.-4
REFB+PROCB+STRING
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD CVF,0
XWD CVF,0
0+FLOTNG+VALUE
ASCII /CVE/
0
LINK PDLNK,.-1
EXTERNAL CVE
,CVE
3
POINT 7,.-4
REFB+PROCB+STRING
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD CVE,0
XWD CVE,0
0+FLOTNG+VALUE
ASCII /REALIN/
0
LINK PDLNK,.-1
EXTERNAL REALIN
,REALIN
6
POINT 7,.-5
REFB+PROCB+FLOTNG
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD REALIN,0
XWD REALIN,0
0+INTEGR+VALUE
ASCII /INTIN/
0
LINK PDLNK,.-1
EXTERNAL INTIN
,INTIN
5
POINT 7,.-4
REFB+PROCB+INTEGR
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD INTIN,0
XWD INTIN,0
0+INTEGR+VALUE
ASCII /REALSCAN/
0
LINK PDLNK,.-1
EXTERNAL REALSCAN
,REALSCAN
10
POINT 7,.-5
REFB+PROCB+FLOTNG
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD REALSCAN,0
XWD REALSCAN,0
0+STRING+REFRNC
0+INTEGR+REFRNC
ASCII /INTSCAN/
0
LINK PDLNK,.-1
EXTERNAL INTSCAN
,INTSCAN
7
POINT 7,.-5
REFB+PROCB+INTEGR
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD INTSCAN,0
XWD INTSCAN,0
0+STRING+REFRNC
0+INTEGR+REFRNC
ASCII /ARRINFO/
0
LINK PDLNK,.-1
EXTERNAL ARRINFO
,ARRINFO
7
POINT 7,.-5
REFB+PROCB+INTEGR
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD ARRINFO,0
XWD ARRINFO,0
0+UNTYPE+REFRNC+SBSCRP
0+INTEGR+VALUE
ASCII /ARRBLT/
0
LINK PDLNK,.-1
EXTERNAL ARRBLT
,ARRBLT
6
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*0,4
0
0
XWD 0,.+4
XWD .-10,0
XWD ARRBLT,0
XWD ARRBLT,0
0+UNTYPE+REFRNC
0+UNTYPE+REFRNC
0+INTEGR+VALUE
ASCII /ARRTRAN/
0
LINK PDLNK,.-1
EXTERNAL ARRTRAN
,ARRTRAN
7
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD ARRTRAN,0
XWD ARRTRAN,0
0+UNTYPE+REFRNC+SBSCRP
0+UNTYPE+REFRNC+SBSCRP
ASCII /ARRCLR/
0
LINK PDLNK,.-1
EXTERNAL ARRCLR
,ARRCLR
6
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD ARRCLR,0
XWD ARRCLR,0
0+UNTYPE+REFRNC+SBSCRP
0+DEFLT+UNTYPE+VALUE
ASCII /CODE/
0
LINK PDLNK,.-1
EXTERNAL CODE
,CODE
4
POINT 7,.-4
REFB+PROCB+INTEGR
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD CODE,0
XWD CODE,0
0+INTEGR+VALUE
0+INTEGR+REFRNC
ASCII /USERERR/
0
LINK PDLNK,.-1
EXTERNAL USERERR
,USERERR
7
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*2,3
0
0
XWD 0,.+4
XWD .-10,0
XWD USERERR,0
XWD USERERR,0
0+INTEGR+VALUE
0+INTEGR+VALUE
0+STRING+VALUE
0+DEFLT+STRING+VALUE
ASCII /ERMSBF/
0
LINK PDLNK,.-1
EXTERNAL ERMSBF
,ERMSBF
6
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD ERMSBF,0
XWD ERMSBF,0
0+INTEGR+VALUE
ASCII /CVSI/
0
LINK PDLNK,.-1
EXTERNAL CVSI
,CVSI
4
POINT 7,.-4
REFB+PROCB+ITMVAR
XWD 2*1,2
0
0
XWD 0,.+4
XWD .-10,0
XWD CVSI,0
XWD CVSI,0
0+STRING+VALUE
0+INTEGR+REFRNC
ASCII /CVIS/
0
LINK PDLNK,.-1
EXTERNAL CVIS
,CVIS
4
POINT 7,.-4
REFB+PROCB+STRING
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD CVIS,0
XWD CVIS,0
0+ITMVAR+VALUE
0+INTEGR+REFRNC
ASCII /NEW_PNAME/
0
LINK PDLNK,.-1
EXTERNAL NEW.PNAME
,NEW.PNAME
11
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*1,2
0
0
XWD 0,.+4
XWD .-10,0
XWD NEW.PNAME,0
XWD NEW.PNAME,0
0+ITMVAR+VALUE
0+STRING+VALUE
ASCII /DEL_PNAME/
0
LINK PDLNK,.-1
EXTERNAL DEL.PNAME
,DEL.PNAME
11
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD DEL.PNAME,0
XWD DEL.PNAME,0
0+ITMVAR+VALUE
ASCII /TYPEIT/
0
LINK PDLNK,.-1
EXTERNAL TYPEIT
,TYPEIT
6
POINT 7,.-5
REFB+PROCB+INTEGR
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD TYPEIT,0
XWD TYPEIT,0
0+ITMVAR+VALUE
ASCII /LISTX/
0
LINK PDLNK,.-1
EXTERNAL LISTX
,LISTX
5
POINT 7,.-4
REFB+PROCB+INTEGR
XWD 2*0,4
0
0
XWD 0,.+4
XWD .-10,0
XWD LISTX,0
XWD LISTX,0
0+UNTYPE+VALUE
0+ITMVAR+VALUE
0+INTEGR+VALUE
ASCII /INCHRW/
0
LINK PDLNK,.-1
EXTERNAL INCHRW
,INCHRW
6
POINT 7,.-5
REFB+PROCB+INTEGR
XWD 2*0,1
0
0
XWD 0,.+4
XWD .-10,0
XWD INCHRW,0
XWD INCHRW,0
ASCII /INCHRS/
0
LINK PDLNK,.-1
EXTERNAL INCHRS
,INCHRS
6
POINT 7,.-5
REFB+PROCB+INTEGR
XWD 2*0,1
0
0
XWD 0,.+4
XWD .-10,0
XWD INCHRS,0
XWD INCHRS,0
ASCII /INCHWL/
0
LINK PDLNK,.-1
EXTERNAL INCHWL
,INCHWL
6
POINT 7,.-5
REFB+PROCB+STRING
XWD 2*0,1
0
0
XWD 0,.+4
XWD .-10,0
XWD INCHWL,0
XWD INCHWL,0
ASCII /INCHSL/
0
LINK PDLNK,.-1
EXTERNAL INCHSL
,INCHSL
6
POINT 7,.-5
REFB+PROCB+STRING
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD INCHSL,0
XWD INCHSL,0
0+INTEGR+REFRNC
ASCII /INSTR/
0
LINK PDLNK,.-1
EXTERNAL INSTR
,INSTR
5
POINT 7,.-4
REFB+PROCB+STRING
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD INSTR,0
XWD INSTR,0
0+INTEGR+VALUE
ASCII /INSTRL/
0
LINK PDLNK,.-1
EXTERNAL INSTRL
,INSTRL
6
POINT 7,.-5
REFB+PROCB+STRING
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD INSTRL,0
XWD INSTRL,0
0+INTEGR+VALUE
ASCII /INSTRS/
0
LINK PDLNK,.-1
EXTERNAL INSTRS
,INSTRS
6
POINT 7,.-5
REFB+PROCB+STRING
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD INSTRS,0
XWD INSTRS,0
0+INTEGR+REFRNC
0+INTEGR+VALUE
ASCII /TTYIN/
0
LINK PDLNK,.-1
EXTERNAL TTYIN
,TTYIN
5
POINT 7,.-4
REFB+PROCB+STRING
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD TTYIN,0
XWD TTYIN,0
0+INTEGR+VALUE
0+INTEGR+REFRNC
ASCII /TTYINL/
0
LINK PDLNK,.-1
EXTERNAL TTYINL
,TTYINL
6
POINT 7,.-5
REFB+PROCB+STRING
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD TTYINL,0
XWD TTYINL,0
0+INTEGR+VALUE
0+INTEGR+REFRNC
ASCII /TTYINS/
0
LINK PDLNK,.-1
EXTERNAL TTYINS
,TTYINS
6
POINT 7,.-5
REFB+PROCB+STRING
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD TTYINS,0
XWD TTYINS,0
0+INTEGR+VALUE
0+INTEGR+REFRNC
ASCII /OUTCHR/
0
LINK PDLNK,.-1
EXTERNAL OUTCHR
,OUTCHR
6
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD OUTCHR,0
XWD OUTCHR,0
0+INTEGR+VALUE
ASCII /OUTSTR/
0
LINK PDLNK,.-1
EXTERNAL OUTSTR
,OUTSTR
6
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*1,1
0
0
XWD 0,.+4
XWD .-10,0
XWD OUTSTR,0
XWD OUTSTR,0
0+STRING+VALUE
ASCII /$PRINT/
0
LINK PDLNK,.-1
EXTERNAL $PRINT
,$PRINT
6
POINT 7,.-5
REFB+PROCB+STRING
XWD 2*1,2
0
0
XWD 0,.+4
XWD .-10,0
XWD $PRINT,0
XWD $PRINT,0
0+STRING+VALUE
0+DEFLT+INTEGR+VALUE
ASCII /GETFORMAT/
0
LINK PDLNK,.-1
EXTERNAL GETFORMAT
,GETFORMAT
11
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD GETFORMAT,0
XWD GETFORMAT,0
0+INTEGR+REFRNC
0+INTEGR+REFRNC
ASCII /GETCHAN/
0
LINK PDLNK,.-1
EXTERNAL GETCHAN
,GETCHAN
7
POINT 7,.-5
REFB+PROCB+INTEGR
XWD 2*0,1
0
0
XWD 0,.+4
XWD .-10,0
XWD GETCHAN,0
XWD GETCHAN,0
ASCII /FILEINFO/
0
LINK PDLNK,.-1
EXTERNAL FILEINFO
,FILEINFO
10
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD FILEINFO,0
XWD FILEINFO,0
0+INTEGR+REFRNC+SBSCRP
ASCII /USERCON/
0
LINK PDLNK,.-1
EXTERNAL USERCON
,USERCON
7
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*0,4
0
0
XWD 0,.+4
XWD .-10,0
XWD USERCON,0
XWD USERCON,0
0+INTEGR+REFRNC
0+INTEGR+REFRNC
0+INTEGR+VALUE
ASCII /CHNCDB/
0
LINK PDLNK,.-1
EXTERNAL CHNCDB
,CHNCDB
6
POINT 7,.-5
REFB+PROCB+INTEGR
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD CHNCDB,0
XWD CHNCDB,0
0+INTEGR+VALUE
ASCII /MAINPR/
0
LINK PDLNK,.-1
EXTERNAL MAINPR
,MAINPR
6
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*0,1
0
0
XWD 0,.+4
XWD .-10,0
XWD MAINPR,0
XWD MAINPR,0
ASCII /RESUME/
0
LINK PDLNK,.-1
EXTERNAL RESUME
,RESUME
6
POINT 7,.-5
REFB+PROCB+ITMVAR
XWD 2*0,4
0
0
XWD 0,.+4
XWD .-10,0
XWD RESUME,0
XWD RESUME,0
0+ITMVAR+VALUE
0+DEFLT+ITMVAR+VALUE
0+DEFLT+INTEGR+VALUE
ASCII /ASKNTC/
0
LINK PDLNK,.-1
EXTERNAL ASKNTC
,ASKNTC
6
POINT 7,.-5
REFB+PROCB+ITMVAR
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD ASKNTC,0
XWD ASKNTC,0
0+ITMVAR+VALUE
0+DEFLT+INTEGR+VALUE
ASCII /CAUSE1/
0
LINK PDLNK,.-1
EXTERNAL CAUSE1
,CAUSE1
6
POINT 7,.-5
REFB+PROCB+ITMVAR
XWD 2*0,4
0
0
XWD 0,.+4
XWD .-10,0
XWD CAUSE1,0
XWD CAUSE1,0
0+ITMVAR+VALUE
0+DEFLT+ITMVAR+VALUE
0+DEFLT+INTEGR+VALUE
ASCII /MKEVTT/
0
LINK PDLNK,.-1
EXTERNAL MKEVTT
,MKEVTT
6
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD MKEVTT,0
XWD MKEVTT,0
0+ITMVAR+VALUE
ASCII /JOIN/
0
LINK PDLNK,.-1
EXTERNAL JOIN
,JOIN
4
POINT 7,.-4
REFB+PROCB+UNTYPE
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD JOIN,0
XWD JOIN,0
0+SET+VALUE
ASCII /SUSPEND/
0
LINK PDLNK,.-1
EXTERNAL SUSPEND
,SUSPEND
7
POINT 7,.-5
REFB+PROCB+ITMVAR
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD SUSPEND,0
XWD SUSPEND,0
0+ITMVAR+VALUE
ASCII /TERMINATE/
0
LINK PDLNK,.-1
EXTERNAL TERMINATE
,TERMINATE
11
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD TERMINATE,0
XWD TERMINATE,0
0+ITMVAR+VALUE
ASCII /MYPROC/
0
LINK PDLNK,.-1
EXTERNAL MYPROC
,MYPROC
6
POINT 7,.-5
REFB+PROCB+ITMVAR
XWD 2*0,1
0
0
XWD 0,.+4
XWD .-10,0
XWD MYPROC,0
XWD MYPROC,0
ASCII /CALLER/
0
LINK PDLNK,.-1
EXTERNAL CALLER
,CALLER
6
POINT 7,.-5
REFB+PROCB+ITMVAR
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD CALLER,0
XWD CALLER,0
0+ITMVAR+VALUE
ASCII /INTSET/
0
LINK PDLNK,.-1
EXTERNAL INTSET
,INTSET
6
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD INTSET,0
XWD INTSET,0
0+ITMVAR+VALUE
0+INTEGR+VALUE
ASCII /INTTBL/
0
LINK PDLNK,.-1
EXTERNAL INTTBL
,INTTBL
6
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD INTTBL,0
XWD INTTBL,0
0+INTEGR+VALUE
ASCII /INTMOD/
0
LINK PDLNK,.-1
EXTERNAL INTMOD
,INTMOD
6
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*0,1
0
0
XWD 0,.+4
XWD .-10,0
XWD INTMOD,0
XWD INTMOD,0
ASCII /CLKMOD/
0
LINK PDLNK,.-1
EXTERNAL CLKMOD
,CLKMOD
6
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*0,1
0
0
XWD 0,.+4
XWD .-10,0
XWD CLKMOD,0
XWD CLKMOD,0
ASCII /DFRINT/
0
LINK PDLNK,.-1
EXTERNAL DFRINT
,DFRINT
6
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*0,1
0
0
XWD 0,.+4
XWD .-10,0
XWD DFRINT,0
XWD DFRINT,0
ASCII /DDFINT/
0
LINK PDLNK,.-1
EXTERNAL DDFINT
,DDFINT
6
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*0,1
0
0
XWD 0,.+4
XWD .-10,0
XWD DDFINT,0
XWD DDFINT,0
ASCII /DFR1IN/
0
LINK PDLNK,.-1
EXTERNAL DFR1IN
,DFR1IN
6
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD DFR1IN,0
XWD DFR1IN,0
0+INTEGR+VALUE
ASCII /ENABLE/
0
LINK PDLNK,.-1
EXTERNAL ENABLE
,ENABLE
6
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD ENABLE,0
XWD ENABLE,0
0+INTEGR+VALUE
ASCII /DISABLE/
0
LINK PDLNK,.-1
EXTERNAL DISABLE
,DISABLE
7
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD DISABLE,0
XWD DISABLE,0
0+INTEGR+VALUE
ASCII /INTMAP/
0
LINK PDLNK,.-1
EXTERNAL INTMAP
,INTMAP
6
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*0,4
0
0
XWD 0,.+4
XWD .-10,0
XWD INTMAP,0
XWD INTMAP,0
0+INTEGR+VALUE
0+PROCED+REFRNC
0+INTEGR+VALUE
ASCII /DFCPKT/
0
LINK PDLNK,.-1
EXTERNAL DFCPKT
,DFCPKT
6
POINT 7,.-5
REFB+PROCB+INTEGR
XWD 2*0,5
0
0
XWD 0,.+4
XWD .-10,0
XWD DFCPKT,0
XWD DFCPKT,0
0+INTEGR+VALUE
0+ITMVAR+VALUE
0+ITMVAR+VALUE
0+INTEGR+VALUE
ASCII /URSCHD/
0
LINK PDLNK,.-1
EXTERNAL URSCHD
,URSCHD
6
POINT 7,.-5
REFB+PROCB+INTEGR
XWD 2*0,1
0
0
XWD 0,.+4
XWD .-10,0
XWD URSCHD,0
XWD URSCHD,0
ASCII /PRISET/
0
LINK PDLNK,.-1
EXTERNAL PRISET
,PRISET
6
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD PRISET,0
XWD PRISET,0
0+ITMVAR+VALUE
0+INTEGR+VALUE
ASCII /PSTATUS/
0
LINK PDLNK,.-1
EXTERNAL PSTATUS
,PSTATUS
7
POINT 7,.-5
REFB+PROCB+INTEGR
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD PSTATUS,0
XWD PSTATUS,0
0+ITMVAR+VALUE
ASCII /INTPRO/
0
LINK PDLNK,.-1
EXTERNAL INTPRO
,INTPRO
6
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*0,1
0
0
XWD 0,.+4
XWD .-10,0
XWD INTPRO,0
XWD INTPRO,0
ASCII /ANSWER/
0
LINK PDLNK,.-1
EXTERNAL ANSWER
,ANSWER
6
POINT 7,.-5
REFB+PROCB+INTEGR
XWD 2*0,4
0
0
XWD 0,.+4
XWD .-10,0
XWD ANSWER,0
XWD ANSWER,0
0+ITMVAR+VALUE
0+ITMVAR+VALUE
0+ITMVAR+VALUE
ASCII /LOG/
0
LINK PDLNK,.-1
EXTERNAL LOG$
,LOG$
3
POINT 7,.-4
REFB+PROCB+FLOTNG
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD LOG$,0
XWD LOG$,0
0+FLOTNG+VALUE
ASCII /EXP/
0
LINK PDLNK,.-1
EXTERNAL EXP$
,EXP$
3
POINT 7,.-4
REFB+PROCB+FLOTNG
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD EXP$,0
XWD EXP$,0
0+FLOTNG+VALUE
ASCII /SIN/
0
LINK PDLNK,.-1
EXTERNAL SIN$
,SIN$
3
POINT 7,.-4
REFB+PROCB+FLOTNG
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD SIN$,0
XWD SIN$,0
0+FLOTNG+VALUE
ASCII /SIND/
0
LINK PDLNK,.-1
EXTERNAL SIND$
,SIND$
4
POINT 7,.-4
REFB+PROCB+FLOTNG
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD SIND$,0
XWD SIND$,0
0+FLOTNG+VALUE
ASCII /COS/
0
LINK PDLNK,.-1
EXTERNAL COS$
,COS$
3
POINT 7,.-4
REFB+PROCB+FLOTNG
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD COS$,0
XWD COS$,0
0+FLOTNG+VALUE
ASCII /COSD/
0
LINK PDLNK,.-1
EXTERNAL COSD$
,COSD$
4
POINT 7,.-4
REFB+PROCB+FLOTNG
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD COSD$,0
XWD COSD$,0
0+FLOTNG+VALUE
ASCII /SQRT/
0
LINK PDLNK,.-1
EXTERNAL SQRT$
,SQRT$
4
POINT 7,.-4
REFB+PROCB+FLOTNG
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD SQRT$,0
XWD SQRT$,0
0+FLOTNG+VALUE
ASCII /ATAN2/
0
LINK PDLNK,.-1
EXTERNAL ATAN2$
,ATAN2$
5
POINT 7,.-4
REFB+PROCB+FLOTNG
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD ATAN2$,0
XWD ATAN2$,0
0+FLOTNG+VALUE
0+FLOTNG+VALUE
ASCII /ATAN/
0
LINK PDLNK,.-1
EXTERNAL ATAN$
,ATAN$
4
POINT 7,.-4
REFB+PROCB+FLOTNG
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD ATAN$,0
XWD ATAN$,0
0+FLOTNG+VALUE
ASCII /ACOS/
0
LINK PDLNK,.-1
EXTERNAL ACOS$
,ACOS$
4
POINT 7,.-4
REFB+PROCB+FLOTNG
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD ACOS$,0
XWD ACOS$,0
0+FLOTNG+VALUE
ASCII /ASIN/
0
LINK PDLNK,.-1
EXTERNAL ASIN$
,ASIN$
4
POINT 7,.-4
REFB+PROCB+FLOTNG
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD ASIN$,0
XWD ASIN$,0
0+FLOTNG+VALUE
ASCII /TANH/
0
LINK PDLNK,.-1
EXTERNAL TANH$
,TANH$
4
POINT 7,.-4
REFB+PROCB+FLOTNG
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD TANH$,0
XWD TANH$,0
0+FLOTNG+VALUE
ASCII /COSH/
0
LINK PDLNK,.-1
EXTERNAL COSH$
,COSH$
4
POINT 7,.-4
REFB+PROCB+FLOTNG
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD COSH$,0
XWD COSH$,0
0+FLOTNG+VALUE
ASCII /SINH/
0
LINK PDLNK,.-1
EXTERNAL SINH$
,SINH$
4
POINT 7,.-4
REFB+PROCB+FLOTNG
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD SINH$,0
XWD SINH$,0
0+FLOTNG+VALUE
ASCII /RAN/
0
LINK PDLNK,.-1
EXTERNAL RAN$
,RAN$
3
POINT 7,.-4
REFB+PROCB+FLOTNG
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD RAN$,0
XWD RAN$,0
0+INTEGR+VALUE
ASCII /TRIGINI/
0
LINK PDLNK,.-1
EXTERNAL TRIGINI
,TRIGINI
7
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD TRIGINI,0
XWD TRIGINI,0
0+INTEGR+VALUE
ASCII /GETSTS/
0
LINK PDLNK,.-1
EXTERNAL GETSTS
,GETSTS
6
POINT 7,.-5
REFB+PROCB+INTEGR
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD GETSTS,0
XWD GETSTS,0
0+INTEGR+VALUE
ASCII /SETSTS/
0
LINK PDLNK,.-1
EXTERNAL SETSTS
,SETSTS
6
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD SETSTS,0
XWD SETSTS,0
0+INTEGR+VALUE
0+INTEGR+VALUE
ASCII /INOUT/
0
LINK PDLNK,.-1
EXTERNAL INOUT
,INOUT
5
POINT 7,.-4
REFB+PROCB+UNTYPE
XWD 2*0,4
0
0
XWD 0,.+4
XWD .-10,0
XWD INOUT,0
XWD INOUT,0
0+INTEGR+VALUE
0+INTEGR+VALUE
0+INTEGR+VALUE
ASCII /TTYUP/
0
LINK PDLNK,.-1
EXTERNAL TTYUP
,TTYUP
5
POINT 7,.-4
REFB+PROCB+INTEGR
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD TTYUP,0
XWD TTYUP,0
0+INTEGR+VALUE
ASCII /CLRBUF/
0
LINK PDLNK,.-1
EXTERNAL CLRBUF
,CLRBUF
6
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*0,1
0
0
XWD 0,.+4
XWD .-10,0
XWD CLRBUF,0
XWD CLRBUF,0
ASCII /CVJFN/
0
LINK PDLNK,.-1
EXTERNAL CVJFN
,CVJFN
5
POINT 7,.-4
REFB+PROCB+INTEGR
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD CVJFN,0
XWD CVJFN,0
0+INTEGR+VALUE
ASCII /ODTIM/
0
LINK PDLNK,.-1
EXTERNAL ODTIM
,ODTIM
5
POINT 7,.-4
REFB+PROCB+STRING
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD ODTIM,0
XWD ODTIM,0
0+INTEGR+VALUE
0+INTEGR+VALUE
ASCII /IDTIM/
0
LINK PDLNK,.-1
EXTERNAL IDTIM
,IDTIM
5
POINT 7,.-4
REFB+PROCB+INTEGR
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD IDTIM,0
XWD IDTIM,0
0+STRING+VALUE
ASCII /RUNTM/
0
LINK PDLNK,.-1
EXTERNAL RUNTM
,RUNTM
5
POINT 7,.-4
REFB+PROCB+INTEGR
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD RUNTM,0
XWD RUNTM,0
0+INTEGR+VALUE
0+INTEGR+REFRNC
ASCII /GTAD/
0
LINK PDLNK,.-1
EXTERNAL GTAD
,GTAD
4
POINT 7,.-4
REFB+PROCB+INTEGR
XWD 2*0,1
0
0
XWD 0,.+4
XWD .-10,0
XWD GTAD,0
XWD GTAD,0
ASCII /GJINF/
0
LINK PDLNK,.-1
EXTERNAL GJINF
,GJINF
5
POINT 7,.-4
REFB+PROCB+INTEGR
XWD 2*0,4
0
0
XWD 0,.+4
XWD .-10,0
XWD GJINF,0
XWD GJINF,0
0+INTEGR+REFRNC
0+INTEGR+REFRNC
0+INTEGR+REFRNC
ASCII /STDIR/
0
LINK PDLNK,.-1
EXTERNAL STDIR
,STDIR
5
POINT 7,.-4
REFB+PROCB+INTEGR
XWD 2*1,2
0
0
XWD 0,.+4
XWD .-10,0
XWD STDIR,0
XWD STDIR,0
0+STRING+VALUE
0+INTEGR+VALUE
ASCII /DIRST/
0
LINK PDLNK,.-1
EXTERNAL DIRST
,DIRST
5
POINT 7,.-4
REFB+PROCB+STRING
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD DIRST,0
XWD DIRST,0
0+INTEGR+VALUE
ASCII /RUNPRG/
0
LINK PDLNK,.-1
EXTERNAL RUNPRG
,RUNPRG
6
POINT 7,.-5
REFB+PROCB+INTEGR
XWD 2*1,3
0
0
XWD 0,.+4
XWD .-10,0
XWD RUNPRG,0
XWD RUNPRG,0
0+STRING+VALUE
0+INTEGR+VALUE
0+INTEGR+VALUE
ASCII /OPENFILE/
0
LINK PDLNK,.-1
EXTERNAL OPENFILE
,OPENFILE
10
POINT 7,.-5
REFB+PROCB+INTEGR
XWD 2*2,1
0
0
XWD 0,.+4
XWD .-10,0
XWD OPENFILE,0
XWD OPENFILE,0
0+STRING+VALUE
0+STRING+VALUE
ASCII /SETINPUT/
0
LINK PDLNK,.-1
EXTERNAL SETINPUT
,SETINPUT
10
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*0,5
0
0
XWD 0,.+4
XWD .-10,0
XWD SETINPUT,0
XWD SETINPUT,0
0+INTEGR+VALUE
0+INTEGR+REFRNC
0+INTEGR+REFRNC
0+INTEGR+REFRNC
ASCII /INDEXFILE/
0
LINK PDLNK,.-1
EXTERNAL INDEXFILE
,INDEXFILE
11
POINT 7,.-5
REFB+PROCB+INTEGR
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD INDEXFILE,0
XWD INDEXFILE,0
0+INTEGR+VALUE
ASCII /SETCHAN/
0
LINK PDLNK,.-1
EXTERNAL SETCHAN
,SETCHAN
7
POINT 7,.-5
REFB+PROCB+INTEGR
XWD 2*0,4
0
0
XWD 0,.+4
XWD .-10,0
XWD SETCHAN,0
XWD SETCHAN,0
0+INTEGR+VALUE
0+INTEGR+VALUE
0+INTEGR+VALUE
ASCII /GTJFN/
0
LINK PDLNK,.-1
EXTERNAL GTJFN
,GTJFN
5
POINT 7,.-4
REFB+PROCB+INTEGR
XWD 2*1,2
0
0
XWD 0,.+4
XWD .-10,0
XWD GTJFN,0
XWD GTJFN,0
0+STRING+VALUE
0+INTEGR+VALUE
ASCII /GTJFNL/
0
LINK PDLNK,.-1
EXTERNAL GTJFNL
,GTJFNL
6
POINT 7,.-5
REFB+PROCB+INTEGR
XWD 2*7,4
0
0
XWD 0,.+4
XWD .-10,0
XWD GTJFNL,0
XWD GTJFNL,0
0+STRING+VALUE
0+INTEGR+VALUE
0+INTEGR+VALUE
0+STRING+VALUE
0+STRING+VALUE
0+STRING+VALUE
0+STRING+VALUE
0+STRING+VALUE
0+STRING+VALUE
0+INTEGR+VALUE
ASCII /GNJFN/
0
LINK PDLNK,.-1
EXTERNAL GNJFN
,GNJFN
5
POINT 7,.-4
REFB+PROCB+INTEGR
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD GNJFN,0
XWD GNJFN,0
0+INTEGR+VALUE
ASCII /DELF/
0
LINK PDLNK,.-1
EXTERNAL DELF
,DELF
4
POINT 7,.-4
REFB+PROCB+UNTYPE
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD DELF,0
XWD DELF,0
0+INTEGR+VALUE
ASCII /DELNF/
0
LINK PDLNK,.-1
EXTERNAL DELNF
,DELNF
5
POINT 7,.-4
REFB+PROCB+INTEGR
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD DELNF,0
XWD DELNF,0
0+INTEGR+VALUE
0+INTEGR+VALUE
ASCII /UNDELETE/
0
LINK PDLNK,.-1
EXTERNAL UNDELETE
,UNDELETE
10
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD UNDELETE,0
XWD UNDELETE,0
0+INTEGR+VALUE
ASCII /SIZEF/
0
LINK PDLNK,.-1
EXTERNAL SIZEF
,SIZEF
5
POINT 7,.-4
REFB+PROCB+INTEGR
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD SIZEF,0
XWD SIZEF,0
0+INTEGR+VALUE
ASCII /JFNS/
0
LINK PDLNK,.-1
EXTERNAL JFNS
,JFNS
4
POINT 7,.-4
REFB+PROCB+STRING
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD JFNS,0
XWD JFNS,0
0+INTEGR+VALUE
0+INTEGR+VALUE
ASCII /OPENF/
0
LINK PDLNK,.-1
EXTERNAL OPENF
,OPENF
5
POINT 7,.-4
REFB+PROCB+UNTYPE
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD OPENF,0
XWD OPENF,0
0+INTEGR+VALUE
0+INTEGR+VALUE
ASCII /CFILE/
0
LINK PDLNK,.-1
EXTERNAL CFILE
,CFILE
5
POINT 7,.-4
REFB+PROCB+INTEGR
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD CFILE,0
XWD CFILE,0
0+INTEGR+VALUE
ASCII /CLOSF/
0
LINK PDLNK,.-1
EXTERNAL CLOSF
,CLOSF
5
POINT 7,.-4
REFB+PROCB+UNTYPE
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD CLOSF,0
XWD CLOSF,0
0+INTEGR+VALUE
ASCII /RLJFN/
0
LINK PDLNK,.-1
EXTERNAL RLJFN
,RLJFN
5
POINT 7,.-4
REFB+PROCB+UNTYPE
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD RLJFN,0
XWD RLJFN,0
0+INTEGR+VALUE
ASCII /GTSTS/
0
LINK PDLNK,.-1
EXTERNAL GTSTS
,GTSTS
5
POINT 7,.-4
REFB+PROCB+INTEGR
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD GTSTS,0
XWD GTSTS,0
0+INTEGR+VALUE
ASCII /STSTS/
0
LINK PDLNK,.-1
EXTERNAL STSTS
,STSTS
5
POINT 7,.-4
REFB+PROCB+INTEGR
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD STSTS,0
XWD STSTS,0
0+INTEGR+VALUE
0+INTEGR+VALUE
ASCII /RNAMF/
0
LINK PDLNK,.-1
EXTERNAL RNAMF
,RNAMF
5
POINT 7,.-4
REFB+PROCB+INTEGR
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD RNAMF,0
XWD RNAMF,0
0+INTEGR+VALUE
0+INTEGR+VALUE
ASCII /CNDIR/
0
LINK PDLNK,.-1
EXTERNAL CNDIR
,CNDIR
5
POINT 7,.-4
REFB+PROCB+INTEGR
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD CNDIR,0
XWD CNDIR,0
0+INTEGR+VALUE
0+STRING+VALUE
ASCII /ASND/
0
LINK PDLNK,.-1
EXTERNAL ASND
,ASND
4
POINT 7,.-4
REFB+PROCB+INTEGR
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD ASND,0
XWD ASND,0
0+INTEGR+VALUE
ASCII /RELD/
0
LINK PDLNK,.-1
EXTERNAL RELD
,RELD
4
POINT 7,.-4
REFB+PROCB+INTEGR
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD RELD,0
XWD RELD,0
0+INTEGR+VALUE
ASCII /GDSTS/
0
LINK PDLNK,.-1
EXTERNAL GDSTS
,GDSTS
5
POINT 7,.-4
REFB+PROCB+INTEGR
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD GDSTS,0
XWD GDSTS,0
0+INTEGR+VALUE
0+INTEGR+REFRNC
ASCII /SDSTS/
0
LINK PDLNK,.-1
EXTERNAL SDSTS
,SDSTS
5
POINT 7,.-4
REFB+PROCB+INTEGR
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD SDSTS,0
XWD SDSTS,0
0+INTEGR+VALUE
0+INTEGR+VALUE
ASCII /STDEV/
0
LINK PDLNK,.-1
EXTERNAL STDEV
,STDEV
5
POINT 7,.-4
REFB+PROCB+INTEGR
XWD 2*1,1
0
0
XWD 0,.+4
XWD .-10,0
XWD STDEV,0
XWD STDEV,0
0+STRING+VALUE
ASCII /DEVST/
0
LINK PDLNK,.-1
EXTERNAL DEVST
,DEVST
5
POINT 7,.-4
REFB+PROCB+STRING
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD DEVST,0
XWD DEVST,0
0+INTEGR+VALUE
ASCII /CHAROUT/
0
LINK PDLNK,.-1
EXTERNAL CHAROUT
,CHAROUT
7
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD CHAROUT,0
XWD CHAROUT,0
0+INTEGR+VALUE
0+INTEGR+VALUE
ASCII /GTFDB/
0
LINK PDLNK,.-1
EXTERNAL GTFDB
,GTFDB
5
POINT 7,.-4
REFB+PROCB+UNTYPE
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD GTFDB,0
XWD GTFDB,0
0+INTEGR+VALUE
0+INTEGR+REFRNC+SBSCRP
ASCII /CHFDB/
0
LINK PDLNK,.-1
EXTERNAL CHFDB
,CHFDB
5
POINT 7,.-4
REFB+PROCB+UNTYPE
XWD 2*0,5
0
0
XWD 0,.+4
XWD .-10,0
XWD CHFDB,0
XWD CHFDB,0
0+INTEGR+VALUE
0+INTEGR+VALUE
0+INTEGR+VALUE
0+INTEGR+VALUE
ASCII /MTOPR/
0
LINK PDLNK,.-1
EXTERNAL MTOPR
,MTOPR
5
POINT 7,.-4
REFB+PROCB+UNTYPE
XWD 2*0,4
0
0
XWD 0,.+4
XWD .-10,0
XWD MTOPR,0
XWD MTOPR,0
0+INTEGR+VALUE
0+INTEGR+VALUE
0+INTEGR+VALUE
ASCII /SFPTR/
0
LINK PDLNK,.-1
EXTERNAL SFPTR
,SFPTR
5
POINT 7,.-4
REFB+PROCB+UNTYPE
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD SFPTR,0
XWD SFPTR,0
0+INTEGR+VALUE
0+INTEGR+VALUE
ASCII /RFPTR/
0
LINK PDLNK,.-1
EXTERNAL RFPTR
,RFPTR
5
POINT 7,.-4
REFB+PROCB+INTEGR
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD RFPTR,0
XWD RFPTR,0
0+INTEGR+VALUE
ASCII /RCHPTR/
0
LINK PDLNK,.-1
EXTERNAL RCHPTR
,RCHPTR
6
POINT 7,.-5
REFB+PROCB+INTEGR
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD RCHPTR,0
XWD RCHPTR,0
0+INTEGR+VALUE
ASCII /SCHPTR/
0
LINK PDLNK,.-1
EXTERNAL SCHPTR
,SCHPTR
6
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD SCHPTR,0
XWD SCHPTR,0
0+INTEGR+VALUE
0+INTEGR+VALUE
ASCII /RWDPTR/
0
LINK PDLNK,.-1
EXTERNAL RWDPTR
,RWDPTR
6
POINT 7,.-5
REFB+PROCB+INTEGR
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD RWDPTR,0
XWD RWDPTR,0
0+INTEGR+VALUE
ASCII /SWDPTR/
0
LINK PDLNK,.-1
EXTERNAL SWDPTR
,SWDPTR
6
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD SWDPTR,0
XWD SWDPTR,0
0+INTEGR+VALUE
0+INTEGR+VALUE
ASCII /BKJFN/
0
LINK PDLNK,.-1
EXTERNAL BKJFN
,BKJFN
5
POINT 7,.-4
REFB+PROCB+UNTYPE
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD BKJFN,0
XWD BKJFN,0
0+INTEGR+VALUE
ASCII /RFBSZ/
0
LINK PDLNK,.-1
EXTERNAL RFBSZ
,RFBSZ
5
POINT 7,.-4
REFB+PROCB+INTEGR
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD RFBSZ,0
XWD RFBSZ,0
0+INTEGR+VALUE
ASCII /DEVTYPE/
0
LINK PDLNK,.-1
EXTERNAL DEVTYPE
,DEVTYPE
7
POINT 7,.-5
REFB+PROCB+INTEGR
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD DEVTYPE,0
XWD DEVTYPE,0
0+INTEGR+VALUE
ASCII /DVCHR/
0
LINK PDLNK,.-1
EXTERNAL DVCHR
,DVCHR
5
POINT 7,.-4
REFB+PROCB+INTEGR
XWD 2*0,4
0
0
XWD 0,.+4
XWD .-10,0
XWD DVCHR,0
XWD DVCHR,0
0+INTEGR+VALUE
0+INTEGR+REFRNC
0+INTEGR+REFRNC
ASCII /ERSTR/
0
LINK PDLNK,.-1
EXTERNAL ERSTR
,ERSTR
5
POINT 7,.-4
REFB+PROCB+INTEGR
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD ERSTR,0
XWD ERSTR,0
0+INTEGR+VALUE
0+INTEGR+VALUE
ASCII /RFMOD/
0
LINK PDLNK,.-1
EXTERNAL RFMOD
,RFMOD
5
POINT 7,.-4
REFB+PROCB+INTEGR
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD RFMOD,0
XWD RFMOD,0
0+INTEGR+VALUE
ASCII /SFMOD/
0
LINK PDLNK,.-1
EXTERNAL SFMOD
,SFMOD
5
POINT 7,.-4
REFB+PROCB+UNTYPE
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD SFMOD,0
XWD SFMOD,0
0+INTEGR+VALUE
0+INTEGR+VALUE
ASCII /RFCOC/
0
LINK PDLNK,.-1
EXTERNAL RFCOC
,RFCOC
5
POINT 7,.-4
REFB+PROCB+UNTYPE
XWD 2*0,4
0
0
XWD 0,.+4
XWD .-10,0
XWD RFCOC,0
XWD RFCOC,0
0+INTEGR+VALUE
0+INTEGR+REFRNC
0+INTEGR+REFRNC
ASCII /SFCOC/
0
LINK PDLNK,.-1
EXTERNAL SFCOC
,SFCOC
5
POINT 7,.-4
REFB+PROCB+UNTYPE
XWD 2*0,4
0
0
XWD 0,.+4
XWD .-10,0
XWD SFCOC,0
XWD SFCOC,0
0+INTEGR+VALUE
0+INTEGR+VALUE
0+INTEGR+VALUE
ASCII /STPAR/
0
LINK PDLNK,.-1
EXTERNAL STPAR
,STPAR
5
POINT 7,.-4
REFB+PROCB+UNTYPE
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD STPAR,0
XWD STPAR,0
0+INTEGR+VALUE
0+INTEGR+VALUE
ASCII /STI/
0
LINK PDLNK,.-1
EXTERNAL STI
,STI
3
POINT 7,.-4
REFB+PROCB+UNTYPE
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD STI,0
XWD STI,0
0+INTEGR+VALUE
0+INTEGR+VALUE
ASCII /GTTYP/
0
LINK PDLNK,.-1
EXTERNAL GTTYP
,GTTYP
5
POINT 7,.-4
REFB+PROCB+INTEGR
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD GTTYP,0
XWD GTTYP,0
0+INTEGR+VALUE
0+INTEGR+REFRNC
ASCII /SETEDIT/
0
LINK PDLNK,.-1
EXTERNAL SETEDIT
,SETEDIT
7
POINT 7,.-5
REFB+PROCB+INTEGR
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD SETEDIT,0
XWD SETEDIT,0
0+INTEGR+VALUE
0+INTEGR+VALUE
ASCII /STTYP/
0
LINK PDLNK,.-1
EXTERNAL STTYP
,STTYP
5
POINT 7,.-4
REFB+PROCB+UNTYPE
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD STTYP,0
XWD STTYP,0
0+INTEGR+VALUE
0+INTEGR+VALUE
ASCII /PMAP/
0
LINK PDLNK,.-1
EXTERNAL PMAP
,PMAP
4
POINT 7,.-4
REFB+PROCB+UNTYPE
XWD 2*0,4
0
0
XWD 0,.+4
XWD .-10,0
XWD PMAP,0
XWD PMAP,0
0+INTEGR+VALUE
0+INTEGR+VALUE
0+INTEGR+VALUE
ASCII /INTTY/
0
LINK PDLNK,.-1
EXTERNAL INTTY
,INTTY
5
POINT 7,.-4
REFB+PROCB+STRING
XWD 2*0,1
0
0
XWD 0,.+4
XWD .-10,0
XWD INTTY,0
XWD INTTY,0
ASCII /PBIN/
0
LINK PDLNK,.-1
EXTERNAL PBIN
,PBIN
4
POINT 7,.-4
REFB+PROCB+INTEGR
XWD 2*0,1
0
0
XWD 0,.+4
XWD .-10,0
XWD PBIN,0
XWD PBIN,0
ASCII /PBOUT/
0
LINK PDLNK,.-1
EXTERNAL PBOUT
,PBOUT
5
POINT 7,.-4
REFB+PROCB+UNTYPE
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD PBOUT,0
XWD PBOUT,0
0+INTEGR+VALUE
ASCII /PSOUT/
0
LINK PDLNK,.-1
EXTERNAL PSOUT
,PSOUT
5
POINT 7,.-4
REFB+PROCB+UNTYPE
XWD 2*1,1
0
0
XWD 0,.+4
XWD .-10,0
XWD PSOUT,0
XWD PSOUT,0
0+STRING+VALUE
ASCII /CHARIN/
0
LINK PDLNK,.-1
EXTERNAL CHARIN
,CHARIN
6
POINT 7,.-5
REFB+PROCB+INTEGR
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD CHARIN,0
XWD CHARIN,0
0+INTEGR+VALUE
ASCII /SINI/
0
LINK PDLNK,.-1
EXTERNAL SINI
,SINI
4
POINT 7,.-4
REFB+PROCB+STRING
XWD 2*0,4
0
0
XWD 0,.+4
XWD .-10,0
XWD SINI,0
XWD SINI,0
0+INTEGR+VALUE
0+INTEGR+VALUE
0+INTEGR+VALUE
ASCII /ATI/
0
LINK PDLNK,.-1
EXTERNAL ATI
,ATI
3
POINT 7,.-4
REFB+PROCB+UNTYPE
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD ATI,0
XWD ATI,0
0+INTEGR+VALUE
0+INTEGR+VALUE
ASCII /DTI/
0
LINK PDLNK,.-1
EXTERNAL DTI
,DTI
3
POINT 7,.-4
REFB+PROCB+UNTYPE
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD DTI,0
XWD DTI,0
0+INTEGR+VALUE
ASCII /RTIW/
0
LINK PDLNK,.-1
EXTERNAL RTIW
,RTIW
4
POINT 7,.-4
REFB+PROCB+INTEGR
XWD 2*0,4
0
0
XWD 0,.+4
XWD .-10,0
XWD RTIW,0
XWD RTIW,0
0+INTEGR+VALUE
0+INTEGR+REFRNC
0+INTEGR+REFRNC
ASCII /STIW/
0
LINK PDLNK,.-1
EXTERNAL STIW
,STIW
4
POINT 7,.-4
REFB+PROCB+INTEGR
XWD 2*0,4
0
0
XWD 0,.+4
XWD .-10,0
XWD STIW,0
XWD STIW,0
0+INTEGR+VALUE
0+INTEGR+VALUE
0+INTEGR+VALUE
ASCII /GTRPW/
0
LINK PDLNK,.-1
EXTERNAL GTRPW
,GTRPW
5
POINT 7,.-4
REFB+PROCB+INTEGR
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD GTRPW,0
XWD GTRPW,0
0+INTEGR+VALUE
0+INTEGR+REFRNC
ASCII /PSIMAP/
0
LINK PDLNK,.-1
EXTERNAL PSIMAP
,PSIMAP
6
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*0,5
0
0
XWD 0,.+4
XWD .-10,0
XWD PSIMAP,0
XWD PSIMAP,0
0+INTEGR+VALUE
0+PROCED+REFRNC
0+INTEGR+VALUE
0+INTEGR+VALUE
ASCII /PSIDISMS/
0
LINK PDLNK,.-1
EXTERNAL PSIDISMS
,PSIDISMS
10
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD PSIDISMS,0
XWD PSIDISMS,0
0+INTEGR+VALUE
0+INTEGR+VALUE
ASCII /PSIRUNTM/
0
LINK PDLNK,.-1
EXTERNAL PSIRUNTM
,PSIRUNTM
10
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*0,0¬
0
0
XWD 0,.+4
XWD .-10,0
XWD PSIRUNTM,0
XWD PSIRUNTM,0
0+INTEGR+VALUE
0+INTEGR+VALUE
ASCII /KPSITIME/
0
LINK PDLNK,.-1
EXTERNAL KPSITIME
,KPSITIME
10
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD KPSITIME,0
XWD KPSITIME,0
0+INTEGR+VALUE
ASCII /DSKIN/
0
LINK PDLNK,.-1
EXTERNAL DSKIN
,DSKIN
5
POINT 7,.-4
REFB+PROCB+UNTYPE
XWD 2*0,5
0
0
XWD 0,.+4
XWD .-10,0
XWD DSKIN,0
XWD DSKIN,0
0+INTEGR+VALUE
0+INTEGR+VALUE
0+INTEGR+VALUE
0+UNTYPE+REFRNC
ASCII /DSKOUT/
0
LINK PDLNK,.-1
EXTERNAL DSKOUT
,DSKOUT
6
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*0,5
0
0
XWD 0,.+4
XWD .-10,0
XWD DSKOUT,0
XWD DSKOUT,0
0+INTEGR+VALUE
0+INTEGR+VALUE
0+INTEGR+VALUE
0+UNTYPE+REFRNC
ASCII /PBTIN/
0
LINK PDLNK,.-1
EXTERNAL PBTIN
,PBTIN
5
POINT 7,.-4
REFB+PROCB+INTEGR
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD PBTIN,0
XWD PBTIN,0
0+INTEGR+VALUE
ASCII /PTYGET/
0
LINK PDLNK,.-1
EXTERNAL PTYGET
,PTYGET
6
POINT 7,.-5
REFB+PROCB+INTEGR
XWD 2*0,1
0
0
XWD 0,.+4
XWD .-10,0
XWD PTYGET,0
XWD PTYGET,0
ASCII /PTYREL/
0
LINK PDLNK,.-1
EXTERNAL PTYREL
,PTYREL
6
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD PTYREL,0
XWD PTYREL,0
0+INTEGR+VALUE
ASCII /PTYGTL/
0
LINK PDLNK,.-1
EXTERNAL PTYGTL
,PTYGTL
6
POINT 7,.-5
REFB+PROCB+INTEGR
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD PTYGTL,0
XWD PTYGTL,0
0+INTEGR+VALUE
ASCII /PTYSTL/
0
LINK PDLNK,.-1
EXTERNAL PTYSTL
,PTYSTL
6
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD PTYSTL,0
XWD PTYSTL,0
0+INTEGR+VALUE
0+INTEGR+VALUE
ASCII /PTIFRE/
0
LINK PDLNK,.-1
EXTERNAL PTIFRE
,PTIFRE
6
POINT 7,.-5
REFB+PROCB+INTEGR
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD PTIFRE,0
XWD PTIFRE,0
0+INTEGR+VALUE
ASCII /PTOCNT/
0
LINK PDLNK,.-1
EXTERNAL PTOCNT
,PTOCNT
6
POINT 7,.-5
REFB+PROCB+INTEGR
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD PTOCNT,0
XWD PTOCNT,0
0+INTEGR+VALUE
ASCII /PTCHRW/
0
LINK PDLNK,.-1
EXTERNAL PTCHRW
,PTCHRW
6
POINT 7,.-5
REFB+PROCB+INTEGR
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD PTCHRW,0
XWD PTCHRW,0
0+INTEGR+VALUE
ASCII /PTCHRS/
0
LINK PDLNK,.-1
EXTERNAL PTCHRS
,PTCHRS
6
POINT 7,.-5
REFB+PROCB+INTEGR
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD PTCHRS,0
XWD PTCHRS,0
0+INTEGR+VALUE
ASCII /PTOCHS/
0
LINK PDLNK,.-1
EXTERNAL PTOCHS
,PTOCHS
6
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD PTOCHS,0
XWD PTOCHS,0
0+INTEGR+VALUE
0+INTEGR+VALUE
ASCII /PTOCHW/
0
LINK PDLNK,.-1
EXTERNAL PTOCHW
,PTOCHW
6
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD PTOCHW,0
XWD PTOCHW,0
0+INTEGR+VALUE
0+INTEGR+VALUE
ASCII /PTOSTR/
0
LINK PDLNK,.-1
EXTERNAL PTOSTR
,PTOSTR
6
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*1,2
0
0
XWD 0,.+4
XWD .-10,0
XWD PTOSTR,0
XWD PTOSTR,0
0+INTEGR+VALUE
0+STRING+VALUE
ASCII /BACKUP/
0
LINK PDLNK,.-1
EXTERNAL BACKUP
,BACKUP
6
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*0,1
0
0
XWD 0,.+4
XWD .-10,0
XWD BACKUP,0
XWD BACKUP,0
ASCII /LODED/
0
LINK PDLNK,.-1
EXTERNAL LODED
,LODED
5
POINT 7,.-4
REFB+PROCB+UNTYPE
XWD 2*1,1
0
0
XWD 0,.+4
XWD .-10,0
XWD LODED,0
XWD LODED,0
0+STRING+VALUE
ASCII /PTYALL/
0
LINK PDLNK,.-1
EXTERNAL PTYALL
,PTYALL
6
POINT 7,.-5
REFB+PROCB+STRING
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD PTYALL,0
XWD PTYALL,0
0+INTEGR+VALUE
ASCII /PTYSTR/
0
LINK PDLNK,.-1
EXTERNAL PTYSTR
,PTYSTR
6
POINT 7,.-5
REFB+PROCB+STRING
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD PTYSTR,0
XWD PTYSTR,0
0+INTEGR+VALUE
0+INTEGR+VALUE
ASCII /PTYIN/
0
LINK PDLNK,.-1
EXTERNAL PTYIN
,PTYIN
5
POINT 7,.-4
REFB+PROCB+STRING
XWD 2*0,4
0
0
XWD 0,.+4
XWD .-10,0
XWD PTYIN,0
XWD PTYIN,0
0+INTEGR+VALUE
0+INTEGR+VALUE
0+INTEGR+REFRNC
ASCII /IFGLOBAL/
0
LINK PDLNK,.-1
EXTERNAL IFGLOBAL
,IFGLOBAL
10
POINT 7,.-5
REFB+PROCB+INTEGR
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD IFGLOBAL,0
XWD IFGLOBAL,0
0+ITMVAR+VALUE
ASCII /ISSUE/
0
LINK PDLNK,.-1
EXTERNAL ISSUE
,ISSUE
5
POINT 7,.-4
REFB+PROCB+INTEGR
XWD 2*3,2
0
0
XWD 0,.+4
XWD .-10,0
XWD ISSUE,0
XWD ISSUE,0
0+INTEGR+VALUE
0+STRING+VALUE
0+STRING+VALUE
0+STRING+VALUE
ASCII /QUEUE/
0
LINK PDLNK,.-1
EXTERNAL QUEUE
,QUEUE
5
POINT 7,.-4
REFB+PROCB+INTEGR
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD QUEUE,0
XWD QUEUE,0
0+INTEGR+VALUE
0+INTEGR+VALUE
ASCII /GET_DATA/
0
LINK PDLNK,.-1
EXTERNAL GET.DATA
,GET.DATA
10
POINT 7,.-5
REFB+PROCB+STRING
XWD 2*0,3
0
0
XWD 0,.+4
XWD .-10,0
XWD GET.DATA,0
XWD GET.DATA,0
0+INTEGR+VALUE
0+INTEGR+VALUE
ASCII /PUT_DATA/
0
LINK PDLNK,.-1
EXTERNAL PUT.DATA
,PUT.DATA
10
POINT 7,.-5
REFB+PROCB+UNTYPE
XWD 2*1,3
0
0
XWD 0,.+4
XWD .-10,0
XWD PUT.DATA,0
XWD PUT.DATA,0
0+INTEGR+VALUE
0+INTEGR+VALUE
0+STRING+VALUE
ASCII /GET_BIT/
0
LINK PDLNK,.-1
EXTERNAL GET.BIT
,GET.BIT
7
POINT 7,.-5
REFB+PROCB+INTEGR
XWD 2*0,2
0
0
XWD 0,.+4
XWD .-10,0
XWD GET.BIT,0
XWD GET.BIT,0
0+INTEGR+VALUE
ASCII /GET_ENTRY/
0
LINK PDLNK,.-1
EXTERNAL GET.ENTRY
,GET.ENTRY
11
POINT 7,.-5
REFB+PROCB+INTEGR
XWD 2*3,2
0
0
XWD 0,.+4
XWD .-10,0
XWD GET.ENTRY,0
XWD GET.ENTRY,0
0+INTEGR+VALUE
0+STRING+VALUE
0+STRING+VALUE
0+STRING+VALUE
ASCII /GET_SET/
0
LINK PDLNK,.-1
EXTERNAL GET.SET
,GET.SET
7
POINT 7,.-5
REFB+PROCB+SET
XWD 2*3,2
0
0
XWD 0,.+4
XWD .-10,0
XWD GET.SET,0
XWD GET.SET,0
0+INTEGR+VALUE
0+STRING+VALUE
0+STRING+VALUE
0+STRING+VALUE
0
LINK BALNK,.-1
XWD $BEGIN,$BEGIN
1
SIXBIT /BAIPD8/
-1
BEND BAIPD8
END