00010		<SCAN TABLE>
00015	37  37  C
00020	38  43  C
00025	40  153  C
00030	41  98  C
00035	42  36  C
00040	43  29  C
00045	44  97  C
00050	45  30  C
00055	46  212  C
00060	47  38  C
00065	58  88  C
00070	59  93  C
00075	60  44  C
00080	61  46  C
00085	62  45  C
00090	63  26  C
00095	64  206  C
00100	91  155  C
00105	93  205  C
00110	94  211  C
00115	95  177  C
00120	124  213  C
00125		<RESERVED-WORDS>
00130	BBPP	222	C
00135	BEGIN	236	C
00140	REMEMBER	151	C
00145	SECOND	172	C
00150	PHI	326	C
00155	START_CODE	234	C
00160	INF	156	C
00165	CASE	241	C
00170	SEGMENT_NAME	114	C
00175	LIBRARY	105	C
00180	SYSTEM_PDL	77	C
00185	CAUSE	304	C
00190	ALL	327	C
00195	DATUM	224	C
00200	CASEC	242	C
00205	APPLY	302	C
00210	PROCEDURE	64	C
00215	FROM	137	C
00220	ABS	34	C
00225	CVSET	176	C
00230	OR	310	C
00235	PROPS	230	C
00240	INITIALIZATION	330	C
00245	EQV	37	C
00250	AND	306	C
00255	BOOLEAN	10	C
00260	THENC	275	C
00265	UNSTACK_DELIMITERS	112	C
00270	COMMENT	331	C
00275	LOCATION	332	C
00280	MESSAGE	27	C
00285	NEW_ITEMS	103	C
00290	CLEANUP	72	C
00295	DONE	225	C
00300	THIRD	173	C
00305	FORWARD	22	C
00310	DOC	245	C
00315	NEXT	333	C
00320	DEFINE	65	C
00325	LENGTH	165	C
00330	SIMPLE	24	C
00335	ARRAY	334	C
00340	LOAD_MODULE	106	C
00345	DELETE	226	C
00350	REPLACE_DELIMITERS	111	C
00355	AFTER	154	C
00360	FOREACH	252	C
00365	NOW_UNSAFE	322	C
00370	UNION	335	C
00375	QUICK_CODE	235	C
00380	LEAP_ARRAY	336	C
00385	OF	267	C
00390	RESTORE	153	C
00395	RECURSIVE	20	C
00400	LSH	47	C
00405	PUT	145	C
00410	CVI	175	C
00415	REAL	5	C
00420	SETC	320	C
00425	SUCCEED	147	C
00430	LIST	11	C
00435	GLOBAL	26	C
00440	BUILT_IN	337	C
00445	STRING	7	C
00450	NEEDNEXT	340	C
00455	INTERROGATE	305	C
00460	BIND	341	C
00465	SEGMENT_FILE	115	C
00470	ILDB	166	C
00475	ITEM	1	C
00480	THAT	342	C
00485	PNAMES	76	C
00490	CVLIST	177	C
00495	IN	136	C
00500	EXTERNAL	16	C
00505	BOUND	170	C
00510	LAND	40	C
00515	INTEGER	6	C
00520	DECLARATION	343	C
00525	STRING_PDL	100	C
00530	CONTEXT	13	C
00535	REMOVE	146	C
00540	LEQ	60	C
00545	STEP	125	C
00550	FIRST	171	C
00555	MAKE	143	C
00560	TO	131	C
00565	ENTRY	344	C
00570	PROTECT_ACS	71	C
00575	ASSOC	43	C
00580	FORC	345	C
00585	FORGET	152	C
00590	LOR	41	C
00595	SWAP	300	C
00600	IDPB	200	C
00605	IF	307	C
00610	IBP	202	C
00615	LOP	163	C
00620	END	133	C
00625	MAX	62	C
00630	THEN	274	C
00635	CHECK_TYPE	346	C
00640	ISTRIPLE	162	C
00645	SAFE	15	C
00650	ELSE	134	C
00655	LDB	167	C
00660	SPROUT	303	C
00665	FALSE	161	C
00670	NEW	266	C
00675	OFC	270	C
00680	ARRAY_PDL	102	C
00685	SET	3	C
00690	UNTIL	126	C
00695	ERASE	144	C
00700	FOR	132	C
00705	POLLING_INTERVAL	117	C
00710	MIN	63	C
00715	KILL_SET	12	C
00720	INTERNAL	14	C
00725	NOW_SAFE	321	C
00730	TRUE	160	C
00735	DPB	201	C
00740	LABEL	4	C
00745	WHILE	127	C
00750	DELIMITERS	110	C
00755	GOTO	347	C
00760	OWN	17	C
00765	XOR	42	C
00770	MATCHING	25	C
00775	WHILEC	277	C
00780	NULL_DELIMITERS	113	C
00785	PRELOAD_WITH	67	C
00790	UNTILC	314	C
00795	DIV	51	C
00800	NEQ	57	C
00805	FORLC	350	C
00810	VERSION	104	C
00815	NIL	351	C
00820	RETURN	271	C
00825	SHORT	23	C
00830	SETO	352	C
00835	NULL	157	C
00840	STEPC	313	C
00845	LNOT	33	C
00850	INTER	353	C
00855	MEMORY	227	C
00860	GEQ	61	C
00865	DO	140	C
00870	CVN	164	C
00875	ENDC	312	C
00880	ROT	50	C
00885	REFERENCE	30	C
00890	PROCESSES	116	C
00895	IFC	254	C
00900	NOT	232	C
00905	ELSEC	311	C
00910	FAIL	150	C
00915	MOD	52	C
00920	CVMS	354	C
00925	ANY	355	C
00930	POLL	356	C
00935	BEFORE	155	C
00940	VALUE	31	C
00945	STRING_SPACE	101	C
00950	LISTC	317	C
00955	COP	174	C
00960	CONTINUE	357	C
00965	LET	70	C
00970	GO	360	C
00975	RESERVED	361	C
00980	ASSIGN	301	C
00985	SOURCE_FILE	107	C
00990	SUCH	362	C
00995	REQUIRE	66	C
01000	LISTO	363	C
01005	FORTRAN	21	C
01010	ITEMVAR	2	C