1			19 FORCE NEW RECORD
	00023	0 01303 0 01351	2		HTR	X−1,0,LOCREC CARD FOR DE
		01303	3		ORG	LOCREC
TD	01303	3 00000 0 00023	4		TXH	19 434 FT 62
	01304	0 07400 4 00740	5		TSX	PRINT,4
	01305	0 01252 0 01244	6		HTR	SOURCE,0,SOURCE+6
	01306	0 07400 4 00740	7		TSX	PRINT,4
	01307	0 01352 0 01311	8		HTR	PR,0,PR+33
	01310	0 02000 0 00272	9		TRA	SPEND
	01311	606060606060	10	PR	BCD	2␣␣␣␣␣␣␣␣␣␣␣␣
	01312	606060606060	11
	01313	264346666046	12		BCD	FLOW␣OF␣PROGRAM␣IS␣TOO␣COMPLEX.␣␣NEXT␣ENTRY␣CANNOT␣BE␣MADE␣I
	01314	266047514627	13
	01315	512144603162	14
	01316	606346466023	15
	01317	464447432567	16
	01320	336060452567	17
	01321	636025456351	18
	01322	706023214545	19
	01323	466360222560	20
	01324	442124256031	21
	01325	456043316263	22		BCD	N␣LIST␣OF␣BASIC␣BLOCKS.␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣
	01326	604626602221	23
	01327	623123602243	24
	01330	462342623360	25
	01331	606060606060	26
	01332	606060606060	27
	01333	606060606060	28
	01334	606060606060	29
	01335	606060606060	30
	01336	606060606060	31
	01337	512566513163	32		BCD	REWRITE␣PROGRAM␣WITH␣FEWER␣TRANSFER␣ADDRESSES,␣OR␣DO␣IN␣TWO␣
	01340	256047514627	33
	01341	512144606631	34
	01342	633060262566	35
	01343	255160635121	36
	01344	456226255160	37
	01345	212424512562	38
	01346	622562736046	39
	01347	516024466031	40
	01350	456063664660	41
	01351	472151636233	42		BCD	1PARTS.
	01352	0 00000 0 00000	43	X