perm filename RESTAB[X,AIL]4 blob sn#058536 filedate 1973-08-18 generic text, type T, neo UTF8
00005	SUBTTL	INITIAL SYMBOL TABLE
00010	BEGIN	RESTAB
00015	IFNDEF DCS,<DCS ←← 0>
00020	↑RESYM:
00025	LSTON(SMTB)
00030	UNTYPE←←0
00035	
00040	
00045	↑RINF  ←←CLASOP+157
00050	↑RXOR  ←←CLASOP+40
00055	↑RAND  ←←CLASOP+314
00060	↑RNOT  ←←CLASOP+232
00065	↑RIN   ←←CLASOP+137
00070	↑ROR   ←←CLASOP+316
00075	↑RCOMME←←CLASOP+337
00080	↑REQV  ←←CLASOP+35
00085	↑RUNION←←CLASOP+344
00090	↑RINTER←←CLASOP+365
00095	↑RSETO ←←CLASOP+363
00100	↑RSETC ←←CLASOP+326
00105	↑RSWAP ←←CLASOP+303
00110	↑RLEQ  ←←CLASOP+56
00115	↑RNEQ  ←←CLASOP+55
00120	↑RGEQ  ←←CLASOP+57
00125	↑RASSOC←←CLASOP+41
00130	; FUNCTION SYMBOL TABLE ENTRIES
00135	↑IPROC:
00140	
00145	
00150	SYM1:	0	;HEADER FOR M
00155		1
00160		POINT 7,.+11
00165		XWD	EXTRNL+OWN,PROCED+FORWRD+UNTYPE
00170		0
00175		IFN DCS,<0+M ;>0 
00180		BYTE (6) 0
00185		BLOCK	2
00190		XWD SYM2,0
00195		0
00200		ASCII /M/
00205	
00210	
00215	
00220	
00225	SYM2:	0	;HEADER FOR OUT
00230		3
00235		POINT 7,.+10
00240		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+UNTYPE
00245		0
00250		IFN DCS,<0+OUT ;>0 
00255		BYTE (6) 1,2,0
00260		BLOCK	2
00265		XWD SYM3,SYM1
00270		ASCII /OUT/
00275	
00280	
00285	
00290	
00295	SYM3:	0	;HEADER FOR BREAKSET
00300		10
00305		POINT 7,.+10
00310		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+UNTYPE
00315		0
00320		IFN DCS,<0+BREAKSET ;>0 
00325		BYTE (6) 1,2,1,0
00330		BLOCK	2
00335		XWD SYM4,SYM2
00340		ASCII /BREAKSET/
00345	
00350	
00355	
00360	
00365	SYM4:	0	;HEADER FOR INPUT
00370		5
00375		POINT 7,.+10
00380		XWD	EXTRNL+OWN,PROCED+FORWRD+STRING
00385		0
00390		IFN DCS,<0+INPUT ;>0 
00395		BYTE (6) 1,1,0
00400		BLOCK	2
00405		XWD SYM5,SYM3
00410		ASCII /INPUT/
00415	
00420	
00425	
00430	
00435	SYM5:	SYM1	;HEADER FOR LOOKUP
00440		6
00445		POINT 7,.+10
00450		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+UNTYPE
00455		0
00460		IFN DCS,<0+LOOKUP ;>0 
00465		BYTE (6) 1,2,3,0
00470		BLOCK	2
00475		XWD SYM6,SYM4
00480		ASCII /LOOKUP/
00485	
00490	
00495	
00500	
00505	SYM6:	SYM2	;HEADER FOR OPEN
00510		4
00515		POINT 7,.+10
00520		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+UNTYPE
00525		0
00530		IFN DCS,<0+OPEN ;>0 
00535		BYTE (6) 1,2,1,1,1,3,3,3,0
00540		BLOCK	1
00545		XWD SYM7,SYM5
00550		ASCII /OPEN/
00555	
00560	
00565	
00570	
00575	EXTERNAL POINT
00580	SYM7:	0	;HEADER FOR POINT
00585		5
00590		POINT 7,.+10
00595		XWD	EXTRNL+OWN+BILTIN+CONOK,PROCED+FORWRD+INTEGR
00600		0
00605		XWD 0+POINT,IFN DCS,<0+POINT ;>0 
00610		BYTE (6) 1,3,1,0
00615		BLOCK	2
00620		XWD SYM8,SYM6
00625		ASCII /POINT/
00630	
00635	
00640	
00645	
00650	↑.BBPP.:
00655	SYM8:	0	;HEADER FOR BBPP.
00660		5
00665		POINT 7,.+10
00670		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+INTEGR
00675		0
00680		IFN DCS,<0+BBPP. ;>0 
00685		BYTE (6) 1,3,1,0
00690		BLOCK	2
00695		XWD SYM9,SYM7
00700		ASCII /BBPP./
00705	
00710	
00715	
00720	
00725	EXTERNAL EQU
00730	SYM9:	0	;HEADER FOR EQU
00735		3
00740		POINT 7,.+10
00745		XWD	EXTRNL+OWN+BILTIN+CONOK,PROCED+FORWRD+INTEGR
00750		0
00755		XWD 0+EQU,IFN DCS,<0+EQU ;>0 
00760		BYTE (6) 2,2,0
00765		BLOCK	2
00770		XWD SYM10,SYM8
00775		ASCII /EQU/
00780	
00785	
00790	
00795	
00800	EXTERNAL CVS
00805	SYM10:	0	;HEADER FOR CVS
00810		3
00815		POINT 7,.+10
00820		XWD	EXTRNL+OWN+BILTIN+CONOK,PROCED+FORWRD+STRING
00825		0
00830		XWD 0+CVS,IFN DCS,<0+CVS ;>0 
00835		BYTE (6) 1,0
00840		BLOCK	2
00845		XWD SYM11,SYM9
00850		ASCII /CVS/
00855	
00860	
00865	
00870	
00875	EXTERNAL CVD
00880	SYM11:	SYM3	;HEADER FOR CVD
00885		3
00890		POINT 7,.+10
00895		XWD	EXTRNL+OWN+BILTIN+CONOK,PROCED+FORWRD+INTEGR
00900		0
00905		XWD 0+CVD,IFN DCS,<0+CVD ;>0 
00910		BYTE (6) 2,0
00915		BLOCK	2
00920		XWD SYM12,SYM10
00925		ASCII /CVD/
00930	
00935	
00940	
00945	
00950	EXTERNAL SCAN
00955	SYM12:	SYM11	;HEADER FOR SCAN
00960		4
00965		POINT 7,.+10
00970		XWD	EXTRNL+OWN+CONOK,PROCED+FORWRD+STRING
00975		0
00980		XWD 0+SCAN,IFN DCS,<0+SCAN ;>0 
00985		BYTE (6) 4,1,3,0
00990		BLOCK	2
00995		XWD SYM13,SYM11
01000		ASCII /SCAN/
01005	
01010	
01015	
01020	
01025	SYM13:	SYM9	;HEADER FOR RELEASE
01030		7
01035		POINT 7,.+10
01040		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+UNTYPE
01045		0
01050		IFN DCS,<0+RELEASE ;>0 
01055		BYTE (6) 1,41,0
01060		BLOCK	2
01065		XWD SYM14,SYM12
01070		ASCII /RELEASE/
01075	
01080	
01085	
01090	
01095	SYM14:	SYM12	;HEADER FOR LINOUT
01100		6
01105		POINT 7,.+10
01110		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+UNTYPE
01115		0
01120		IFN DCS,<0+LINOUT ;>0 
01125		BYTE (6) 1,1,0
01130		BLOCK	2
01135		XWD SYM15,SYM13
01140		ASCII /LINOUT/
01145	
01150	
01155	
01160	
01165	SYM15:	0	;HEADER FOR CLOSE
01170		5
01175		POINT 7,.+10
01180		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+UNTYPE
01185		0
01190		IFN DCS,<0+CLOSE ;>0 
01195		BYTE (6) 1,0
01200		BLOCK	2
01205		XWD SYM16,SYM14
01210		ASCII /CLOSE/
01215	
01220	
01225	
01230	
01235	SYM16:	SYM10	;HEADER FOR CLOSO
01240		5
01245		POINT 7,.+10
01250		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+UNTYPE
01255		0
01260		IFN DCS,<0+CLOSO ;>0 
01265		BYTE (6) 1,0
01270		BLOCK	2
01275		XWD SYM17,SYM15
01280		ASCII /CLOSO/
01285	
01290	
01295	
01300	
01305	SYM17:	0	;HEADER FOR CLOSIN
01310		6
01315		POINT 7,.+10
01320		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+UNTYPE
01325		0
01330		IFN DCS,<0+CLOSIN ;>0 
01335		BYTE (6) 1,0
01340		BLOCK	2
01345		XWD SYM18,SYM16
01350		ASCII /CLOSIN/
01355	
01360	
01365	
01370	
01375	EXTERNAL CVOS
01380	SYM18:	SYM15	;HEADER FOR CVOS
01385		4
01390		POINT 7,.+10
01395		XWD	EXTRNL+OWN+BILTIN+CONOK,PROCED+FORWRD+STRING
01400		0
01405		XWD 0+CVOS,IFN DCS,<0+CVOS ;>0 
01410		BYTE (6) 5,0
01415		BLOCK	2
01420		XWD SYM19,SYM17
01425		ASCII /CVOS/
01430	
01435	
01440	
01445	
01450	SYM19:	SYM13	;HEADER FOR ENTER
01455		5
01460		POINT 7,.+10
01465		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+UNTYPE
01470		0
01475		IFN DCS,<0+ENTER ;>0 
01480		BYTE (6) 1,2,3,0
01485		BLOCK	2
01490		XWD SYM20,SYM18
01495		ASCII /ENTER/
01500	
01505	
01510	
01515	
01520	SYM20:	0	;HEADER FOR MTAPE
01525		5
01530		POINT 7,.+10
01535		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+UNTYPE
01540		0
01545		IFN DCS,<0+MTAPE ;>0 
01550		BYTE (6) 1,1,0
01555		BLOCK	2
01560		XWD SYM21,SYM19
01565		ASCII /MTAPE/
01570	
01575	
01580	
01585	
01590	SYM21:	SYM17	;HEADER FOR WORDIN
01595		6
01600		POINT 7,.+10
01605		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+INTEGR
01610		0
01615		IFN DCS,<0+WORDIN ;>0 
01620		BYTE (6) 1,0
01625		BLOCK	2
01630		XWD SYM22,SYM20
01635		ASCII /WORDIN/
01640	
01645	
01650	
01655	
01660	SYM22:	0	;HEADER FOR WORDOUT
01665		7
01670		POINT 7,.+10
01675		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+UNTYPE
01680		0
01685		IFN DCS,<0+WORDOUT ;>0 
01690		BYTE (6) 1,5,0
01695		BLOCK	2
01700		XWD SYM23,SYM21
01705		ASCII /WORDOUT/
01710	
01715	
01720	
01725	
01730	EXTERNAL CVO
01735	SYM23:	SYM7	;HEADER FOR CVO
01740		3
01745		POINT 7,.+10
01750		XWD	EXTRNL+OWN+BILTIN+CONOK,PROCED+FORWRD+INTEGR
01755		0
01760		XWD 0+CVO,IFN DCS,<0+CVO ;>0 
01765		BYTE (6) 2,0
01770		BLOCK	2
01775		XWD SYM24,SYM22
01780		ASCII /CVO/
01785	
01790	
01795	
01800	
01805	SYM24:	SYM8	;HEADER FOR USETI
01810		5
01815		POINT 7,.+10
01820		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+UNTYPE
01825		0
01830		IFN DCS,<0+USETI ;>0 
01835		BYTE (6) 1,1,0
01840		BLOCK	2
01845		XWD SYM25,SYM23
01850		ASCII /USETI/
01855	
01860	
01865	
01870	
01875	SYM25:	SYM5	;HEADER FOR USETO
01880		5
01885		POINT 7,.+10
01890		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+UNTYPE
01895		0
01900		IFN DCS,<0+USETO ;>0 
01905		BYTE (6) 1,1,0
01910		BLOCK	2
01915		XWD SYM26,SYM24
01920		ASCII /USETO/
01925	
01930	
01935	
01940	
01945	EXTERNAL CVSIX
01950	SYM26:	SYM25	;HEADER FOR CVSIX
01955		5
01960		POINT 7,.+10
01965		XWD	EXTRNL+OWN+BILTIN+CONOK,PROCED+FORWRD+INTEGR
01970		0
01975		XWD 0+CVSIX,IFN DCS,<0+CVSIX ;>0 
01980		BYTE (6) 2,0
01985		BLOCK	2
01990		XWD SYM27,SYM25
01995		ASCII /CVSIX/
02000	
02005	
02010	
02015	
02020	EXTERNAL CVFIL
02025	SYM27:	SYM6	;HEADER FOR CVFIL
02030		5
02035		POINT 7,.+10
02040		XWD	EXTRNL+OWN+BILTIN+CONOK,PROCED+FORWRD+INTEGR
02045		0
02050		XWD 0+CVFIL,IFN DCS,<0+CVFIL ;>0 
02055		BYTE (6) 2,3,3,0
02060		BLOCK	2
02065		XWD SYM28,SYM26
02070		ASCII /CVFIL/
02075	
02080	
02085	
02090	
02095	SYM28:	SYM26	;HEADER FOR CALL
02100		4
02105		POINT 7,.+10
02110		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+INTEGR
02115		0
02120		IFN DCS,<0+CALL ;>0 
02125		BYTE (6) 1,2,0
02130		BLOCK	2
02135		XWD SYM29,SYM27
02140		ASCII /CALL/
02145	
02150	
02155	
02160	
02165	SYM29:	SYM23	;HEADER FOR RENAME
02170		6
02175		POINT 7,.+10
02180		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+UNTYPE
02185		0
02190		IFN DCS,<0+RENAME ;>0 
02195		BYTE (6) 1,2,1,3,0
02200		BLOCK	2
02205		XWD SYM30,SYM28
02210		ASCII /RENAME/
02215	
02220	
02225	
02230	
02235	EXTERNAL CVASC
02240	SYM30:	SYM28	;HEADER FOR CVASC
02245		5
02250		POINT 7,.+10
02255		XWD	EXTRNL+OWN+BILTIN+CONOK,PROCED+FORWRD+INTEGR
02260		0
02265		XWD 0+CVASC,IFN DCS,<0+CVASC ;>0 
02270		BYTE (6) 2,0
02275		BLOCK	2
02280		XWD SYM31,SYM29
02285		ASCII /CVASC/
02290	
02295	
02300	
02305	
02310	EXTERNAL CVSTR
02315	SYM31:	SYM19	;HEADER FOR CVSTR
02320		5
02325		POINT 7,.+10
02330		XWD	EXTRNL+OWN+BILTIN+CONOK,PROCED+FORWRD+STRING
02335		0
02340		XWD 0+CVSTR,IFN DCS,<0+CVSTR ;>0 
02345		BYTE (6) 1,0
02350		BLOCK	2
02355		XWD SYM32,SYM30
02360		ASCII /CVSTR/
02365	
02370	
02375	
02380	
02385	EXTERNAL CVXSTR
02390	SYM32:	SYM4	;HEADER FOR CVXSTR
02395		6
02400		POINT 7,.+10
02405		XWD	EXTRNL+OWN+BILTIN+CONOK,PROCED+FORWRD+STRING
02410		0
02415		XWD 0+CVXSTR,IFN DCS,<0+CVXSTR ;>0 
02420		BYTE (6) 1,0
02425		BLOCK	2
02430		XWD SYM33,SYM31
02435		ASCII /CVXSTR/
02440	
02445	
02450	
02455	
02460	↑.SUBSR:
02465	EXTERNAL SUBSR
02470	SYM33:	SYM31	;HEADER FOR SUBSR
02475		5
02480		POINT 7,.+10
02485		XWD	EXTRNL+OWN+BILTIN+CONOK,PROCED+FORWRD+STRING
02490		0
02495		XWD 0+SUBSR,IFN DCS,<0+SUBSR ;>0 
02500		BYTE (6) 2,1,1,0
02505		BLOCK	2
02510		XWD SYM34,SYM32
02515		ASCII /SUBSR/
02520	
02525	
02530	
02535	
02540	↑.SUBST:
02545	EXTERNAL SUBST
02550	SYM34:	SYM33	;HEADER FOR SUBST
02555		5
02560		POINT 7,.+10
02565		XWD	EXTRNL+OWN+BILTIN+CONOK,PROCED+FORWRD+STRING
02570		0
02575		XWD 0+SUBST,IFN DCS,<0+SUBST ;>0 
02580		BYTE (6) 2,1,1,0
02585		BLOCK	2
02590		XWD SYM35,SYM33
02595		ASCII /SUBST/
02600	
02605	
02610	
02615	
02620	SYM35:	0	;HEADER FOR SETBREAK
02625		10
02630		POINT 7,.+10
02635		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+UNTYPE
02640		0
02645		IFN DCS,<0+SETBREAK ;>0 
02650		BYTE (6) 1,2,2,2,0
02655		BLOCK	2
02660		XWD SYM36,SYM34
02665		ASCII /SETBREAK/
02670	
02675	
02680	
02685	
02690	SYM36:	SYM29	;HEADER FOR STDBRK
02695		6
02700		POINT 7,.+10
02705		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+UNTYPE
02710		0
02715		IFN DCS,<0+STDBRK ;>0 
02720		BYTE (6) 1,0
02725		BLOCK	2
02730		XWD SYM37,SYM35
02735		ASCII /STDBRK/
02740	
02745	
02750	
02755	
02760	SYM37:	SYM20	;HEADER FOR ARRYIN
02765		6
02770		POINT 7,.+10
02775		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+UNTYPE
02780		0
02785		IFN DCS,<0+ARRYIN ;>0 
02790		BYTE (6) 1,6,1,0
02795		BLOCK	2
02800		XWD SYM38,SYM36
02805		ASCII /ARRYIN/
02810	
02815	
02820	
02825	
02830	SYM38:	SYM36	;HEADER FOR ARRYOUT
02835		7
02840		POINT 7,.+10
02845		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+UNTYPE
02850		0
02855		IFN DCS,<0+ARRYOUT ;>0 
02860		BYTE (6) 1,6,1,0
02865		BLOCK	2
02870		XWD SYM39,SYM37
02875		ASCII /ARRYOUT/
02880	
02885	
02890	
02895	
02900	SYM39:	SYM14	;HEADER FOR SETFORMAT
02905		11
02910		POINT 7,.+10
02915		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+UNTYPE
02920		0
02925		IFN DCS,<0+SETFORMAT ;>0 
02930		BYTE (6) 1,1,0
02935		BLOCK	2
02940		XWD SYM40,SYM38
02945		ASCII /SETFORMAT/
02950	
02955	
02960	
02965	
02970	EXTERNAL CVG
02975	SYM40:	SYM35	;HEADER FOR CVG
02980		3
02985		POINT 7,.+10
02990		XWD	EXTRNL+OWN+BILTIN+CONOK,PROCED+FORWRD+STRING
02995		0
03000		XWD 0+CVG,IFN DCS,<0+CVG ;>0 
03005		BYTE (6) 7,0
03010		BLOCK	2
03015		XWD SYM41,SYM39
03020		ASCII /CVG/
03025	
03030	
03035	
03040	
03045	EXTERNAL CVF
03050	SYM41:	SYM16	;HEADER FOR CVF
03055		3
03060		POINT 7,.+10
03065		XWD	EXTRNL+OWN+BILTIN+CONOK,PROCED+FORWRD+STRING
03070		0
03075		XWD 0+CVF,IFN DCS,<0+CVF ;>0 
03080		BYTE (6) 7,0
03085		BLOCK	2
03090		XWD SYM42,SYM40
03095		ASCII /CVF/
03100	
03105	
03110	
03115	
03120	EXTERNAL CVE
03125	SYM42:	SYM27	;HEADER FOR CVE
03130		3
03135		POINT 7,.+10
03140		XWD	EXTRNL+OWN+BILTIN+CONOK,PROCED+FORWRD+STRING
03145		0
03150		XWD 0+CVE,IFN DCS,<0+CVE ;>0 
03155		BYTE (6) 7,0
03160		BLOCK	2
03165		XWD SYM43,SYM41
03170		ASCII /CVE/
03175	
03180	
03185	
03190	
03195	SYM43:	SYM38	;HEADER FOR REALIN
03200		6
03205		POINT 7,.+10
03210		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+FLOTNG
03215		0
03220		IFN DCS,<0+REALIN ;>0 
03225		BYTE (6) 1,0
03230		BLOCK	2
03235		XWD SYM44,SYM42
03240		ASCII /REALIN/
03245	
03250	
03255	
03260	
03265	SYM44:	SYM34	;HEADER FOR INTIN
03270		5
03275		POINT 7,.+10
03280		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+INTEGR
03285		0
03290		IFN DCS,<0+INTIN ;>0 
03295		BYTE (6) 1,0
03300		BLOCK	2
03305		XWD SYM45,SYM43
03310		ASCII /INTIN/
03315	
03320	
03325	
03330	
03335	EXTERNAL REALSCAN
03340	SYM45:	SYM43	;HEADER FOR REALSCAN
03345		10
03350		POINT 7,.+10
03355		XWD	EXTRNL+OWN+BILTIN+CONOK,PROCED+FORWRD+FLOTNG
03360		0
03365		XWD 0+REALSCAN,IFN DCS,<0+REALSCAN ;>0 
03370		BYTE (6) 4,3,0
03375		BLOCK	2
03380		XWD SYM46,SYM44
03385		ASCII /REALSCAN/
03390	
03395	
03400	
03405	
03410	EXTERNAL INTSCAN
03415	SYM46:	SYM42	;HEADER FOR INTSCAN
03420		7
03425		POINT 7,.+10
03430		XWD	EXTRNL+OWN+BILTIN+CONOK,PROCED+FORWRD+INTEGR
03435		0
03440		XWD 0+INTSCAN,IFN DCS,<0+INTSCAN ;>0 
03445		BYTE (6) 4,3,0
03450		BLOCK	2
03455		XWD SYM47,SYM45
03460		ASCII /INTSCAN/
03465	
03470	
03475	
03480	
03485	SYM47:	SYM40	;HEADER FOR ARRINFO
03490		7
03495		POINT 7,.+10
03500		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+INTEGR
03505		0
03510		IFN DCS,<0+ARRINFO ;>0 
03515		BYTE (6) 10,1,0
03520		BLOCK	2
03525		XWD SYM48,SYM46
03530		ASCII /ARRINFO/
03535	
03540	
03545	
03550	
03555	SYM48:	SYM41	;HEADER FOR ARRBLT
03560		6
03565		POINT 7,.+10
03570		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+UNTYPE
03575		0
03580		IFN DCS,<0+ARRBLT ;>0 
03585		BYTE (6) 11,11,1,0
03590		BLOCK	2
03595		XWD SYM49,SYM47
03600		ASCII /ARRBLT/
03605	
03610	
03615	
03620	
03625	SYM49:	SYM22	;HEADER FOR ARRTRAN
03630		7
03635		POINT 7,.+10
03640		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+UNTYPE
03645		0
03650		IFN DCS,<0+ARRTRAN ;>0 
03655		BYTE (6) 12,12,0
03660		BLOCK	2
03665		XWD SYM50,SYM48
03670		ASCII /ARRTRAN/
03675	
03680	
03685	
03690	
03695	SYM50:	SYM30	;HEADER FOR CODE
03700		4
03705		POINT 7,.+10
03710		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+INTEGR
03715		0
03720		IFN DCS,<0+CODE ;>0 
03725		BYTE (6) 1,3,0
03730		BLOCK	2
03735		XWD SYM51,SYM49
03740		ASCII /CODE/
03745	
03750	
03755	
03760	
03765	SYM51:	SYM39	;HEADER FOR USERERR
03770		7
03775		POINT 7,.+10
03780		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+UNTYPE
03785		0
03790		IFN DCS,<0+USERERR ;>0 
03795		BYTE (6) 1,1,2,0
03800		BLOCK	2
03805		XWD SYM52,SYM50
03810		ASCII /USERERR/
03815	
03820	
03825	
03830	
03835	SYM52:	SYM47	;HEADER FOR CVSI
03840		4
03845		POINT 7,.+10
03850		XWD	EXTRNL+OWN,PROCED+FORWRD+ITMVAR
03855		0
03860		IFN DCS,<0+CVSI ;>0 
03865		BYTE (6) 2,3,0
03870		BLOCK	2
03875		XWD SYM53,SYM51
03880		ASCII /CVSI/
03885	
03890	
03895	
03900	
03905	SYM53:	SYM46	;HEADER FOR CVIS
03910		4
03915		POINT 7,.+10
03920		XWD	EXTRNL+OWN,PROCED+FORWRD+STRING
03925		0
03930		IFN DCS,<0+CVIS ;>0 
03935		BYTE (6) 13,3,0
03940		BLOCK	2
03945		XWD SYM54,SYM52
03950		ASCII /CVIS/
03955	
03960	
03965	
03970	
03975	SYM54:	SYM49	;HEADER FOR NEW_PNAME
03980		11
03985		POINT 7,.+10
03990		XWD	EXTRNL+OWN,PROCED+FORWRD+UNTYPE
03995		0
04000		IFN DCS,<0+NEW.PNAME ;>0 
04005		BYTE (6) 13,2,0
04010		BLOCK	2
04015		XWD SYM55,SYM53
04020		ASCII /NEW_PNAME/
04025	
04030	
04035	
04040	
04045	SYM55:	SYM21	;HEADER FOR DEL_PNAME
04050		11
04055		POINT 7,.+10
04060		XWD	EXTRNL+OWN,PROCED+FORWRD+UNTYPE
04065		0
04070		IFN DCS,<0+DEL.PNAME ;>0 
04075		BYTE (6) 13,0
04080		BLOCK	2
04085		XWD SYM56,SYM54
04090		ASCII /DEL_PNAME/
04095	
04100	
04105	
04110	
04115	SYM56:	SYM50	;HEADER FOR TYPEIT
04120		6
04125		POINT 7,.+10
04130		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+INTEGR
04135		0
04140		IFN DCS,<0+TYPEIT ;>0 
04145		BYTE (6) 13,0
04150		BLOCK	2
04155		XWD SYM57,SYM55
04160		ASCII /TYPEIT/
04165	
04170	
04175	
04180	
04185	SYM57:	SYM48	;HEADER FOR LISTX
04190		5
04195		POINT 7,.+10
04200		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+INTEGR
04205		0
04210		IFN DCS,<0+LISTX ;>0 
04215		BYTE (6) 14,13,1,0
04220		BLOCK	2
04225		XWD SYM58,SYM56
04230		ASCII /LISTX/
04235	
04240	
04245	
04250	
04255	SYM58:	SYM54	;HEADER FOR INCHRW
04260		6
04265		POINT 7,.+10
04270		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+INTEGR
04275		0
04280		IFN DCS,<0+INCHRW ;>0 
04285		BYTE (6) 0
04290		BLOCK	2
04295		XWD SYM59,SYM57
04300		ASCII /INCHRW/
04305	
04310	
04315	
04320	
04325	SYM59:	SYM58	;HEADER FOR INCHRS
04330		6
04335		POINT 7,.+10
04340		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+INTEGR
04345		0
04350		IFN DCS,<0+INCHRS ;>0 
04355		BYTE (6) 0
04360		BLOCK	2
04365		XWD SYM60,SYM58
04370		ASCII /INCHRS/
04375	
04380	
04385	
04390	
04395	SYM60:	SYM44	;HEADER FOR INCHWL
04400		6
04405		POINT 7,.+10
04410		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+STRING
04415		0
04420		IFN DCS,<0+INCHWL ;>0 
04425		BYTE (6) 0
04430		BLOCK	2
04435		XWD SYM61,SYM59
04440		ASCII /INCHWL/
04445	
04450	
04455	
04460	
04465	SYM61:	SYM32	;HEADER FOR INCHSL
04470		6
04475		POINT 7,.+10
04480		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+STRING
04485		0
04490		IFN DCS,<0+INCHSL ;>0 
04495		BYTE (6) 3,0
04500		BLOCK	2
04505		XWD SYM62,SYM60
04510		ASCII /INCHSL/
04515	
04520	
04525	
04530	
04535	SYM62:	SYM24	;HEADER FOR INSTR
04540		5
04545		POINT 7,.+10
04550		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+STRING
04555		0
04560		IFN DCS,<0+INSTR ;>0 
04565		BYTE (6) 1,0
04570		BLOCK	2
04575		XWD SYM63,SYM61
04580		ASCII /INSTR/
04585	
04590	
04595	
04600	
04605	SYM63:	SYM57	;HEADER FOR INSTRL
04610		6
04615		POINT 7,.+10
04620		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+STRING
04625		0
04630		IFN DCS,<0+INSTRL ;>0 
04635		BYTE (6) 1,0
04640		BLOCK	2
04645		XWD SYM64,SYM62
04650		ASCII /INSTRL/
04655	
04660	
04665	
04670	
04675	SYM64:	SYM63	;HEADER FOR INSTRS
04680		6
04685		POINT 7,.+10
04690		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+STRING
04695		0
04700		IFN DCS,<0+INSTRS ;>0 
04705		BYTE (6) 3,1,0
04710		BLOCK	2
04715		XWD SYM65,SYM63
04720		ASCII /INSTRS/
04725	
04730	
04735	
04740	
04745	SYM65:	SYM18	;HEADER FOR TTYIN
04750		5
04755		POINT 7,.+10
04760		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+STRING
04765		0
04770		IFN DCS,<0+TTYIN ;>0 
04775		BYTE (6) 1,3,0
04780		BLOCK	2
04785		XWD SYM66,SYM64
04790		ASCII /TTYIN/
04795	
04800	
04805	
04810	
04815	SYM66:	SYM37	;HEADER FOR TTYINL
04820		6
04825		POINT 7,.+10
04830		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+STRING
04835		0
04840		IFN DCS,<0+TTYINL ;>0 
04845		BYTE (6) 1,3,0
04850		BLOCK	2
04855		XWD SYM67,SYM65
04860		ASCII /TTYINL/
04865	
04870	
04875	
04880	
04885	SYM67:	SYM66	;HEADER FOR TTYINS
04890		6
04895		POINT 7,.+10
04900		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+STRING
04905		0
04910		IFN DCS,<0+TTYINS ;>0 
04915		BYTE (6) 1,3,0
04920		BLOCK	2
04925		XWD SYM68,SYM66
04930		ASCII /TTYINS/
04935	
04940	
04945	
04950	
04955	SYM68:	SYM65	;HEADER FOR OUTCHR
04960		6
04965		POINT 7,.+10
04970		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+UNTYPE
04975		0
04980		IFN DCS,<0+OUTCHR ;>0 
04985		BYTE (6) 1,0
04990		BLOCK	2
04995		XWD SYM69,SYM67
05000		ASCII /OUTCHR/
05005	
05010	
05015	
05020	
05025	SYM69:	SYM64	;HEADER FOR OUTSTR
05030		6
05035		POINT 7,.+10
05040		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+UNTYPE
05045		0
05050		IFN DCS,<0+OUTSTR ;>0 
05055		BYTE (6) 2,0
05060		BLOCK	2
05065		XWD SYM70,SYM68
05070		ASCII /OUTSTR/
05075	
05080	
05085	
05090	
05095	SYM70:	SYM56	;HEADER FOR GETFORMAT
05100		11
05105		POINT 7,.+10
05110		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+UNTYPE
05115		0
05120		IFN DCS,<0+GETFORMAT ;>0 
05125		BYTE (6) 3,3,0
05130		BLOCK	2
05135		XWD SYM71,SYM69
05140		ASCII /GETFORMAT/
05145	
05150	
05155	
05160	
05165	SYM71:	SYM67	;HEADER FOR GETCHAN
05170		7
05175		POINT 7,.+10
05180		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+INTEGR
05185		0
05190		IFN DCS,<0+GETCHAN ;>0 
05195		BYTE (6) 0
05200		BLOCK	2
05205		XWD SYM72,SYM70
05210		ASCII /GETCHAN/
05215	
05220	
05225	
05230	
05235	SYM72:	SYM55	;HEADER FOR FILEINFO
05240		10
05245		POINT 7,.+10
05250		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+UNTYPE
05255		0
05260		IFN DCS,<0+FILEINFO ;>0 
05265		BYTE (6) 15,0
05270		BLOCK	2
05275		XWD SYM73,SYM71
05280		ASCII /FILEINFO/
05285	
05290	
05295	
05300	
05305	SYM73:	SYM59	;HEADER FOR USERCON
05310		7
05315		POINT 7,.+10
05320		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+UNTYPE
05325		0
05330		IFN DCS,<0+USERCON ;>0 
05335		BYTE (6) 3,3,1,0
05340		BLOCK	2
05345		XWD SYM74,SYM72
05350		ASCII /USERCON/
05355	
05360	
05365	
05370	
05375	SYM74:	SYM73	;HEADER FOR MAINPR
05380		6
05385		POINT 7,.+10
05390		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+UNTYPE
05395		0
05400		IFN DCS,<0+MAINPR ;>0 
05405		BYTE (6) 0
05410		BLOCK	2
05415		XWD SYM75,SYM73
05420		ASCII /MAINPR/
05425	
05430	
05435	
05440	
05445	SYM75:	SYM72	;HEADER FOR RESUME
05450		6
05455		POINT 7,.+10
05460		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+ITMVAR
05465		0
05470		IFN DCS,<0+RESUME ;>0 
05475		BYTE (6) 13,53,41,0
05480		BLOCK	2
05485		XWD SYM76,SYM74
05490		ASCII /RESUME/
05495	
05500	
05505	
05510	
05515	SYM76:	SYM69	;HEADER FOR ASKNTC
05520		6
05525		POINT 7,.+10
05530		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+ITMVAR
05535		0
05540		IFN DCS,<0+ASKNTC ;>0 
05545		BYTE (6) 13,41,0
05550		BLOCK	2
05555		XWD SYM77,SYM75
05560		ASCII /ASKNTC/
05565	
05570	
05575	
05580	
05585	SYM77:	SYM68	;HEADER FOR CAUSE1
05590		6
05595		POINT 7,.+10
05600		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+ITMVAR
05605		0
05610		IFN DCS,<0+CAUSE1 ;>0 
05615		BYTE (6) 13,53,41,0
05620		BLOCK	2
05625		XWD SYM78,SYM76
05630		ASCII /CAUSE1/
05635	
05640	
05645	
05650	
05655	SYM78:	SYM70	;HEADER FOR MKEVTT
05660		6
05665		POINT 7,.+10
05670		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+UNTYPE
05675		0
05680		IFN DCS,<0+MKEVTT ;>0 
05685		BYTE (6) 13,0
05690		BLOCK	2
05695		XWD SYM79,SYM77
05700		ASCII /MKEVTT/
05705	
05710	
05715	
05720	
05725	SYM79:	SYM51	;HEADER FOR JOIN
05730		4
05735		POINT 7,.+10
05740		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+UNTYPE
05745		0
05750		IFN DCS,<0+JOIN ;>0 
05755		BYTE (6) 16,0
05760		BLOCK	2
05765		XWD SYM80,SYM78
05770		ASCII /JOIN/
05775	
05780	
05785	
05790	
05795	SYM80:	SYM52	;HEADER FOR SUSPEND
05800		7
05805		POINT 7,.+10
05810		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+UNTYPE
05815		0
05820		IFN DCS,<0+SUSPEND ;>0 
05825		BYTE (6) 13,0
05830		BLOCK	2
05835		XWD SYM81,SYM79
05840		ASCII /SUSPEND/
05845	
05850	
05855	
05860	
05865	SYM81:	SYM71	;HEADER FOR TERMINATE
05870		11
05875		POINT 7,.+10
05880		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+UNTYPE
05885		0
05890		IFN DCS,<0+TERMINATE ;>0 
05895		BYTE (6) 13,0
05900		BLOCK	2
05905		XWD SYM82,SYM80
05910		ASCII /TERMINATE/
05915	
05920	
05925	
05930	
05935	SYM82:	SYM60	;HEADER FOR MYPROC
05940		6
05945		POINT 7,.+10
05950		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+ITMVAR
05955		0
05960		IFN DCS,<0+MYPROC ;>0 
05965		BYTE (6) 0
05970		BLOCK	2
05975		XWD SYM83,SYM81
05980		ASCII /MYPROC/
05985	
05990	
05995	
06000	
06005	SYM83:	SYM61	;HEADER FOR CALLER
06010		6
06015		POINT 7,.+10
06020		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+ITMVAR
06025		0
06030		IFN DCS,<0+CALLER ;>0 
06035		BYTE (6) 13,0
06040		BLOCK	2
06045		XWD SYM84,SYM82
06050		ASCII /CALLER/
06055	
06060	
06065	
06070	
06075	SYM84:	SYM78	;HEADER FOR INTSET
06080		6
06085		POINT 7,.+10
06090		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+UNTYPE
06095		0
06100		IFN DCS,<0+INTSET ;>0 
06105		BYTE (6) 13,1,0
06110		BLOCK	2
06115		XWD SYM85,SYM83
06120		ASCII /INTSET/
06125	
06130	
06135	
06140	
06145	SYM85:	SYM81	;HEADER FOR INTTBL
06150		6
06155		POINT 7,.+10
06160		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+UNTYPE
06165		0
06170		IFN DCS,<0+INTTBL ;>0 
06175		BYTE (6) 1,0
06180		BLOCK	2
06185		XWD SYM86,SYM84
06190		ASCII /INTTBL/
06195	
06200	
06205	
06210	
06215	SYM86:	SYM76	;HEADER FOR INTMOD
06220		6
06225		POINT 7,.+10
06230		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+UNTYPE
06235		0
06240		IFN DCS,<0+INTMOD ;>0 
06245		BYTE (6) 0
06250		BLOCK	2
06255		XWD SYM87,SYM85
06260		ASCII /INTMOD/
06265	
06270	
06275	
06280	
06285	SYM87:	SYM85	;HEADER FOR CLKMOD
06290		6
06295		POINT 7,.+10
06300		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+UNTYPE
06305		0
06310		IFN DCS,<0+CLKMOD ;>0 
06315		BYTE (6) 0
06320		BLOCK	2
06325		XWD SYM88,SYM86
06330		ASCII /CLKMOD/
06335	
06340	
06345	
06350	
06355	SYM88:	SYM83	;HEADER FOR DFRINT
06360		6
06365		POINT 7,.+10
06370		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+UNTYPE
06375		0
06380		IFN DCS,<0+DFRINT ;>0 
06385		BYTE (6) 0
06390		BLOCK	2
06395		XWD SYM89,SYM87
06400		ASCII /DFRINT/
06405	
06410	
06415	
06420	
06425	SYM89:	SYM79	;HEADER FOR DDFINT
06430		6
06435		POINT 7,.+10
06440		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+UNTYPE
06445		0
06450		IFN DCS,<0+DDFINT ;>0 
06455		BYTE (6) 0
06460		BLOCK	2
06465		XWD SYM90,SYM88
06470		ASCII /DDFINT/
06475	
06480	
06485	
06490	
06495	SYM90:	SYM80	;HEADER FOR DFR1IN
06500		6
06505		POINT 7,.+10
06510		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+UNTYPE
06515		0
06520		IFN DCS,<0+DFR1IN ;>0 
06525		BYTE (6) 1,0
06530		BLOCK	2
06535		XWD SYM91,SYM89
06540		ASCII /DFR1IN/
06545	
06550	
06555	
06560	
06565	SYM91:	SYM82	;HEADER FOR ENABLE
06570		6
06575		POINT 7,.+10
06580		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+UNTYPE
06585		0
06590		IFN DCS,<0+ENABLE ;>0 
06595		BYTE (6) 1,0
06600		BLOCK	2
06605		XWD SYM92,SYM90
06610		ASCII /ENABLE/
06615	
06620	
06625	
06630	
06635	SYM92:	SYM91	;HEADER FOR DISABLE
06640		7
06645		POINT 7,.+10
06650		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+UNTYPE
06655		0
06660		IFN DCS,<0+DISABLE ;>0 
06665		BYTE (6) 1,0
06670		BLOCK	2
06675		XWD SYM93,SYM91
06680		ASCII /DISABLE/
06685	
06690	
06695	
06700	
06705	SYM93:	SYM75	;HEADER FOR INTMAP
06710		6
06715		POINT 7,.+10
06720		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+UNTYPE
06725		0
06730		IFN DCS,<0+INTMAP ;>0 
06735		BYTE (6) 1,17,1,0
06740		BLOCK	2
06745		XWD SYM94,SYM92
06750		ASCII /INTMAP/
06755	
06760	
06765	
06770	
06775	SYM94:	SYM45	;HEADER FOR DFCPKT
06780		6
06785		POINT 7,.+10
06790		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+INTEGR
06795		0
06800		IFN DCS,<0+DFCPKT ;>0 
06805		BYTE (6) 1,13,13,1,0
06810		BLOCK	2
06815		XWD SYM95,SYM93
06820		ASCII /DFCPKT/
06825	
06830	
06835	
06840	
06845	SYM95:	SYM62	;HEADER FOR URSCHD
06850		6
06855		POINT 7,.+10
06860		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+INTEGR
06865		0
06870		IFN DCS,<0+URSCHD ;>0 
06875		BYTE (6) 0
06880		BLOCK	2
06885		XWD SYM96,SYM94
06890		ASCII /URSCHD/
06895	
06900	
06905	
06910	
06915	SYM96:	SYM89	;HEADER FOR PRISET
06920		6
06925		POINT 7,.+10
06930		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+UNTYPE
06935		0
06940		IFN DCS,<0+PRISET ;>0 
06945		BYTE (6) 13,1,0
06950		BLOCK	2
06955		XWD SYM97,SYM95
06960		ASCII /PRISET/
06965	
06970	
06975	
06980	
06985	SYM97:	SYM94	;HEADER FOR PSTATUS
06990		7
06995		POINT 7,.+10
07000		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+INTEGR
07005		0
07010		IFN DCS,<0+PSTATUS ;>0 
07015		BYTE (6) 13,0
07020		BLOCK	2
07025		XWD SYM98,SYM96
07030		ASCII /PSTATUS/
07035	
07040	
07045	
07050	
07055	SYM98:	SYM74	;HEADER FOR INTPRO
07060		6
07065		POINT 7,.+10
07070		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+UNTYPE
07075		0
07080		IFN DCS,<0+INTPRO ;>0 
07085		BYTE (6) 0
07090		BLOCK	2
07095		XWD SYM99,SYM97
07100		ASCII /INTPRO/
07105	
07110	
07115	
07120	
07125	SYM99:	SYM88	;HEADER FOR ANSWER
07130		6
07135		POINT 7,.+10
07140		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+INTEGR
07145		0
07150		IFN DCS,<0+ANSWER ;>0 
07155		BYTE (6) 13,13,13,0
07160		BLOCK	2
07165		XWD SYM100,SYM98
07170		ASCII /ANSWER/
07175	
07180	
07185	
07190	
07195	↑BLTTBL←.-1
07200	XWD VALUE,INTEGR
07205	XWD VALUE,STRING
07210	XWD REFRNC,INTEGR
07215	XWD REFRNC,STRING
07220	XWD VALUE,INTEGR+FLOTNG
07225	XWD REFRNC,INTEGR+FLOTNG+ITMVAR
07230	XWD VALUE,FLOTNG
07235	XWD REFRNC+SBSCRP,INTEGR+FLOTNG+SET+LSTBIT+ITMVAR+STRING
07240	XWD REFRNC,INTEGR+FLOTNG+ITMVAR+SET
07245	XWD REFRNC+SBSCRP,INTEGR+FLOTNG+ITMVAR+SET+LSTBIT+STRING
07250	XWD VALUE,ITMVAR
07255	XWD VALUE,LSTBIT+SET
07260	XWD REFRNC+SBSCRP,INTEGR
07265	XWD VALUE,SET
07270	XWD REFRNC,PROCED
07275	SYM100←0
07280	 
07285	SYM101:	XWD 0,SYM96
07290		4
07295		POINT 7,.+2
07300		XWD RES+CLSIDX,222
07305		ASCIZ/BBPP/
07310	 
07315	SYM102:	XWD SYM101,SYM87
07320		5
07325		POINT 7,.+2
07330		XWD RES+CLSIDX,236
07335		ASCIZ/BEGIN/
07340	 
07345	SYM103:	XWD SYM102,SYM95
07350		10
07355		POINT 7,.+2
07360		XWD RES+CLSIDX,152
07365		ASCIZ/REMEMBER/
07370	 
07375	SYM104:	XWD SYM103,SYM101
07380		6
07385		POINT 7,.+2
07390		XWD RES+CLSIDX,172
07395		ASCIZ/SECOND/
07400	 
07405	SYM105:	XWD SYM104,SYM77
07410		3
07415		POINT 7,.+2
07420		XWD RES+CLSIDX,334
07425		ASCIZ/PHI/
07430	 
07435	SYM106:	XWD SYM105,SYM104
07440		12
07445		POINT 7,.+2
07450		XWD RES+CLSIDX,234
07455		ASCIZ/START_CODE/
07460	 
07465	SYM107:	XWD SYM106,SYM90
07470		3
07475		POINT 7,.+2
07480		XWD RES+CLSIDX,157
07485		ASCIZ/INF/
07490	 
07495	SYM108:	XWD SYM107,SYM99
07500		4
07505		POINT 7,.+2
07510		XWD RES+CLSIDX,242
07515		ASCIZ/CASE/
07520	 
07525	SYM109:	XWD SYM108,SYM93
07530		7
07535		POINT 7,.+2
07540		XWD RES+CLSIDX,106
07545		ASCIZ/LIBRARY/
07550	 
07555	SYM110:	XWD SYM109,SYM109
07560		12
07565		POINT 7,.+2
07570		XWD RES+CLSIDX,100
07575		ASCIZ/SYSTEM_PDL/
07580	 
07585	SYM111:	XWD SYM110,SYM92
07590		5
07595		POINT 7,.+2
07600		XWD RES+CLSIDX,307
07605		ASCIZ/CAUSE/
07610	 
07615	SYM112:	XWD SYM111,SYM110
07620		5
07625		POINT 7,.+2
07630		XWD RES+CLSIDX,321
07635		ASCIZ/STEPC/
07640	 
07645	SYM113:	XWD SYM112,SYM105
07650		3
07655		POINT 7,.+2
07660		XWD RES+CLSIDX,335
07665		ASCIZ/ALL/
07670	 
07675	SYM114:	XWD SYM113,SYM106
07680		5
07685		POINT 7,.+2
07690		XWD RES+CLSIDX,224
07695		ASCIZ/DATUM/
07700	 
07705	SYM115:	XWD SYM114,SYM112
07710		5
07715		POINT 7,.+2
07720		XWD RES+CLSIDX,243
07725		ASCIZ/CASEC/
07730	 
07735	SYM116:	XWD SYM115,SYM113
07740		5
07745		POINT 7,.+2
07750		XWD RES+CLSIDX,305
07755		ASCIZ/APPLY/
07760	 
07765	SYM117:	XWD SYM116,SYM108
07770		11
07775		POINT 7,.+2
07780		XWD RES+CLSIDX,62
07785		ASCIZ/PROCEDURE/
07790	 
07795	SYM118:	XWD SYM117,SYM102
07800		11
07805		POINT 7,.+2
07810		XWD RES+CLSIDX,115
07815		ASCIZ/ALLGLOBAL/
07820	 
07825	SYM119:	XWD SYM118,SYM84
07830		4
07835		POINT 7,.+2
07840		XWD RES+CLSIDX,140
07845		ASCIZ/FROM/
07850	 
07855	SYM120:	XWD SYM119,SYM117
07860		3
07865		POINT 7,.+2
07870		XWD RES+CLSIDX,32
07875		ASCIZ/ABS/
07880	 
07885	SYM121:	XWD SYM120,SYM98
07890		5
07895		POINT 7,.+2
07900		XWD RES+CLSIDX,176
07905		ASCIZ/CVSET/
07910	 
07915	SYM122:	XWD SYM121,SYM111
07920		2
07925		POINT 7,.+2
07930		XWD RES+CLSIDX,316
07935		ASCIZ/OR/
07940	 
07945	SYM123:	XWD SYM122,SYM118
07950		5
07955		POINT 7,.+2
07960		XWD RES+CLSIDX,230
07965		ASCIZ/PROPS/
07970	 
07975	SYM124:	XWD SYM123,SYM53
07980		16
07985		POINT 7,.+2
07990		XWD RES+CLSIDX,336
07995		ASCIZ/INITIALIZATION/
08000	 
08005	SYM125:	XWD SYM124,SYM103
08010		3
08015		POINT 7,.+2
08020		XWD RES+CLSIDX,35
08025		ASCIZ/EQV/
08030	 
08035	SYM126:	XWD SYM125,SYM107
08040		7
08045		POINT 7,.+2
08050		XWD RES+CLSIDX,241
08055		ASCIZ/ASSIGNC/
08060	 
08065	SYM127:	XWD SYM126,SYM120
08070		3
08075		POINT 7,.+2
08080		XWD RES+CLSIDX,314
08085		ASCIZ/AND/
08090	 
08095	SYM128:	XWD SYM127,SYM125
08100		7
08105		POINT 7,.+2
08110		XWD RES+CLSIDX,10
08115		ASCIZ/BOOLEAN/
08120	 
08125	SYM129:	XWD SYM128,SYM122
08130		5
08135		POINT 7,.+2
08140		XWD RES+CLSIDX,300
08145		ASCIZ/THENC/
08150	 
08155	SYM130:	XWD SYM129,SYM123
08160		22
08165		POINT 7,.+2
08170		XWD RES+CLSIDX,113
08175		ASCIZ/UNSTACK_DELIMITERS/
08180	 
08185	SYM131:	XWD SYM130,SYM121
08190		7
08195		POINT 7,.+2
08200		XWD RES+CLSIDX,337
08205		ASCIZ/COMMENT/
08210	 
08215	SYM132:	XWD SYM131,SYM86
08220		10
08225		POINT 7,.+2
08230		XWD RES+CLSIDX,340
08235		ASCIZ/LOCATION/
08240	 
08245	SYM133:	XWD SYM132,SYM132
08250		7
08255		POINT 7,.+2
08260		XWD RES+CLSIDX,341
08265		ASCIZ/MESSAGE/
08270	 
08275	SYM134:	XWD SYM133,SYM114
08280		11
08285		POINT 7,.+2
08290		XWD RES+CLSIDX,104
08295		ASCIZ/NEW_ITEMS/
08300	 
08305	SYM135:	XWD SYM134,SYM124
08310		7
08315		POINT 7,.+2
08320		XWD RES+CLSIDX,73
08325		ASCIZ/CLEANUP/
08330	 
08335	SYM136:	XWD SYM135,SYM131
08340		4
08345		POINT 7,.+2
08350		XWD RES+CLSIDX,225
08355		ASCIZ/DONE/
08360	 
08365	SYM137:	XWD SYM136,SYM129
08370		5
08375		POINT 7,.+2
08380		XWD RES+CLSIDX,173
08385		ASCIZ/THIRD/
08390	 
08395	SYM138:	XWD SYM137,SYM126
08400		7
08405		POINT 7,.+2
08410		XWD RES+CLSIDX,22
08415		ASCIZ/FORWARD/
08420	 
08425	SYM139:	XWD SYM138,SYM119
08430		3
08435		POINT 7,.+2
08440		XWD RES+CLSIDX,246
08445		ASCIZ/DOC/
08450	 
08455	SYM140:	XWD SYM139,SYM137
08460		4
08465		POINT 7,.+2
08470		XWD RES+CLSIDX,342
08475		ASCIZ/NEXT/
08480	 
08485	SYM141:	XWD SYM140,SYM97
08490		6
08495		POINT 7,.+2
08500		XWD RES+CLSIDX,63
08505		ASCIZ/DEFINE/
08510	 
08515	SYM142:	XWD SYM141,SYM140
08520		6
08525		POINT 7,.+2
08530		XWD RES+CLSIDX,166
08535		ASCIZ/LENGTH/
08540	 
08545	SYM143:	XWD SYM142,SYM133
08550		6
08555		POINT 7,.+2
08560		XWD RES+CLSIDX,24
08565		ASCIZ/SIMPLE/
08570	 
08575	SYM144:	XWD SYM143,SYM139
08580		5
08585		POINT 7,.+2
08590		XWD RES+CLSIDX,343
08595		ASCIZ/ARRAY/
08600	 
08605	SYM145:	XWD SYM144,SYM116
08610		13
08615		POINT 7,.+2
08620		XWD RES+CLSIDX,107
08625		ASCIZ/LOAD_MODULE/
08630	 
08635	SYM146:	XWD SYM145,SYM115
08640		4
08645		POINT 7,.+2
08650		XWD RES+CLSIDX,256
08655		ASCIZ/IFCR/
08660	 
08665	SYM147:	XWD SYM146,SYM143
08670		6
08675		POINT 7,.+2
08680		XWD RES+CLSIDX,226
08685		ASCIZ/DELETE/
08690	 
08695	SYM148:	XWD SYM147,SYM146
08700		22
08705		POINT 7,.+2
08710		XWD RES+CLSIDX,112
08715		ASCIZ/REPLACE_DELIMITERS/
08720	 
08725	SYM149:	XWD SYM148,SYM142
08730		5
08735		POINT 7,.+2
08740		XWD RES+CLSIDX,155
08745		ASCIZ/AFTER/
08750	 
08755	SYM150:	XWD SYM149,SYM130
08760		7
08765		POINT 7,.+2
08770		XWD RES+CLSIDX,253
08775		ASCIZ/FOREACH/
08780	 
08785	SYM151:	XWD SYM150,SYM136
08790		12
08795		POINT 7,.+2
08800		XWD RES+CLSIDX,330
08805		ASCIZ/NOW_UNSAFE/
08810	 
08815	SYM152:	XWD SYM151,SYM144
08820		5
08825		POINT 7,.+2
08830		XWD RES+CLSIDX,344
08835		ASCIZ/UNION/
08840	 
08845	SYM153:	XWD SYM152,SYM127
08850		12
08855		POINT 7,.+2
08860		XWD RES+CLSIDX,235
08865		ASCIZ/QUICK_CODE/
08870	 
08875	SYM154:	XWD SYM153,SYM138
08880		12
08885		POINT 7,.+2
08890		XWD RES+CLSIDX,345
08895		ASCIZ/LEAP_ARRAY/
08900	 
08905	SYM155:	XWD SYM154,SYM145
08910		2
08915		POINT 7,.+2
08920		XWD RES+CLSIDX,272
08925		ASCIZ/OF/
08930	 
08935	SYM156:	XWD SYM155,SYM141
08940		7
08945		POINT 7,.+2
08950		XWD RES+CLSIDX,154
08955		ASCIZ/RESTORE/
08960	 
08965	SYM157:	XWD SYM156,SYM128
08970		11
08975		POINT 7,.+2
08980		XWD RES+CLSIDX,20
08985		ASCIZ/RECURSIVE/
08990	 
08995	SYM158:	XWD SYM157,SYM155
09000		3
09005		POINT 7,.+2
09010		XWD RES+CLSIDX,45
09015		ASCIZ/LSH/
09020	 
09025	SYM159:	XWD SYM158,SYM151
09030		3
09035		POINT 7,.+2
09040		XWD RES+CLSIDX,146
09045		ASCIZ/PUT/
09050	 
09055	SYM160:	XWD SYM159,SYM159
09060		3
09065		POINT 7,.+2
09070		XWD RES+CLSIDX,175
09075		ASCIZ/CVI/
09080	 
09085	SYM161:	XWD SYM160,SYM148
09090		4
09095		POINT 7,.+2
09100		XWD RES+CLSIDX,5
09105		ASCIZ/REAL/
09110	 
09115	SYM162:	XWD SYM161,SYM135
09120		4
09125		POINT 7,.+2
09130		XWD RES+CLSIDX,326
09135		ASCIZ/SETC/
09140	 
09145	SYM163:	XWD SYM162,SYM134
09150		7
09155		POINT 7,.+2
09160		XWD RES+CLSIDX,150
09165		ASCIZ/SUCCEED/
09170	 
09175	SYM164:	XWD SYM163,SYM162
09180		4
09185		POINT 7,.+2
09190		XWD RES+CLSIDX,11
09195		ASCIZ/LIST/
09200	 
09205	SYM165:	XWD SYM164,SYM149
09210		10
09215		POINT 7,.+2
09220		XWD RES+CLSIDX,346
09225		ASCIZ/BUILT_IN/
09230	 
09235	SYM166:	XWD SYM165,SYM164
09240		6
09245		POINT 7,.+2
09250		XWD RES+CLSIDX,7
09255		ASCIZ/STRING/
09260	 
09265	SYM167:	XWD SYM166,SYM152
09270		13
09275		POINT 7,.+2
09280		XWD RES+CLSIDX,310
09285		ASCIZ/INTERROGATE/
09290	 
09295	SYM168:	XWD SYM167,SYM154
09300		4
09305		POINT 7,.+2
09310		XWD RES+CLSIDX,347
09315		ASCIZ/BIND/
09320	 
09325	SYM169:	XWD SYM168,SYM168
09330		4
09335		POINT 7,.+2
09340		XWD RES+CLSIDX,167
09345		ASCIZ/ILDB/
09350	 
09355	SYM170:	XWD SYM169,SYM147
09360		4
09365		POINT 7,.+2
09370		XWD RES+CLSIDX,1
09375		ASCIZ/ITEM/
09380	 
09385	SYM171:	XWD SYM170,SYM167
09390		4
09395		POINT 7,.+2
09400		XWD RES+CLSIDX,350
09405		ASCIZ/THAT/
09410	 
09415	SYM172:	XWD SYM171,SYM169
09420		6
09425		POINT 7,.+2
09430		XWD RES+CLSIDX,77
09435		ASCIZ/PNAMES/
09440	 
09445	SYM173:	XWD SYM172,SYM156
09450		11
09455		POINT 7,.+2
09460		XWD RES+CLSIDX,311
09465		ASCIZ/EXPR_TYPE/
09470	 
09475	SYM174:	XWD SYM173,SYM165
09480		6
09485		POINT 7,.+2
09490		XWD RES+CLSIDX,177
09495		ASCIZ/CVLIST/
09500	 
09505	SYM175:	XWD SYM174,SYM161
09510		2
09515		POINT 7,.+2
09520		XWD RES+CLSIDX,137
09525		ASCIZ/IN/
09530	 
09535	SYM176:	XWD SYM175,SYM160
09540		10
09545		POINT 7,.+2
09550		XWD RES+CLSIDX,16
09555		ASCIZ/EXTERNAL/
09560	 
09565	SYM177:	XWD SYM176,SYM172
09570		10
09575		POINT 7,.+2
09580		XWD RES+CLSIDX,351
09585		ASCIZ/NEEDNEXT/
09590	 
09595	SYM178:	XWD SYM177,SYM158
09600		4
09605		POINT 7,.+2
09610		XWD RES+CLSIDX,36
09615		ASCIZ/LAND/
09620	 
09625	SYM179:	XWD SYM178,SYM174
09630		7
09635		POINT 7,.+2
09640		XWD RES+CLSIDX,6
09645		ASCIZ/INTEGER/
09650	 
09655	SYM180:	XWD SYM179,SYM175
09660		13
09665		POINT 7,.+2
09670		XWD RES+CLSIDX,352
09675		ASCIZ/DECLARATION/
09680	 
09685	SYM181:	XWD SYM180,SYM178
09690		12
09695		POINT 7,.+2
09700		XWD RES+CLSIDX,101
09705		ASCIZ/STRING_PDL/
09710	 
09715	SYM182:	XWD SYM181,SYM179
09720		7
09725		POINT 7,.+2
09730		XWD RES+CLSIDX,13
09735		ASCIZ/CONTEXT/
09740	 
09745	SYM183:	XWD SYM182,SYM153
09750		6
09755		POINT 7,.+2
09760		XWD RES+CLSIDX,147
09765		ASCIZ/REMOVE/
09770	 
09775	SYM184:	XWD SYM183,SYM176
09780		3
09785		POINT 7,.+2
09790		XWD RES+CLSIDX,56
09795		ASCIZ/LEQ/
09800	 
09805	SYM185:	XWD SYM184,SYM183
09810		4
09815		POINT 7,.+2
09820		XWD RES+CLSIDX,126
09825		ASCIZ/STEP/
09830	 
09835	SYM186:	XWD SYM185,SYM182
09840		5
09845		POINT 7,.+2
09850		XWD RES+CLSIDX,171
09855		ASCIZ/FIRST/
09860	 
09865	SYM187:	XWD SYM186,SYM166
09870		4
09875		POINT 7,.+2
09880		XWD RES+CLSIDX,144
09885		ASCIZ/MAKE/
09890	 
09895	SYM188:	XWD SYM187,SYM181
09900		10
09905		POINT 7,.+2
09910		XWD RES+CLSIDX,313
09915		ASCIZ/REF_ITEM/
09920	 
09925	SYM189:	XWD SYM188,SYM180
09930		6
09935		POINT 7,.+2
09940		XWD RES+CLSIDX,353
09945		ASCIZ/SAMEIV/
09950	 
09955	SYM190:	XWD SYM189,SYM189
09960		7
09965		POINT 7,.+2
09970		XWD RES+CLSIDX,120
09975		ASCIZ/BUCKETS/
09980	 
09985	SYM191:	XWD SYM190,SYM186
09990		2
09995		POINT 7,.+2
10000		XWD RES+CLSIDX,132
10005		ASCIZ/TO/
10010	 
10015	SYM192:	XWD SYM191,SYM170
10020		5
10025		POINT 7,.+2
10030		XWD RES+CLSIDX,354
10035		ASCIZ/ENTRY/
10040	 
10045	SYM193:	XWD SYM192,SYM191
10050		13
10055		POINT 7,.+2
10060		XWD RES+CLSIDX,72
10065		ASCIZ/PROTECT_ACS/
10070	 
10075	SYM194:	XWD SYM193,SYM193
10080		5
10085		POINT 7,.+2
10090		XWD RES+CLSIDX,41
10095		ASCIZ/ASSOC/
10100	 
10105	SYM195:	XWD SYM194,SYM184
10110		4
10115		POINT 7,.+2
10120		XWD RES+CLSIDX,355
10125		ASCIZ/FORC/
10130	 
10135	SYM196:	XWD SYM195,SYM188
10140		6
10145		POINT 7,.+2
10150		XWD RES+CLSIDX,153
10155		ASCIZ/FORGET/
10160	 
10165	SYM197:	XWD SYM196,SYM150
10170		3
10175		POINT 7,.+2
10180		XWD RES+CLSIDX,37
10185		ASCIZ/LOR/
10190	 
10195	SYM198:	XWD SYM197,SYM173
10200		4
10205		POINT 7,.+2
10210		XWD RES+CLSIDX,303
10215		ASCIZ/SWAP/
10220	 
10225	SYM199:	XWD SYM198,SYM195
10230		4
10235		POINT 7,.+2
10240		XWD RES+CLSIDX,200
10245		ASCIZ/IDPB/
10250	 
10255	SYM200:	XWD SYM199,SYM199
10260		5
10265		POINT 7,.+2
10270		XWD RES+CLSIDX,66
10275		ASCIZ/NOMAC/
10280	 
10285	SYM201:	XWD SYM200,SYM194
10290		2
10295		POINT 7,.+2
10300		XWD RES+CLSIDX,315
10305		ASCIZ/IF/
10310	 
10315	SYM202:	XWD SYM201,SYM198
10320		3
10325		POINT 7,.+2
10330		XWD RES+CLSIDX,202
10335		ASCIZ/IBP/
10340	 
10345	SYM203:	XWD SYM202,SYM157
10350		3
10355		POINT 7,.+2
10360		XWD RES+CLSIDX,164
10365		ASCIZ/LOP/
10370	 
10375	SYM204:	XWD SYM203,SYM202
10380		3
10385		POINT 7,.+2
10390		XWD RES+CLSIDX,134
10395		ASCIZ/END/
10400	 
10405	SYM205:	XWD SYM204,SYM204
10410		3
10415		POINT 7,.+2
10420		XWD RES+CLSIDX,60
10425		ASCIZ/MAX/
10430	 
10435	SYM206:	XWD SYM205,SYM205
10440		4
10445		POINT 7,.+2
10450		XWD RES+CLSIDX,277
10455		ASCIZ/THEN/
10460	 
10465	SYM207:	XWD SYM206,SYM163
10470		12
10475		POINT 7,.+2
10480		XWD RES+CLSIDX,356
10485		ASCIZ/CHECK_TYPE/
10490	 
10495	SYM208:	XWD SYM207,SYM190
10500		10
10505		POINT 7,.+2
10510		XWD RES+CLSIDX,163
10515		ASCIZ/ISTRIPLE/
10520	 
10525	SYM209:	XWD SYM208,SYM196
10530		4
10535		POINT 7,.+2
10540		XWD RES+CLSIDX,15
10545		ASCIZ/SAFE/
10550	 
10555	SYM210:	XWD SYM209,SYM209
10560		4
10565		POINT 7,.+2
10570		XWD RES+CLSIDX,135
10575		ASCIZ/ELSE/
10580	 
10585	SYM211:	XWD SYM210,SYM200
10590		3
10595		POINT 7,.+2
10600		XWD RES+CLSIDX,170
10605		ASCIZ/LDB/
10610	 
10615	SYM212:	XWD SYM211,SYM211
10620		6
10625		POINT 7,.+2
10630		XWD RES+CLSIDX,306
10635		ASCIZ/SPROUT/
10640	 
10645	SYM213:	XWD SYM212,SYM197
10650		5
10655		POINT 7,.+2
10660		XWD RES+CLSIDX,162
10665		ASCIZ/FALSE/
10670	 
10675	SYM214:	XWD SYM213,SYM212
10680		12
10685		POINT 7,.+2
10690		XWD RES+CLSIDX,262
10695		ASCIZ/IN_CONTEXT/
10700	 
10705	SYM215:	XWD SYM214,SYM208
10710		3
10715		POINT 7,.+2
10720		XWD RES+CLSIDX,271
10725		ASCIZ/NEW/
10730	 
10735	SYM216:	XWD SYM215,SYM187
10740		3
10745		POINT 7,.+2
10750		XWD RES+CLSIDX,273
10755		ASCIZ/OFC/
10760	 
10765	SYM217:	XWD SYM216,SYM206
10770		11
10775		POINT 7,.+2
10780		XWD RES+CLSIDX,103
10785		ASCIZ/ARRAY_PDL/
10790	 
10795	SYM218:	XWD SYM217,SYM203
10800		3
10805		POINT 7,.+2
10810		XWD RES+CLSIDX,3
10815		ASCIZ/SET/
10820	 
10825	SYM219:	XWD SYM218,SYM213
10830		5
10835		POINT 7,.+2
10840		XWD RES+CLSIDX,127
10845		ASCIZ/UNTIL/
10850	 
10855	SYM220:	XWD SYM219,SYM192
10860		5
10865		POINT 7,.+2
10870		XWD RES+CLSIDX,145
10875		ASCIZ/ERASE/
10880	 
10885	SYM221:	XWD SYM220,SYM216
10890		3
10895		POINT 7,.+2
10900		XWD RES+CLSIDX,133
10905		ASCIZ/FOR/
10910	 
10915	SYM222:	XWD SYM221,SYM185
10920		20
10925		POINT 7,.+2
10930		XWD RES+CLSIDX,117
10935		ASCIZ/POLLING_INTERVAL/
10940	 
10945	SYM223:	XWD SYM222,SYM215
10950		6
10955		POINT 7,.+2
10960		XWD RES+CLSIDX,357
10965		ASCIZ/ACCESS/
10970	 
10975	SYM224:	XWD SYM223,SYM217
10980		3
10985		POINT 7,.+2
10990		XWD RES+CLSIDX,61
10995		ASCIZ/MIN/
11000	 
11005	SYM225:	XWD SYM224,SYM210
11010		10
11015		POINT 7,.+2
11020		XWD RES+CLSIDX,12
11025		ASCIZ/KILL_SET/
11030	 
11035	SYM226:	XWD SYM225,SYM220
11040		10
11045		POINT 7,.+2
11050		XWD RES+CLSIDX,14
11055		ASCIZ/INTERNAL/
11060	 
11065	SYM227:	XWD SYM226,SYM218
11070		10
11075		POINT 7,.+2
11080		XWD RES+CLSIDX,327
11085		ASCIZ/NOW_SAFE/
11090	 
11095	SYM228:	XWD SYM227,SYM214
11100		4
11105		POINT 7,.+2
11110		XWD RES+CLSIDX,161
11115		ASCIZ/TRUE/
11120	 
11125	SYM229:	XWD SYM228,SYM221
11130		3
11135		POINT 7,.+2
11140		XWD RES+CLSIDX,201
11145		ASCIZ/DPB/
11150	 
11155	SYM230:	XWD SYM229,SYM219
11160		5
11165		POINT 7,.+2
11170		XWD RES+CLSIDX,4
11175		ASCIZ/LABEL/
11180	 
11185	SYM231:	XWD SYM230,SYM222
11190		5
11195		POINT 7,.+2
11200		XWD RES+CLSIDX,130
11205		ASCIZ/WHILE/
11210	 
11215	SYM232:	XWD SYM231,SYM223
11220		12
11225		POINT 7,.+2
11230		XWD RES+CLSIDX,111
11235		ASCIZ/DELIMITERS/
11240	 
11245	SYM233:	XWD SYM232,SYM228
11250		4
11255		POINT 7,.+2
11260		XWD RES+CLSIDX,360
11265		ASCIZ/GOTO/
11270	 
11275	SYM234:	XWD SYM233,SYM171
11280		3
11285		POINT 7,.+2
11290		XWD RES+CLSIDX,17
11295		ASCIZ/OWN/
11300	 
11305	SYM235:	XWD SYM234,SYM231
11310		3
11315		POINT 7,.+2
11320		XWD RES+CLSIDX,40
11325		ASCIZ/XOR/
11330	 
11335	SYM236:	XWD SYM235,SYM227
11340		10
11345		POINT 7,.+2
11350		XWD RES+CLSIDX,25
11355		ASCIZ/MATCHING/
11360	 
11365	SYM237:	XWD SYM236,SYM232
11370		6
11375		POINT 7,.+2
11380		XWD RES+CLSIDX,302
11385		ASCIZ/WHILEC/
11390	 
11395	SYM238:	XWD SYM237,SYM234
11400		17
11405		POINT 7,.+2
11410		XWD RES+CLSIDX,114
11415		ASCIZ/NULL_DELIMITERS/
11420	 
11425	SYM239:	XWD SYM238,SYM236
11430		14
11435		POINT 7,.+2
11440		XWD RES+CLSIDX,70
11445		ASCIZ/PRELOAD_WITH/
11450	 
11455	SYM240:	XWD SYM239,SYM238
11460		6
11465		POINT 7,.+2
11470		XWD RES+CLSIDX,322
11475		ASCIZ/UNTILC/
11480	 
11485	SYM241:	XWD SYM240,SYM201
11490		3
11495		POINT 7,.+2
11500		XWD RES+CLSIDX,47
11505		ASCIZ/DIV/
11510	 
11515	SYM242:	XWD SYM241,SYM207
11520		3
11525		POINT 7,.+2
11530		XWD RES+CLSIDX,55
11535		ASCIZ/NEQ/
11540	 
11545	SYM243:	XWD SYM242,SYM233
11550		5
11555		POINT 7,.+2
11560		XWD RES+CLSIDX,361
11565		ASCIZ/FORLC/
11570	 
11575	SYM244:	XWD SYM243,SYM242
11580		7
11585		POINT 7,.+2
11590		XWD RES+CLSIDX,105
11595		ASCIZ/VERSION/
11600	 
11605	SYM245:	XWD SYM244,SYM244
11610		3
11615		POINT 7,.+2
11620		XWD RES+CLSIDX,362
11625		ASCIZ/NIL/
11630	 
11635	SYM246:	XWD SYM245,SYM224
11640		6
11645		POINT 7,.+2
11650		XWD RES+CLSIDX,274
11655		ASCIZ/RETURN/
11660	 
11665	SYM247:	XWD SYM246,SYM226
11670		5
11675		POINT 7,.+2
11680		XWD RES+CLSIDX,23
11685		ASCIZ/SHORT/
11690	 
11695	SYM248:	XWD SYM247,SYM235
11700		4
11705		POINT 7,.+2
11710		XWD RES+CLSIDX,363
11715		ASCIZ/SETO/
11720	 
11725	SYM249:	XWD SYM248,SYM248
11730		4
11735		POINT 7,.+2
11740		XWD RES+CLSIDX,160
11745		ASCIZ/NULL/
11750	 
11755	SYM250:	XWD SYM249,SYM247
11760		14
11765		POINT 7,.+2
11770		XWD RES+CLSIDX,364
11775		ASCIZ/NULL_CONTEXT/
11780	 
11785	SYM251:	XWD SYM250,SYM241
11790		10
11795		POINT 7,.+2
11800		XWD RES+CLSIDX,64
11805		ASCIZ/REDEFINE/
11810	 
11815	SYM252:	XWD SYM251,SYM245
11820		4
11825		POINT 7,.+2
11830		XWD RES+CLSIDX,31
11835		ASCIZ/LNOT/
11840	 
11845	SYM253:	XWD SYM252,SYM230
11850		5
11855		POINT 7,.+2
11860		XWD RES+CLSIDX,365
11865		ASCIZ/INTER/
11870	 
11875	SYM254:	XWD SYM253,SYM252
11880		6
11885		POINT 7,.+2
11890		XWD RES+CLSIDX,227
11895		ASCIZ/MEMORY/
11900	 
11905	SYM255:	XWD SYM254,SYM246
11910		3
11915		POINT 7,.+2
11920		XWD RES+CLSIDX,57
11925		ASCIZ/GEQ/
11930	 
11935	SYM256:	XWD SYM255,SYM239
11940		2
11945		POINT 7,.+2
11950		XWD RES+CLSIDX,141
11955		ASCIZ/DO/
11960	 
11965	SYM257:	XWD SYM256,SYM256
11970		3
11975		POINT 7,.+2
11980		XWD RES+CLSIDX,165
11985		ASCIZ/CVN/
11990	 
11995	SYM258:	XWD SYM257,SYM250
12000		4
12005		POINT 7,.+2
12010		XWD RES+CLSIDX,320
12015		ASCIZ/ENDC/
12020	 
12025	SYM259:	XWD SYM258,SYM253
12030		3
12035		POINT 7,.+2
12040		XWD RES+CLSIDX,46
12045		ASCIZ/ROT/
12050	 
12055	SYM260:	XWD SYM259,SYM249
12060		11
12065		POINT 7,.+2
12070		XWD RES+CLSIDX,26
12075		ASCIZ/REFERENCE/
12080	 
12085	SYM261:	XWD SYM260,SYM260
12090		11
12095		POINT 7,.+2
12100		XWD RES+CLSIDX,116
12105		ASCIZ/PROCESSES/
12110	 
12115	SYM262:	XWD SYM261,SYM177
12120		3
12125		POINT 7,.+2
12130		XWD RES+CLSIDX,255
12135		ASCIZ/IFC/
12140	 
12145	SYM263:	XWD SYM262,SYM251
12150		3
12155		POINT 7,.+2
12160		XWD RES+CLSIDX,232
12165		ASCIZ/NOT/
12170	 
12175	SYM264:	XWD SYM263,SYM243
12180		5
12185		POINT 7,.+2
12190		XWD RES+CLSIDX,317
12195		ASCIZ/ELSEC/
12200	 
12205	SYM265:	XWD SYM264,SYM254
12210		4
12215		POINT 7,.+2
12220		XWD RES+CLSIDX,151
12225		ASCIZ/FAIL/
12230	 
12235	SYM266:	XWD SYM265,SYM258
12240		3
12245		POINT 7,.+2
12250		XWD RES+CLSIDX,50
12255		ASCIZ/MOD/
12260	 
12265	SYM267:	XWD SYM266,SYM264
12270		4
12275		POINT 7,.+2
12280		XWD RES+CLSIDX,366
12285		ASCIZ/CVMS/
12290	 
12295	SYM268:	XWD SYM267,SYM266
12300		4
12305		POINT 7,.+2
12310		XWD RES+CLSIDX,367
12315		ASCIZ/POLL/
12320	 
12325	SYM269:	XWD SYM268,SYM229
12330		6
12335		POINT 7,.+2
12340		XWD RES+CLSIDX,156
12345		ASCIZ/BEFORE/
12350	 
12355	SYM270:	XWD SYM269,SYM257
12360		5
12365		POINT 7,.+2
12370		XWD RES+CLSIDX,27
12375		ASCIZ/VALUE/
12380	 
12385	SYM271:	XWD SYM270,SYM262
12390		12
12395		POINT 7,.+2
12400		XWD RES+CLSIDX,370
12405		ASCIZ/DEPENDENTS/
12410	 
12415	SYM272:	XWD SYM271,SYM240
12420		12
12425		POINT 7,.+2
12430		XWD RES+CLSIDX,65
12435		ASCIZ/EVALDEFINE/
12440	 
12445	SYM273:	XWD SYM272,SYM271
12450		14
12455		POINT 7,.+2
12460		XWD RES+CLSIDX,102
12465		ASCIZ/STRING_SPACE/
12470	 
12475	SYM274:	XWD SYM273,SYM259
12480		5
12485		POINT 7,.+2
12490		XWD RES+CLSIDX,325
12495		ASCIZ/LISTC/
12500	 
12505	SYM275:	XWD SYM274,SYM265
12510		3
12515		POINT 7,.+2
12520		XWD RES+CLSIDX,174
12525		ASCIZ/COP/
12530	 
12535	SYM276:	XWD SYM275,SYM263
12540		10
12545		POINT 7,.+2
12550		XWD RES+CLSIDX,371
12555		ASCIZ/CONTINUE/
12560	 
12565	SYM277:	XWD SYM276,SYM261
12570		3
12575		POINT 7,.+2
12580		XWD RES+CLSIDX,71
12585		ASCIZ/LET/
12590	 
12595	SYM278:	XWD SYM277,SYM276
12600		2
12605		POINT 7,.+2
12610		XWD RES+CLSIDX,372
12615		ASCIZ/GO/
12620	 
12625	SYM279:	XWD SYM278,SYM270
12630		5
12635		POINT 7,.+2
12640		XWD RES+CLSIDX,373
12645		ASCIZ/SETIP/
12650	 
12655	SYM280:	XWD SYM279,SYM273
12660		10
12665		POINT 7,.+2
12670		XWD RES+CLSIDX,374
12675		ASCIZ/RESERVED/
12680	 
12685	SYM281:	XWD SYM280,SYM255
12690		6
12695		POINT 7,.+2
12700		XWD RES+CLSIDX,304
12705		ASCIZ/ASSIGN/
12710	 
12715	SYM282:	XWD SYM281,SYM280
12720		13
12725		POINT 7,.+2
12730		XWD RES+CLSIDX,110
12735		ASCIZ/SOURCE_FILE/
12740	 
12745	SYM283:	XWD SYM282,SYM275
12750		5
12755		POINT 7,.+2
12760		XWD RES+CLSIDX,375
12765		ASCIZ/SETCP/
12770	 
12775	SYM284:	XWD SYM283,SYM277
12780		4
12785		POINT 7,.+2
12790		XWD RES+CLSIDX,376
12795		ASCIZ/SUCH/
12800	 
12805	SYM285:	XWD SYM284,SYM284
12810		7
12815		POINT 7,.+2
12820		XWD RES+CLSIDX,67
12825		ASCIZ/REQUIRE/
12830	 
12835	SYM286:	XWD SYM285,SYM268
12840		5
12845		POINT 7,.+2
12850		XWD RES+CLSIDX,377
12855		ASCIZ/LISTO/
12860	 
12865	SYM287:	XWD SYM286,SYM267
12870		7
12875		POINT 7,.+2
12880		XWD RES+CLSIDX,21
12885		ASCIZ/FORTRAN/
12890	 
12895	SYM288:	XWD SYM287,SYM287
12900		7
12905		POINT 7,.+2
12910		XWD RES+CLSIDX,2
12915		ASCIZ/ITEMVAR/
12920	SYM288
12925	↑RESEND:
12930	
12935	
12940	
12945	
12950	↑MBUCK:	;INITIALIZED BUCKET
12955		XWD SYM285,SYM282
12960		XWD SYM281,SYM237
12965		XWD SYM269,SYM278
12970		XWD SYM272,SYM274
12975		XWD SYM225,SYM286
12980		XWD SYM279,SYM288
12985		XWD SYM283,0
12990	BEND	RESTAB