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+156
00050	↑RXOR  ←←CLASOP+42
00055	↑RAND  ←←CLASOP+306
00060	↑RNOT  ←←CLASOP+232
00065	↑RIN   ←←CLASOP+136
00070	↑ROR   ←←CLASOP+310
00075	↑RCOMME←←CLASOP+331
00080	↑REQV  ←←CLASOP+37
00085	↑RUNION←←CLASOP+335
00090	↑RINTER←←CLASOP+353
00095	↑RSETO ←←CLASOP+352
00100	↑RSETC ←←CLASOP+320
00105	↑RSWAP ←←CLASOP+300
00110	↑RLEQ  ←←CLASOP+60
00115	↑RNEQ  ←←CLASOP+57
00120	↑RGEQ  ←←CLASOP+61
00125	↑RASSOC←←CLASOP+43
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,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:	SYM53	;HEADER FOR CLRBUF
05380		6
05385		POINT 7,.+10
05390		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+UNTYPE
05395		0
05400		IFN DCS,<0+CLRBUF ;>0 
05405		BYTE (6) 0
05410		BLOCK	2
05415		XWD SYM75,SYM73
05420		ASCII /CLRBUF/
05425	
05430	
05435	
05440	
05445	SYM75:	SYM73	;HEADER FOR PTYGET
05450		6
05455		POINT 7,.+10
05460		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+INTEGR
05465		0
05470		IFN DCS,<0+PTYGET ;>0 
05475		BYTE (6) 0
05480		BLOCK	2
05485		XWD SYM76,SYM74
05490		ASCII /PTYGET/
05495	
05500	
05505	
05510	
05515	SYM76:	SYM72	;HEADER FOR PTYREL
05520		6
05525		POINT 7,.+10
05530		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+UNTYPE
05535		0
05540		IFN DCS,<0+PTYREL ;>0 
05545		BYTE (6) 1,0
05550		BLOCK	2
05555		XWD SYM77,SYM75
05560		ASCII /PTYREL/
05565	
05570	
05575	
05580	
05585	SYM77:	SYM69	;HEADER FOR PTIFRE
05590		6
05595		POINT 7,.+10
05600		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+INTEGR
05605		0
05610		IFN DCS,<0+PTIFRE ;>0 
05615		BYTE (6) 1,0
05620		BLOCK	2
05625		XWD SYM78,SYM76
05630		ASCII /PTIFRE/
05635	
05640	
05645	
05650	
05655	SYM78:	SYM77	;HEADER FOR PTOCNT
05660		6
05665		POINT 7,.+10
05670		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+INTEGR
05675		0
05680		IFN DCS,<0+PTOCNT ;>0 
05685		BYTE (6) 1,0
05690		BLOCK	2
05695		XWD SYM79,SYM77
05700		ASCII /PTOCNT/
05705	
05710	
05715	
05720	
05725	SYM79:	SYM61	;HEADER FOR PTCHRW
05730		6
05735		POINT 7,.+10
05740		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+INTEGR
05745		0
05750		IFN DCS,<0+PTCHRW ;>0 
05755		BYTE (6) 1,0
05760		BLOCK	2
05765		XWD SYM80,SYM78
05770		ASCII /PTCHRW/
05775	
05780	
05785	
05790	
05795	SYM80:	SYM79	;HEADER FOR PTCHRS
05800		6
05805		POINT 7,.+10
05810		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+INTEGR
05815		0
05820		IFN DCS,<0+PTCHRS ;>0 
05825		BYTE (6) 1,0
05830		BLOCK	2
05835		XWD SYM81,SYM79
05840		ASCII /PTCHRS/
05845	
05850	
05855	
05860	
05865	SYM81:	SYM80	;HEADER FOR PTOCHS
05870		6
05875		POINT 7,.+10
05880		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+UNTYPE
05885		0
05890		IFN DCS,<0+PTOCHS ;>0 
05895		BYTE (6) 1,1,0
05900		BLOCK	2
05905		XWD SYM82,SYM80
05910		ASCII /PTOCHS/
05915	
05920	
05925	
05930	
05935	SYM82:	SYM81	;HEADER FOR PTOCHW
05940		6
05945		POINT 7,.+10
05950		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+UNTYPE
05955		0
05960		IFN DCS,<0+PTOCHW ;>0 
05965		BYTE (6) 1,1,0
05970		BLOCK	2
05975		XWD SYM83,SYM81
05980		ASCII /PTOCHW/
05985	
05990	
05995	
06000	
06005	SYM83:	SYM52	;HEADER FOR PTOSTR
06010		6
06015		POINT 7,.+10
06020		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+UNTYPE
06025		0
06030		IFN DCS,<0+PTOSTR ;>0 
06035		BYTE (6) 1,2,0
06040		BLOCK	2
06045		XWD SYM84,SYM82
06050		ASCII /PTOSTR/
06055	
06060	
06065	
06070	
06075	SYM84:	SYM76	;HEADER FOR BACKUP
06080		6
06085		POINT 7,.+10
06090		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+UNTYPE
06095		0
06100		IFN DCS,<0+BACKUP ;>0 
06105		BYTE (6) 0
06110		BLOCK	2
06115		XWD SYM85,SYM83
06120		ASCII /BACKUP/
06125	
06130	
06135	
06140	
06145	SYM85:	SYM62	;HEADER FOR LODED
06150		5
06155		POINT 7,.+10
06160		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+UNTYPE
06165		0
06170		IFN DCS,<0+LODED ;>0 
06175		BYTE (6) 2,0
06180		BLOCK	2
06185		XWD SYM86,SYM84
06190		ASCII /LODED/
06195	
06200	
06205	
06210	
06215	SYM86:	SYM68	;HEADER FOR PTYALL
06220		6
06225		POINT 7,.+10
06230		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+STRING
06235		0
06240		IFN DCS,<0+PTYALL ;>0 
06245		BYTE (6) 1,0
06250		BLOCK	2
06255		XWD SYM87,SYM85
06260		ASCII /PTYALL/
06265	
06270	
06275	
06280	
06285	SYM87:	SYM51	;HEADER FOR PTYSTR
06290		6
06295		POINT 7,.+10
06300		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+STRING
06305		0
06310		IFN DCS,<0+PTYSTR ;>0 
06315		BYTE (6) 1,1,0
06320		BLOCK	2
06325		XWD SYM88,SYM86
06330		ASCII /PTYSTR/
06335	
06340	
06345	
06350	
06355	SYM88:	SYM70	;HEADER FOR PTYIN
06360		5
06365		POINT 7,.+10
06370		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+STRING
06375		0
06380		IFN DCS,<0+PTYIN ;>0 
06385		BYTE (6) 1,1,3,0
06390		BLOCK	2
06395		XWD SYM89,SYM87
06400		ASCII /PTYIN/
06405	
06410	
06415	
06420	
06425	SYM89:	SYM78	;HEADER FOR IFGLOBAL
06430		10
06435		POINT 7,.+10
06440		XWD	EXTRNL+OWN+BILTIN,PROCED+FORWRD+INTEGR
06445		0
06450		IFN DCS,<0+IFGLOBAL ;>0 
06455		BYTE (6) 13,0
06460		BLOCK	2
06465		XWD SYM90,SYM88
06470		ASCII /IFGLOBAL/
06475	
06480	
06485	
06490	
06495	SYM90:	SYM86	;HEADER FOR ISSUE
06500		5
06505		POINT 7,.+10
06510		XWD	EXTRNL+OWN,PROCED+FORWRD+INTEGR
06515		0
06520		IFN DCS,<0+ISSUE ;>0 
06525		BYTE (6) 1,2,2,2,0
06530		BLOCK	2
06535		XWD SYM91,SYM89
06540		ASCII /ISSUE/
06545	
06550	
06555	
06560	
06565	SYM91:	SYM82	;HEADER FOR QUEUE
06570		5
06575		POINT 7,.+10
06580		XWD	EXTRNL+OWN,PROCED+FORWRD+INTEGR
06585		0
06590		IFN DCS,<0+QUEUE ;>0 
06595		BYTE (6) 1,1,0
06600		BLOCK	2
06605		XWD SYM92,SYM90
06610		ASCII /QUEUE/
06615	
06620	
06625	
06630	
06635	SYM92:	SYM83	;HEADER FOR GET_DATA
06640		10
06645		POINT 7,.+10
06650		XWD	EXTRNL+OWN,PROCED+FORWRD+STRING
06655		0
06660		IFN DCS,<0+GET.DATA ;>0 
06665		BYTE (6) 1,1,0
06670		BLOCK	2
06675		XWD SYM93,SYM91
06680		ASCII /GET_DATA/
06685	
06690	
06695	
06700	
06705	SYM93:	SYM90	;HEADER FOR PUT_DATA
06710		10
06715		POINT 7,.+10
06720		XWD	EXTRNL+OWN,PROCED+FORWRD+UNTYPE
06725		0
06730		IFN DCS,<0+PUT.DATA ;>0 
06735		BYTE (6) 1,1,2,0
06740		BLOCK	2
06745		XWD SYM94,SYM92
06750		ASCII /PUT_DATA/
06755	
06760	
06765	
06770	
06775	SYM94:	SYM75	;HEADER FOR GET_BIT
06780		7
06785		POINT 7,.+10
06790		XWD	EXTRNL+OWN,PROCED+FORWRD+INTEGR
06795		0
06800		IFN DCS,<0+GET.BIT ;>0 
06805		BYTE (6) 1,0
06810		BLOCK	2
06815		XWD SYM95,SYM93
06820		ASCII /GET_BIT/
06825	
06830	
06835	
06840	
06845	SYM95:	SYM94	;HEADER FOR GET_ENTRY
06850		11
06855		POINT 7,.+10
06860		XWD	EXTRNL+OWN,PROCED+FORWRD+INTEGR
06865		0
06870		IFN DCS,<0+GET.ENTRY ;>0 
06875		BYTE (6) 1,2,2,2,0
06880		BLOCK	2
06885		XWD SYM96,SYM94
06890		ASCII /GET_ENTRY/
06895	
06900	
06905	
06910	
06915	SYM96:	SYM71	;HEADER FOR GET_SET
06920		7
06925		POINT 7,.+10
06930		XWD	EXTRNL+OWN,PROCED+FORWRD+SET
06935		0
06940		IFN DCS,<0+GET.SET ;>0 
06945		BYTE (6) 1,2,2,2,0
06950		BLOCK	2
06955		XWD SYM97,SYM95
06960		ASCII /GET_SET/
06965	
06970	
06975	
06980	
06985	↑BLTTBL←.-1
06990	XWD VALUE,INTEGR
06995	XWD VALUE,STRING
07000	XWD REFRNC,INTEGR
07005	XWD REFRNC,STRING
07010	XWD VALUE,INTEGR+FLOTNG
07015	XWD REFRNC,INTEGR+FLOTNG+ITMVAR
07020	XWD VALUE,FLOTNG
07025	XWD REFRNC+SBSCRP,INTEGR+FLOTNG+SET+LSTBIT+ITMVAR+STRING
07030	XWD REFRNC,INTEGR+FLOTNG+ITMVAR+SET
07035	XWD REFRNC+SBSCRP,INTEGR+FLOTNG+ITMVAR+SET+LSTBIT+STRING
07040	XWD VALUE,ITMVAR
07045	XWD VALUE,LSTBIT+SET
07050	XWD REFRNC+SBSCRP,INTEGR
07055	SYM97←0
07060	 
07065	SYM98:	XWD 0,SYM87
07070		4
07075		POINT 7,.+2
07080		XWD RES+CLSIDX,222
07085		ASCIZ/BBPP/
07090	 
07095	SYM99:	XWD SYM98,SYM96
07100		5
07105		POINT 7,.+2
07110		XWD RES+CLSIDX,236
07115		ASCIZ/BEGIN/
07120	 
07125	SYM100:	XWD SYM99,SYM85
07130		10
07135		POINT 7,.+2
07140		XWD RES+CLSIDX,151
07145		ASCIZ/REMEMBER/
07150	 
07155	SYM101:	XWD SYM100,SYM98
07160		6
07165		POINT 7,.+2
07170		XWD RES+CLSIDX,172
07175		ASCIZ/SECOND/
07180	 
07185	SYM102:	XWD SYM101,SYM93
07190		3
07195		POINT 7,.+2
07200		XWD RES+CLSIDX,326
07205		ASCIZ/PHI/
07210	 
07215	SYM103:	XWD SYM102,SYM101
07220		12
07225		POINT 7,.+2
07230		XWD RES+CLSIDX,234
07235		ASCIZ/START_CODE/
07240	 
07245	SYM104:	XWD SYM103,SYM92
07250		3
07255		POINT 7,.+2
07260		XWD RES+CLSIDX,156
07265		ASCIZ/INF/
07270	 
07275	SYM105:	XWD SYM104,SYM91
07280		4
07285		POINT 7,.+2
07290		XWD RES+CLSIDX,241
07295		ASCIZ/CASE/
07300	 
07305	SYM106:	XWD SYM105,SYM60
07310		14
07315		POINT 7,.+2
07320		XWD RES+CLSIDX,114
07325		ASCIZ/SEGMENT_NAME/
07330	 
07335	SYM107:	XWD SYM106,SYM84
07340		7
07345		POINT 7,.+2
07350		XWD RES+CLSIDX,105
07355		ASCIZ/LIBRARY/
07360	 
07365	SYM108:	XWD SYM107,SYM107
07370		12
07375		POINT 7,.+2
07380		XWD RES+CLSIDX,77
07385		ASCIZ/SYSTEM_PDL/
07390	 
07395	SYM109:	XWD SYM108,SYM106
07400		5
07405		POINT 7,.+2
07410		XWD RES+CLSIDX,304
07415		ASCIZ/CAUSE/
07420	 
07425	SYM110:	XWD SYM109,SYM102
07430		3
07435		POINT 7,.+2
07440		XWD RES+CLSIDX,327
07445		ASCIZ/ALL/
07450	 
07455	SYM111:	XWD SYM110,SYM103
07460		5
07465		POINT 7,.+2
07470		XWD RES+CLSIDX,224
07475		ASCIZ/DATUM/
07480	 
07485	SYM112:	XWD SYM111,SYM108
07490		5
07495		POINT 7,.+2
07500		XWD RES+CLSIDX,242
07505		ASCIZ/CASEC/
07510	 
07515	SYM113:	XWD SYM112,SYM110
07520		5
07525		POINT 7,.+2
07530		XWD RES+CLSIDX,302
07535		ASCIZ/APPLY/
07540	 
07545	SYM114:	XWD SYM113,SYM105
07550		11
07555		POINT 7,.+2
07560		XWD RES+CLSIDX,64
07565		ASCIZ/PROCEDURE/
07570	 
07575	SYM115:	XWD SYM114,SYM88
07580		4
07585		POINT 7,.+2
07590		XWD RES+CLSIDX,137
07595		ASCIZ/FROM/
07600	 
07605	SYM116:	XWD SYM115,SYM114
07610		3
07615		POINT 7,.+2
07620		XWD RES+CLSIDX,34
07625		ASCIZ/ABS/
07630	 
07635	SYM117:	XWD SYM116,SYM95
07640		5
07645		POINT 7,.+2
07650		XWD RES+CLSIDX,176
07655		ASCIZ/CVSET/
07660	 
07665	SYM118:	XWD SYM117,SYM109
07670		2
07675		POINT 7,.+2
07680		XWD RES+CLSIDX,310
07685		ASCIZ/OR/
07690	 
07695	SYM119:	XWD SYM118,SYM99
07700		5
07705		POINT 7,.+2
07710		XWD RES+CLSIDX,230
07715		ASCIZ/PROPS/
07720	 
07725	SYM120:	XWD SYM119,SYM74
07730		16
07735		POINT 7,.+2
07740		XWD RES+CLSIDX,330
07745		ASCIZ/INITIALIZATION/
07750	 
07755	SYM121:	XWD SYM120,SYM100
07760		3
07765		POINT 7,.+2
07770		XWD RES+CLSIDX,37
07775		ASCIZ/EQV/
07780	 
07785	SYM122:	XWD SYM121,SYM116
07790		3
07795		POINT 7,.+2
07800		XWD RES+CLSIDX,306
07805		ASCIZ/AND/
07810	 
07815	SYM123:	XWD SYM122,SYM121
07820		7
07825		POINT 7,.+2
07830		XWD RES+CLSIDX,10
07835		ASCIZ/BOOLEAN/
07840	 
07845	SYM124:	XWD SYM123,SYM118
07850		5
07855		POINT 7,.+2
07860		XWD RES+CLSIDX,275
07865		ASCIZ/THENC/
07870	 
07875	SYM125:	XWD SYM124,SYM119
07880		22
07885		POINT 7,.+2
07890		XWD RES+CLSIDX,112
07895		ASCIZ/UNSTACK_DELIMITERS/
07900	 
07905	SYM126:	XWD SYM125,SYM117
07910		7
07915		POINT 7,.+2
07920		XWD RES+CLSIDX,331
07925		ASCIZ/COMMENT/
07930	 
07935	SYM127:	XWD SYM126,SYM89
07940		10
07945		POINT 7,.+2
07950		XWD RES+CLSIDX,332
07955		ASCIZ/LOCATION/
07960	 
07965	SYM128:	XWD SYM127,SYM127
07970		7
07975		POINT 7,.+2
07980		XWD RES+CLSIDX,27
07985		ASCIZ/MESSAGE/
07990	 
07995	SYM129:	XWD SYM128,SYM111
08000		11
08005		POINT 7,.+2
08010		XWD RES+CLSIDX,103
08015		ASCIZ/NEW_ITEMS/
08020	 
08025	SYM130:	XWD SYM129,SYM120
08030		7
08035		POINT 7,.+2
08040		XWD RES+CLSIDX,72
08045		ASCIZ/CLEANUP/
08050	 
08055	SYM131:	XWD SYM130,SYM126
08060		4
08065		POINT 7,.+2
08070		XWD RES+CLSIDX,225
08075		ASCIZ/DONE/
08080	 
08085	SYM132:	XWD SYM131,SYM124
08090		5
08095		POINT 7,.+2
08100		XWD RES+CLSIDX,173
08105		ASCIZ/THIRD/
08110	 
08115	SYM133:	XWD SYM132,SYM104
08120		7
08125		POINT 7,.+2
08130		XWD RES+CLSIDX,22
08135		ASCIZ/FORWARD/
08140	 
08145	SYM134:	XWD SYM133,SYM115
08150		3
08155		POINT 7,.+2
08160		XWD RES+CLSIDX,245
08165		ASCIZ/DOC/
08170	 
08175	SYM135:	XWD SYM134,SYM132
08180		4
08185		POINT 7,.+2
08190		XWD RES+CLSIDX,333
08195		ASCIZ/NEXT/
08200	 
08205	SYM136:	XWD SYM135,SYM45
08210		6
08215		POINT 7,.+2
08220		XWD RES+CLSIDX,65
08225		ASCIZ/DEFINE/
08230	 
08235	SYM137:	XWD SYM136,SYM135
08240		6
08245		POINT 7,.+2
08250		XWD RES+CLSIDX,165
08255		ASCIZ/LENGTH/
08260	 
08265	SYM138:	XWD SYM137,SYM128
08270		6
08275		POINT 7,.+2
08280		XWD RES+CLSIDX,24
08285		ASCIZ/SIMPLE/
08290	 
08295	SYM139:	XWD SYM138,SYM134
08300		5
08305		POINT 7,.+2
08310		XWD RES+CLSIDX,334
08315		ASCIZ/ARRAY/
08320	 
08325	SYM140:	XWD SYM139,SYM113
08330		13
08335		POINT 7,.+2
08340		XWD RES+CLSIDX,106
08345		ASCIZ/LOAD_MODULE/
08350	 
08355	SYM141:	XWD SYM140,SYM138
08360		6
08365		POINT 7,.+2
08370		XWD RES+CLSIDX,226
08375		ASCIZ/DELETE/
08380	 
08385	SYM142:	XWD SYM141,SYM112
08390		22
08395		POINT 7,.+2
08400		XWD RES+CLSIDX,111
08405		ASCIZ/REPLACE_DELIMITERS/
08410	 
08415	SYM143:	XWD SYM142,SYM137
08420		5
08425		POINT 7,.+2
08430		XWD RES+CLSIDX,154
08435		ASCIZ/AFTER/
08440	 
08445	SYM144:	XWD SYM143,SYM125
08450		7
08455		POINT 7,.+2
08460		XWD RES+CLSIDX,252
08465		ASCIZ/FOREACH/
08470	 
08475	SYM145:	XWD SYM144,SYM131
08480		12
08485		POINT 7,.+2
08490		XWD RES+CLSIDX,322
08495		ASCIZ/NOW_UNSAFE/
08500	 
08505	SYM146:	XWD SYM145,SYM139
08510		5
08515		POINT 7,.+2
08520		XWD RES+CLSIDX,335
08525		ASCIZ/UNION/
08530	 
08535	SYM147:	XWD SYM146,SYM122
08540		12
08545		POINT 7,.+2
08550		XWD RES+CLSIDX,235
08555		ASCIZ/QUICK_CODE/
08560	 
08565	SYM148:	XWD SYM147,SYM133
08570		12
08575		POINT 7,.+2
08580		XWD RES+CLSIDX,336
08585		ASCIZ/LEAP_ARRAY/
08590	 
08595	SYM149:	XWD SYM148,SYM140
08600		2
08605		POINT 7,.+2
08610		XWD RES+CLSIDX,267
08615		ASCIZ/OF/
08620	 
08625	SYM150:	XWD SYM149,SYM136
08630		7
08635		POINT 7,.+2
08640		XWD RES+CLSIDX,153
08645		ASCIZ/RESTORE/
08650	 
08655	SYM151:	XWD SYM150,SYM123
08660		11
08665		POINT 7,.+2
08670		XWD RES+CLSIDX,20
08675		ASCIZ/RECURSIVE/
08680	 
08685	SYM152:	XWD SYM151,SYM149
08690		3
08695		POINT 7,.+2
08700		XWD RES+CLSIDX,47
08705		ASCIZ/LSH/
08710	 
08715	SYM153:	XWD SYM152,SYM145
08720		3
08725		POINT 7,.+2
08730		XWD RES+CLSIDX,145
08735		ASCIZ/PUT/
08740	 
08745	SYM154:	XWD SYM153,SYM153
08750		3
08755		POINT 7,.+2
08760		XWD RES+CLSIDX,175
08765		ASCIZ/CVI/
08770	 
08775	SYM155:	XWD SYM154,SYM142
08780		4
08785		POINT 7,.+2
08790		XWD RES+CLSIDX,5
08795		ASCIZ/REAL/
08800	 
08805	SYM156:	XWD SYM155,SYM130
08810		4
08815		POINT 7,.+2
08820		XWD RES+CLSIDX,320
08825		ASCIZ/SETC/
08830	 
08835	SYM157:	XWD SYM156,SYM129
08840		7
08845		POINT 7,.+2
08850		XWD RES+CLSIDX,147
08855		ASCIZ/SUCCEED/
08860	 
08865	SYM158:	XWD SYM157,SYM156
08870		4
08875		POINT 7,.+2
08880		XWD RES+CLSIDX,11
08885		ASCIZ/LIST/
08890	 
08895	SYM159:	XWD SYM158,SYM143
08900		6
08905		POINT 7,.+2
08910		XWD RES+CLSIDX,26
08915		ASCIZ/GLOBAL/
08920	 
08925	SYM160:	XWD SYM159,SYM159
08930		10
08935		POINT 7,.+2
08940		XWD RES+CLSIDX,337
08945		ASCIZ/BUILT_IN/
08950	 
08955	SYM161:	XWD SYM160,SYM158
08960		6
08965		POINT 7,.+2
08970		XWD RES+CLSIDX,7
08975		ASCIZ/STRING/
08980	 
08985	SYM162:	XWD SYM161,SYM148
08990		10
08995		POINT 7,.+2
09000		XWD RES+CLSIDX,340
09005		ASCIZ/NEEDNEXT/
09010	 
09015	SYM163:	XWD SYM162,SYM146
09020		13
09025		POINT 7,.+2
09030		XWD RES+CLSIDX,305
09035		ASCIZ/INTERROGATE/
09040	 
09045	SYM164:	XWD SYM163,SYM162
09050		4
09055		POINT 7,.+2
09060		XWD RES+CLSIDX,341
09065		ASCIZ/BIND/
09070	 
09075	SYM165:	XWD SYM164,SYM160
09080		14
09085		POINT 7,.+2
09090		XWD RES+CLSIDX,115
09095		ASCIZ/SEGMENT_FILE/
09100	 
09105	SYM166:	XWD SYM165,SYM164
09110		4
09115		POINT 7,.+2
09120		XWD RES+CLSIDX,166
09125		ASCIZ/ILDB/
09130	 
09135	SYM167:	XWD SYM166,SYM141
09140		4
09145		POINT 7,.+2
09150		XWD RES+CLSIDX,1
09155		ASCIZ/ITEM/
09160	 
09165	SYM168:	XWD SYM167,SYM163
09170		4
09175		POINT 7,.+2
09180		XWD RES+CLSIDX,342
09185		ASCIZ/THAT/
09190	 
09195	SYM169:	XWD SYM168,SYM166
09200		6
09205		POINT 7,.+2
09210		XWD RES+CLSIDX,76
09215		ASCIZ/PNAMES/
09220	 
09225	SYM170:	XWD SYM169,SYM165
09230		6
09235		POINT 7,.+2
09240		XWD RES+CLSIDX,177
09245		ASCIZ/CVLIST/
09250	 
09255	SYM171:	XWD SYM170,SYM155
09260		2
09265		POINT 7,.+2
09270		XWD RES+CLSIDX,136
09275		ASCIZ/IN/
09280	 
09285	SYM172:	XWD SYM171,SYM154
09290		10
09295		POINT 7,.+2
09300		XWD RES+CLSIDX,16
09305		ASCIZ/EXTERNAL/
09310	 
09315	SYM173:	XWD SYM172,SYM167
09320		5
09325		POINT 7,.+2
09330		XWD RES+CLSIDX,170
09335		ASCIZ/BOUND/
09340	 
09345	SYM174:	XWD SYM173,SYM152
09350		4
09355		POINT 7,.+2
09360		XWD RES+CLSIDX,40
09365		ASCIZ/LAND/
09370	 
09375	SYM175:	XWD SYM174,SYM170
09380		7
09385		POINT 7,.+2
09390		XWD RES+CLSIDX,6
09395		ASCIZ/INTEGER/
09400	 
09405	SYM176:	XWD SYM175,SYM171
09410		13
09415		POINT 7,.+2
09420		XWD RES+CLSIDX,343
09425		ASCIZ/DECLARATION/
09430	 
09435	SYM177:	XWD SYM176,SYM174
09440		12
09445		POINT 7,.+2
09450		XWD RES+CLSIDX,100
09455		ASCIZ/STRING_PDL/
09460	 
09465	SYM178:	XWD SYM177,SYM175
09470		7
09475		POINT 7,.+2
09480		XWD RES+CLSIDX,13
09485		ASCIZ/CONTEXT/
09490	 
09495	SYM179:	XWD SYM178,SYM147
09500		6
09505		POINT 7,.+2
09510		XWD RES+CLSIDX,146
09515		ASCIZ/REMOVE/
09520	 
09525	SYM180:	XWD SYM179,SYM172
09530		3
09535		POINT 7,.+2
09540		XWD RES+CLSIDX,60
09545		ASCIZ/LEQ/
09550	 
09555	SYM181:	XWD SYM180,SYM179
09560		4
09565		POINT 7,.+2
09570		XWD RES+CLSIDX,125
09575		ASCIZ/STEP/
09580	 
09585	SYM182:	XWD SYM181,SYM178
09590		5
09595		POINT 7,.+2
09600		XWD RES+CLSIDX,171
09605		ASCIZ/FIRST/
09610	 
09615	SYM183:	XWD SYM182,SYM161
09620		4
09625		POINT 7,.+2
09630		XWD RES+CLSIDX,143
09635		ASCIZ/MAKE/
09640	 
09645	SYM184:	XWD SYM183,SYM182
09650		2
09655		POINT 7,.+2
09660		XWD RES+CLSIDX,131
09665		ASCIZ/TO/
09670	 
09675	SYM185:	XWD SYM184,SYM173
09680		5
09685		POINT 7,.+2
09690		XWD RES+CLSIDX,344
09695		ASCIZ/ENTRY/
09700	 
09705	SYM186:	XWD SYM185,SYM184
09710		13
09715		POINT 7,.+2
09720		XWD RES+CLSIDX,71
09725		ASCIZ/PROTECT_ACS/
09730	 
09735	SYM187:	XWD SYM186,SYM186
09740		5
09745		POINT 7,.+2
09750		XWD RES+CLSIDX,43
09755		ASCIZ/ASSOC/
09760	 
09765	SYM188:	XWD SYM187,SYM180
09770		4
09775		POINT 7,.+2
09780		XWD RES+CLSIDX,345
09785		ASCIZ/FORC/
09790	 
09795	SYM189:	XWD SYM188,SYM177
09800		6
09805		POINT 7,.+2
09810		XWD RES+CLSIDX,152
09815		ASCIZ/FORGET/
09820	 
09825	SYM190:	XWD SYM189,SYM144
09830		3
09835		POINT 7,.+2
09840		XWD RES+CLSIDX,41
09845		ASCIZ/LOR/
09850	 
09855	SYM191:	XWD SYM190,SYM150
09860		4
09865		POINT 7,.+2
09870		XWD RES+CLSIDX,300
09875		ASCIZ/SWAP/
09880	 
09885	SYM192:	XWD SYM191,SYM188
09890		4
09895		POINT 7,.+2
09900		XWD RES+CLSIDX,200
09905		ASCIZ/IDPB/
09910	 
09915	SYM193:	XWD SYM192,SYM187
09920		2
09925		POINT 7,.+2
09930		XWD RES+CLSIDX,307
09935		ASCIZ/IF/
09940	 
09945	SYM194:	XWD SYM193,SYM191
09950		3
09955		POINT 7,.+2
09960		XWD RES+CLSIDX,202
09965		ASCIZ/IBP/
09970	 
09975	SYM195:	XWD SYM194,SYM151
09980		3
09985		POINT 7,.+2
09990		XWD RES+CLSIDX,163
09995		ASCIZ/LOP/
10000	 
10005	SYM196:	XWD SYM195,SYM194
10010		3
10015		POINT 7,.+2
10020		XWD RES+CLSIDX,133
10025		ASCIZ/END/
10030	 
10035	SYM197:	XWD SYM196,SYM196
10040		3
10045		POINT 7,.+2
10050		XWD RES+CLSIDX,62
10055		ASCIZ/MAX/
10060	 
10065	SYM198:	XWD SYM197,SYM197
10070		4
10075		POINT 7,.+2
10080		XWD RES+CLSIDX,274
10085		ASCIZ/THEN/
10090	 
10095	SYM199:	XWD SYM198,SYM157
10100		12
10105		POINT 7,.+2
10110		XWD RES+CLSIDX,346
10115		ASCIZ/CHECK_TYPE/
10120	 
10125	SYM200:	XWD SYM199,SYM176
10130		10
10135		POINT 7,.+2
10140		XWD RES+CLSIDX,162
10145		ASCIZ/ISTRIPLE/
10150	 
10155	SYM201:	XWD SYM200,SYM189
10160		4
10165		POINT 7,.+2
10170		XWD RES+CLSIDX,15
10175		ASCIZ/SAFE/
10180	 
10185	SYM202:	XWD SYM201,SYM201
10190		4
10195		POINT 7,.+2
10200		XWD RES+CLSIDX,134
10205		ASCIZ/ELSE/
10210	 
10215	SYM203:	XWD SYM202,SYM192
10220		3
10225		POINT 7,.+2
10230		XWD RES+CLSIDX,167
10235		ASCIZ/LDB/
10240	 
10245	SYM204:	XWD SYM203,SYM203
10250		6
10255		POINT 7,.+2
10260		XWD RES+CLSIDX,303
10265		ASCIZ/SPROUT/
10270	 
10275	SYM205:	XWD SYM204,SYM190
10280		5
10285		POINT 7,.+2
10290		XWD RES+CLSIDX,161
10295		ASCIZ/FALSE/
10300	 
10305	SYM206:	XWD SYM205,SYM200
10310		3
10315		POINT 7,.+2
10320		XWD RES+CLSIDX,266
10325		ASCIZ/NEW/
10330	 
10335	SYM207:	XWD SYM206,SYM183
10340		3
10345		POINT 7,.+2
10350		XWD RES+CLSIDX,270
10355		ASCIZ/OFC/
10360	 
10365	SYM208:	XWD SYM207,SYM198
10370		11
10375		POINT 7,.+2
10380		XWD RES+CLSIDX,102
10385		ASCIZ/ARRAY_PDL/
10390	 
10395	SYM209:	XWD SYM208,SYM195
10400		3
10405		POINT 7,.+2
10410		XWD RES+CLSIDX,3
10415		ASCIZ/SET/
10420	 
10425	SYM210:	XWD SYM209,SYM205
10430		5
10435		POINT 7,.+2
10440		XWD RES+CLSIDX,126
10445		ASCIZ/UNTIL/
10450	 
10455	SYM211:	XWD SYM210,SYM185
10460		5
10465		POINT 7,.+2
10470		XWD RES+CLSIDX,144
10475		ASCIZ/ERASE/
10480	 
10485	SYM212:	XWD SYM211,SYM207
10490		3
10495		POINT 7,.+2
10500		XWD RES+CLSIDX,132
10505		ASCIZ/FOR/
10510	 
10515	SYM213:	XWD SYM212,SYM181
10520		20
10525		POINT 7,.+2
10530		XWD RES+CLSIDX,117
10535		ASCIZ/POLLING_INTERVAL/
10540	 
10545	SYM214:	XWD SYM213,SYM208
10550		3
10555		POINT 7,.+2
10560		XWD RES+CLSIDX,63
10565		ASCIZ/MIN/
10570	 
10575	SYM215:	XWD SYM214,SYM202
10580		10
10585		POINT 7,.+2
10590		XWD RES+CLSIDX,12
10595		ASCIZ/KILL_SET/
10600	 
10605	SYM216:	XWD SYM215,SYM211
10610		10
10615		POINT 7,.+2
10620		XWD RES+CLSIDX,14
10625		ASCIZ/INTERNAL/
10630	 
10635	SYM217:	XWD SYM216,SYM209
10640		10
10645		POINT 7,.+2
10650		XWD RES+CLSIDX,321
10655		ASCIZ/NOW_SAFE/
10660	 
10665	SYM218:	XWD SYM217,SYM204
10670		4
10675		POINT 7,.+2
10680		XWD RES+CLSIDX,160
10685		ASCIZ/TRUE/
10690	 
10695	SYM219:	XWD SYM218,SYM212
10700		3
10705		POINT 7,.+2
10710		XWD RES+CLSIDX,201
10715		ASCIZ/DPB/
10720	 
10725	SYM220:	XWD SYM219,SYM210
10730		5
10735		POINT 7,.+2
10740		XWD RES+CLSIDX,4
10745		ASCIZ/LABEL/
10750	 
10755	SYM221:	XWD SYM220,SYM213
10760		5
10765		POINT 7,.+2
10770		XWD RES+CLSIDX,127
10775		ASCIZ/WHILE/
10780	 
10785	SYM222:	XWD SYM221,SYM206
10790		12
10795		POINT 7,.+2
10800		XWD RES+CLSIDX,110
10805		ASCIZ/DELIMITERS/
10810	 
10815	SYM223:	XWD SYM222,SYM218
10820		4
10825		POINT 7,.+2
10830		XWD RES+CLSIDX,347
10835		ASCIZ/GOTO/
10840	 
10845	SYM224:	XWD SYM223,SYM168
10850		3
10855		POINT 7,.+2
10860		XWD RES+CLSIDX,17
10865		ASCIZ/OWN/
10870	 
10875	SYM225:	XWD SYM224,SYM221
10880		3
10885		POINT 7,.+2
10890		XWD RES+CLSIDX,42
10895		ASCIZ/XOR/
10900	 
10905	SYM226:	XWD SYM225,SYM217
10910		10
10915		POINT 7,.+2
10920		XWD RES+CLSIDX,25
10925		ASCIZ/MATCHING/
10930	 
10935	SYM227:	XWD SYM226,SYM222
10940		6
10945		POINT 7,.+2
10950		XWD RES+CLSIDX,277
10955		ASCIZ/WHILEC/
10960	 
10965	SYM228:	XWD SYM227,SYM224
10970		17
10975		POINT 7,.+2
10980		XWD RES+CLSIDX,113
10985		ASCIZ/NULL_DELIMITERS/
10990	 
10995	SYM229:	XWD SYM228,SYM226
11000		14
11005		POINT 7,.+2
11010		XWD RES+CLSIDX,67
11015		ASCIZ/PRELOAD_WITH/
11020	 
11025	SYM230:	XWD SYM229,SYM228
11030		6
11035		POINT 7,.+2
11040		XWD RES+CLSIDX,314
11045		ASCIZ/UNTILC/
11050	 
11055	SYM231:	XWD SYM230,SYM193
11060		3
11065		POINT 7,.+2
11070		XWD RES+CLSIDX,51
11075		ASCIZ/DIV/
11080	 
11085	SYM232:	XWD SYM231,SYM199
11090		3
11095		POINT 7,.+2
11100		XWD RES+CLSIDX,57
11105		ASCIZ/NEQ/
11110	 
11115	SYM233:	XWD SYM232,SYM223
11120		5
11125		POINT 7,.+2
11130		XWD RES+CLSIDX,350
11135		ASCIZ/FORLC/
11140	 
11145	SYM234:	XWD SYM233,SYM232
11150		7
11155		POINT 7,.+2
11160		XWD RES+CLSIDX,104
11165		ASCIZ/VERSION/
11170	 
11175	SYM235:	XWD SYM234,SYM234
11180		3
11185		POINT 7,.+2
11190		XWD RES+CLSIDX,351
11195		ASCIZ/NIL/
11200	 
11205	SYM236:	XWD SYM235,SYM214
11210		6
11215		POINT 7,.+2
11220		XWD RES+CLSIDX,271
11225		ASCIZ/RETURN/
11230	 
11235	SYM237:	XWD SYM236,SYM216
11240		5
11245		POINT 7,.+2
11250		XWD RES+CLSIDX,23
11255		ASCIZ/SHORT/
11260	 
11265	SYM238:	XWD SYM237,SYM225
11270		4
11275		POINT 7,.+2
11280		XWD RES+CLSIDX,352
11285		ASCIZ/SETO/
11290	 
11295	SYM239:	XWD SYM238,SYM238
11300		4
11305		POINT 7,.+2
11310		XWD RES+CLSIDX,157
11315		ASCIZ/NULL/
11320	 
11325	SYM240:	XWD SYM239,SYM227
11330		5
11335		POINT 7,.+2
11340		XWD RES+CLSIDX,313
11345		ASCIZ/STEPC/
11350	 
11355	SYM241:	XWD SYM240,SYM235
11360		4
11365		POINT 7,.+2
11370		XWD RES+CLSIDX,33
11375		ASCIZ/LNOT/
11380	 
11385	SYM242:	XWD SYM241,SYM220
11390		5
11395		POINT 7,.+2
11400		XWD RES+CLSIDX,353
11405		ASCIZ/INTER/
11410	 
11415	SYM243:	XWD SYM242,SYM241
11420		6
11425		POINT 7,.+2
11430		XWD RES+CLSIDX,227
11435		ASCIZ/MEMORY/
11440	 
11445	SYM244:	XWD SYM243,SYM236
11450		3
11455		POINT 7,.+2
11460		XWD RES+CLSIDX,61
11465		ASCIZ/GEQ/
11470	 
11475	SYM245:	XWD SYM244,SYM229
11480		2
11485		POINT 7,.+2
11490		XWD RES+CLSIDX,140
11495		ASCIZ/DO/
11500	 
11505	SYM246:	XWD SYM245,SYM245
11510		3
11515		POINT 7,.+2
11520		XWD RES+CLSIDX,164
11525		ASCIZ/CVN/
11530	 
11535	SYM247:	XWD SYM246,SYM237
11540		4
11545		POINT 7,.+2
11550		XWD RES+CLSIDX,312
11555		ASCIZ/ENDC/
11560	 
11565	SYM248:	XWD SYM247,SYM242
11570		3
11575		POINT 7,.+2
11580		XWD RES+CLSIDX,50
11585		ASCIZ/ROT/
11590	 
11595	SYM249:	XWD SYM248,SYM239
11600		11
11605		POINT 7,.+2
11610		XWD RES+CLSIDX,30
11615		ASCIZ/REFERENCE/
11620	 
11625	SYM250:	XWD SYM249,SYM249
11630		11
11635		POINT 7,.+2
11640		XWD RES+CLSIDX,116
11645		ASCIZ/PROCESSES/
11650	 
11655	SYM251:	XWD SYM250,SYM169
11660		3
11665		POINT 7,.+2
11670		XWD RES+CLSIDX,254
11675		ASCIZ/IFC/
11680	 
11685	SYM252:	XWD SYM251,SYM231
11690		3
11695		POINT 7,.+2
11700		XWD RES+CLSIDX,232
11705		ASCIZ/NOT/
11710	 
11715	SYM253:	XWD SYM252,SYM233
11720		5
11725		POINT 7,.+2
11730		XWD RES+CLSIDX,311
11735		ASCIZ/ELSEC/
11740	 
11745	SYM254:	XWD SYM253,SYM243
11750		4
11755		POINT 7,.+2
11760		XWD RES+CLSIDX,150
11765		ASCIZ/FAIL/
11770	 
11775	SYM255:	XWD SYM254,SYM247
11780		3
11785		POINT 7,.+2
11790		XWD RES+CLSIDX,52
11795		ASCIZ/MOD/
11800	 
11805	SYM256:	XWD SYM255,SYM253
11810		4
11815		POINT 7,.+2
11820		XWD RES+CLSIDX,354
11825		ASCIZ/CVMS/
11830	 
11835	SYM257:	XWD SYM256,SYM251
11840		3
11845		POINT 7,.+2
11850		XWD RES+CLSIDX,355
11855		ASCIZ/ANY/
11860	 
11865	SYM258:	XWD SYM257,SYM255
11870		4
11875		POINT 7,.+2
11880		XWD RES+CLSIDX,356
11885		ASCIZ/POLL/
11890	 
11895	SYM259:	XWD SYM258,SYM219
11900		6
11905		POINT 7,.+2
11910		XWD RES+CLSIDX,155
11915		ASCIZ/BEFORE/
11920	 
11925	SYM260:	XWD SYM259,SYM246
11930		5
11935		POINT 7,.+2
11940		XWD RES+CLSIDX,31
11945		ASCIZ/VALUE/
11950	 
11955	SYM261:	XWD SYM260,SYM257
11960		12
11965		POINT 7,.+2
11970		XWD RES+CLSIDX,357
11975		ASCIZ/DEPENDENTS/
11980	 
11985	SYM262:	XWD SYM261,SYM261
11990		14
11995		POINT 7,.+2
12000		XWD RES+CLSIDX,101
12005		ASCIZ/STRING_SPACE/
12010	 
12015	SYM263:	XWD SYM262,SYM248
12020		5
12025		POINT 7,.+2
12030		XWD RES+CLSIDX,317
12035		ASCIZ/LISTC/
12040	 
12045	SYM264:	XWD SYM263,SYM254
12050		3
12055		POINT 7,.+2
12060		XWD RES+CLSIDX,174
12065		ASCIZ/COP/
12070	 
12075	SYM265:	XWD SYM264,SYM252
12080		10
12085		POINT 7,.+2
12090		XWD RES+CLSIDX,360
12095		ASCIZ/CONTINUE/
12100	 
12105	SYM266:	XWD SYM265,SYM250
12110		3
12115		POINT 7,.+2
12120		XWD RES+CLSIDX,70
12125		ASCIZ/LET/
12130	 
12135	SYM267:	XWD SYM266,SYM265
12140		2
12145		POINT 7,.+2
12150		XWD RES+CLSIDX,361
12155		ASCIZ/GO/
12160	 
12165	SYM268:	XWD SYM267,SYM262
12170		10
12175		POINT 7,.+2
12180		XWD RES+CLSIDX,362
12185		ASCIZ/RESERVED/
12190	 
12195	SYM269:	XWD SYM268,SYM244
12200		6
12205		POINT 7,.+2
12210		XWD RES+CLSIDX,301
12215		ASCIZ/ASSIGN/
12220	 
12225	SYM270:	XWD SYM269,SYM268
12230		13
12235		POINT 7,.+2
12240		XWD RES+CLSIDX,107
12245		ASCIZ/SOURCE_FILE/
12250	 
12255	SYM271:	XWD SYM270,SYM266
12260		4
12265		POINT 7,.+2
12270		XWD RES+CLSIDX,363
12275		ASCIZ/SUCH/
12280	 
12285	SYM272:	XWD SYM271,SYM271
12290		7
12295		POINT 7,.+2
12300		XWD RES+CLSIDX,66
12305		ASCIZ/REQUIRE/
12310	 
12315	SYM273:	XWD SYM272,SYM258
12320		5
12325		POINT 7,.+2
12330		XWD RES+CLSIDX,364
12335		ASCIZ/LISTO/
12340	 
12345	SYM274:	XWD SYM273,SYM256
12350		7
12355		POINT 7,.+2
12360		XWD RES+CLSIDX,21
12365		ASCIZ/FORTRAN/
12370	 
12375	SYM275:	XWD SYM274,SYM274
12380		7
12385		POINT 7,.+2
12390		XWD RES+CLSIDX,2
12395		ASCIZ/ITEMVAR/
12400	SYM275
12405	↑RESEND:
12410	
12415	
12420	
12425	
12430	↑MBUCK:	;INITIALIZED BUCKET
12435		XWD SYM272,SYM270
12440		XWD SYM269,SYM240
12445		XWD SYM259,SYM267
12450		XWD SYM230,SYM263
12455		XWD SYM215,SYM273
12460		XWD SYM260,SYM275
12465		XWD SYM264,0
12470	BEND	RESTAB