1			6 FORCE NEW RECORD
	00006	0 01303 0 01436	2		HTR	X−1,0,LOCREC CARD FOR DE
		01303	3		ORG	LOCREC
TD	01303	3 00000 0 00006	4		TXH	6 106 FT 53
	01304	0 07400 4 00740	5		TSX	PRINT,4
	01305	0 01252 0 01244	6		HTR	SOURCE,0,SOURCE+6
	01306	0 76200 0 00304	7	RDDR	RDR	4 NOR BUFFER NOW ON DRUM 4.
	01307	0 46000 0 01350	8		LDA	A
	01310	0 53400 1 01351	9		LXA	L(15),1
	01311	0 70000 1 01276	10	COPYW	CPY	ERAS+15,1 COPY FIRST WORD OF 4 WORD ENTRY.
	01312	0 70000 1 01277	11		CPY	ERAS+16,1 IGNORE NEXT THREE.
	01313	0 70000 1 01277	12		CPY	ERAS+16,1
	01314	0 70000 1 01277	13		CPY	ERAS+16,1
	01315	2 00001 1 01311	14		TIX	COPYW,1,1
	01316	0 53400 1 01351	15		LXA	L(15),1
	01317	0 50000 1 01276	16	NEXT	CLA	ERAS+15,1 IF NOT LOCATION SYMBOL OF CIT,
	01320	−0 10000 0 01331	17		TNZ	PROCES WORD WILL BE ZERO.
	01321	2 00001 1 01317	18		TIX	NEXT,1,1
	01322	0 50000 0 01351	19		CLA	L(15)
	01323	0 76700 0 00002	20		ALS	2
	01324	0 40000 0 01350	21		ADD	A
	01325	0 62100 0 01350	22		STA	A
	01326	0 40200 0 01352	23		SUB	BUFSIZ
	01327	−0 10000 0 01306	24		TNZ	RDDR
	01330	0 50000 0 01232	25		CLA	ZERO
	01331	0 77100 0 00022	26	PROCES	ARS	18 IN THE DECREMENT THERE IS THE
	01332	0 07400 4 00613	27		TSX	EXBETA,4 ALPHA OF SOME STATEMENT NUMBER.
	01333	0 60200 0 01257	28		SLW	ERAS
	01334	−0 50000 0 01373	29		CAL	PR1
	01335	0 77100 0 00030	30		ARS	24
	01336	0 56000 0 01257	31		LDQ	ERAS
	01337	−0 76300 0 00030	32		LGL	24
	01340	0 60200 0 01373	33		SLW	PR1
	01341	−0 76300 0 00014	34		LGL	12
	01342	0 56000 0 00717	35		LDQ	BLANKS
	01343	−0 76300 0 00030	36		LGL	24
	01344	0 60200 0 01374	37		SLW	PR1+1
	01345	0 07400 4 00740	38		TSX	PRINT,4
	01346	0 01437 0 01353	39		HTR	PR,0,PR+52
	01347	0 02000 0 00272	40		TRA	SPEND
	01350	0 00000 0 00310	41	A		STARTING DRUM ADDRESS
	01351	0 00000 0 00017	42	L(15)	HTR	15
	01352	0 00000 0 07700	43	BUFSIZ	HTR	4032 SIZE OF NOR BUFFER + INITIAL ADDRESS.
	01353	606060606060	44	PR	BCD	2␣␣␣␣␣␣␣␣␣␣␣␣
	01354	606060606060	45
	01355	633025606225	46		BCD	THE␣SET␣OF␣DO␣FORMULAS␣WHICH␣BEGINS␣OR␣TERMINATES␣IN␣THE␣VIC
	01356	636046266024	47
	01357	466026465144	48
	01360	644321626066	49
	01361	303123306022	50
	01362	252731456260	51
	01363	465160632551	52
	01364	443145216325	53
	01365	626031456063	54
	01366	302560653123	55
	01367	314531637060	56		BCD	4INITY␣OF␣STATEMENT␣NUMBE
	01370	462660626321	57
	01371	632544254563	58
	01372	604564442225	59
	01373	516060606060	60	PR1	BCD	6R␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣
	01374	606060606060	61
	01375	606060606060	62
	01376	606060606060	63
	01377	606060606060	64
	01400	606060606060	65
	01401	302162602731	66		BCD	HAS␣GIVEN␣RISE␣TO␣TOO␣MANY␣INSTRUCTIONS.␣␣REWRITE␣PROGRAM␣AN
	01402	652545605131	67
	01403	622560634660	68
	01404	634646604421	69
	01405	457060314562	70
	01406	635164236331	71
	01407	464562336060	72
	01410	512566513163	73
	01411	256047514627	74
	01412	512144602145	75
	01413	246062314447	76		BCD	D␣SIMPLIFY␣DO␣NESTING␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣
	01414	433126706024	77
	01415	466045256263	78
	01416	314527606060	79
	01417	606060606060	80
	01420	606060606060	81
	01421	606060606060	82
	01422	606060606060	83
	01423	606060606060	84
	01424	606060606060	85
	01425	465160512524	86		BCD	OR␣REDUCE␣THE␣NUMBER␣OF␣SUBSCRIPT␣COMBINATIONS.␣␣␣␣␣␣␣␣␣␣␣␣␣
	01426	642325606330	87
	01427	256045644422	88
	01430	255160462660	89
	01431	626422622351	90
	01432	314763602346	91
	01433	442231452163	92
	01434	314645623360	93
	01435	606060606060	94
	01436	606060606060	95
	01437	0 00000 0 00000	96	X