1			149 FORCE NEW RECORD
	00225	0 01303 0 01357	2		HTR	X−1,0,LOCREC CARD FOR DE
		01303	3		ORG	LOCREC
TD	01303	3 00000 0 00225	4		TXH	149 6004 FT 32
	01304	0 07400 4 00740	5		TSX	PRINT,4
	01305	0 01244 0 01237	6		HTR	MACHIN,0,MACHIN+5
	01306	0 07400 4 00740	7		TSX	PRINT,4
	01307	0 01360 0 01311	8		HTR	PR,0,PR+39
	01310	0 02000 0 00221	9		TRA	DIGRTN
	01311	606060606060	10	PR	BCD	2␣␣␣␣␣␣␣␣␣␣␣␣
	01312	606060606060	11
	01313	216062642262	12		BCD	A␣SUBSCRIPT␣COMBINATION,␣AT␣LEAST␣1␣INDEX␣OF␣WHICH␣IS␣UNDER␣
	01314	235131476360	13
	01315	234644223145	14
	01316	216331464573	15
	01317	602163604325	16
	01320	216263600160	17
	01321	314524256760	18
	01322	462660663031	19
	01323	233060316260	20
	01324	644524255160	21
	01325	234645635146	22		BCD	CONTROL␣OF␣A␣DO,␣IS␣BEING␣EXAMINED.␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣
	01326	436046266021	23
	01327	602446736031	24
	01330	626022253145	25
	01331	276025672144	26
	01332	314525243360	27
	01333	606060606060	28
	01334	606060606060	29
	01335	606060606060	30
	01336	606060606060	31
	01337	216062642262	32		BCD	A␣SUBSCRIPT␣HAS␣BEEN␣FOUND␣WITHOUT␣SUCH␣AN␣INDEX.␣␣THE␣LOGIC
	01340	235131476360	33
	01341	302162602225	34
	01342	254560264664	35
	01343	452460663163	36
	01344	304664636062	37
	01345	642330602145	38
	01346	603145242567	39
	01347	336060633025	40
	01350	604346273123	41
	01351	604626606330	42		BCD	7␣OF␣THE␣PROGRAM␣MAKES␣THIS␣IMPOSSIBLE.␣␣␣␣
	01352	256047514627	43
	01353	512144604421	44
	01354	422562606330	45
	01355	316260314447	46
	01356	466262312243	47
	01357	253360606060	48
	01360	0 00000 0 00000	49	X