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