perm filename FOO.GRU[S,AIL] blob sn#184479 filedate 1975-11-03 generic text, type T, neo UTF8
NAME BLOCK
00    FOO
	000007 000000 
PROGRAM
	LOCATION 000000 000000' 
	334000 000000 	 7 ,000,000,000,000,000	SKIPA 000000
	476000 000000 	 O , @ ,000,000,000,000	SETOM 000000
	264000 000000 	 - ,000,000,000,000,000	JSR 000000
	261740 000012 	 , , > ,000,000,005,000	PUSH 17,000012
	261740 000000 	 , , > ,000,000,000,000	PUSH 17,000000
	261740 000016 	 , , > ,000,000,007,000	PUSH 17,000016
	541517 777776 	 X , 4 ,177,177,177,000	HRRI 12,777776(17)
PROGRAM
	LOCATION 000000 000007' 
	254000 000000 	 + ,000,000,000,000,000	JRST 000000
	261740 000012 	 , , > ,000,000,005,000	PUSH 17,000012
	261740 000000 	 , , > ,000,000,000,000	PUSH 17,000000
	261740 000016 	 , , > ,000,000,007,000	PUSH 17,000016
	551517 777776 	 Z , 4 ,177,177,177,000	HRRZI 12,777776(17)
	200052 777775 	   ,002, W ,177,176, @ 	MOVE 01,777775(12)
	254000 000000 	 + ,000,000,000,000,000	JRST 000000
	200512 000000 	   ,024, P ,000,000,000	MOVE 12,000000(12)
	274740 000000 	 / ,036,000,000,000,000	SUB 17,000000
	254037 000003 	 + ,001, x ,000,001, @ 	JRST @000003(17)
	000000 000000 	000,000,000,000,000,000	000 000000
LINK BLOCK
	000000 000006 
	000000 000021' 
PROGRAM
	LOCATION 000000 000022' 
	000000 000010' 	000,000,000,000,004,000	000 000010'
	000000 000001 	000,000,000,000,000, @ 	000 000001
	440700 000000 	 H ,034,000,000,000,000	ANDCB 16,000000
	020640 000000 	004,032,000,000,000,000	020 15,000000
	000000 000003 	000,000,000,000,001, @ 	000 000003
	000000 000002 	000,000,000,000,001,000	000 000002
	000001 000000 	000,000,010,000,000,000	000 000000(01)
	000001 000000 	000,000,010,000,000,000	000 000000(01)
	000022' 000000 	000,001,020,000,000,000	000 @000000(02) (R)
	000013' 000000 	000,000, X ,000,000,000	000 000000(13) (R)
	000010' 000016' 	000,000, @ ,000,007,000	000 000016'(10) (R)
	000000 000000 	000,000,000,000,000,000	000 000000
	000640 000000 	000,032,000,000,000,000	000 15,000000
	000640 000000 	000,032,000,000,000,000	000 15,000000
	000000 000000 	000,000,000,000,000,000	000 000000
	500000 000000 	 P ,000,000,000,000,000	HLL 000000
	200612 777775 	   ,030, W ,177,176, @ 	MOVE 14,777775(12)
PROGRAM
	LOCATION 000000 000043' 
	202612 000000 	   , X , P ,000,000,000	MOVEM 14,000000(12)
	261752 777775 	 , , > , W ,177,176, @ 	PUSH 17,777775(12)
	200612 777776 	   ,030, W ,177,177,000	MOVE 14,777776(12)
	202612 000000 	   , X , P ,000,000,000	MOVEM 14,000000(12)
	261752 777776 	 , , > , W ,177,177,000	PUSH 17,777776(12)
	402012 000046' 	 @ , @ , P ,000,023,000	SETZM 000046'(12)
	402012 000043' 	 @ , @ , P ,000,021, @ 	SETZM 000043'(12)
	260740 000010' 	 , ,036,000,000,004,000	PUSHJ 17,000010'
	200612 777775 	   ,030, W ,177,176, @ 	MOVE 14,777775(12)
	202612 000000 	   , X , P ,000,000,000	MOVEM 14,000000(12)
	261752 777775 	 , , > , W ,177,176, @ 	PUSH 17,777775(12)
	200612 777776 	   ,030, W ,177,177,000	MOVE 14,777776(12)
	202612 000000 	   , X , P ,000,000,000	MOVEM 14,000000(12)
	261752 777776 	 , , > , W ,177,177,000	PUSH 17,777776(12)
	402012 000057' 	 @ , @ , P ,000,027, @ 	SETZM 000057'(12)
	402012 000054' 	 @ , @ , P ,000,026,000	SETZM 000054'(12)
	260740 000010' 	 , ,036,000,000,004,000	PUSHJ 17,000010'
PROGRAM
	LOCATION 000000 000064' 
	200612 777775 	   ,030, W ,177,176, @ 	MOVE 14,777775(12)
	202612 000000 	   , X , P ,000,000,000	MOVEM 14,000000(12)
	261752 777775 	 , , > , W ,177,176, @ 	PUSH 17,777775(12)
	200612 777775 	   ,030, W ,177,176, @ 	MOVE 14,777775(12)
	202612 000000 	   , X , P ,000,000,000	MOVEM 14,000000(12)
	261752 777775 	 , , > , W ,177,176, @ 	PUSH 17,777775(12)
	200612 777776 	   ,030, W ,177,177,000	MOVE 14,777776(12)
	202612 000000 	   , X , P ,000,000,000	MOVEM 14,000000(12)
	261752 777776 	 , , > , W ,177,177,000	PUSH 17,777776(12)
	402012 000073' 	 @ , @ , P ,000,035, @ 	SETZM 000073'(12)
	402012 000070' 	 @ , @ , P ,000,034,000	SETZM 000070'(12)
	260740 000010' 	 , ,036,000,000,004,000	PUSHJ 17,000010'
	202052 000000 	   , B , P ,000,000,000	MOVEM 01,000000(12)
	261740 000001 	 , , > ,000,000,000, @ 	PUSH 17,000001
	402012 000100' 	 @ , @ , P ,000,   ,000	SETZM 000100'(12)
	402012 000065' 	 @ , @ , P ,000,032, @ 	SETZM 000065'(12)
	260740 000010' 	 , ,036,000,000,004,000	PUSHJ 17,000010'
PROGRAM
	LOCATION 000000 000105' 
	200612 777775 	   ,030, W ,177,176, @ 	MOVE 14,777775(12)
	202612 000000 	   , X , P ,000,000,000	MOVEM 14,000000(12)
	261752 777775 	 , , > , W ,177,176, @ 	PUSH 17,777775(12)
	200612 777775 	   ,030, W ,177,176, @ 	MOVE 14,777775(12)
	202612 000000 	   , X , P ,000,000,000	MOVEM 14,000000(12)
	261752 777775 	 , , > , W ,177,176, @ 	PUSH 17,777775(12)
	200612 777776 	   ,030, W ,177,177,000	MOVE 14,777776(12)
	202612 000000 	   , X , P ,000,000,000	MOVEM 14,000000(12)
	261752 777776 	 , , > , W ,177,177,000	PUSH 17,777776(12)
	402012 000114' 	 @ , @ , P ,000, & ,000	SETZM 000114'(12)
	402012 000111' 	 @ , @ , P ,000, $ , @ 	SETZM 000111'(12)
	260740 000010' 	 , ,036,000,000,004,000	PUSHJ 17,000010'
	202052 000000 	   , B , P ,000,000,000	MOVEM 01,000000(12)
	261740 000001 	 , , > ,000,000,000, @ 	PUSH 17,000001
	402012 000121' 	 @ , @ , P ,000, ( , @ 	SETZM 000121'(12)
	402012 000106' 	 @ , @ , P ,000, # ,000	SETZM 000106'(12)
	260740 000010' 	 , ,036,000,000,004,000	PUSHJ 17,000010'
PROGRAM
	LOCATION 000000 000126' 
	200512 000000 	   ,024, P ,000,000,000	MOVE 12,000000(12)
	274740 000000 	 / ,036,000,000,000,000	SUB 17,000000
	254037 000003 	 + ,001, x ,000,001, @ 	JRST @000003(17)
	261740 000012 	 , , > ,000,000,005,000	PUSH 17,000012
	261740 000000 	 , , > ,000,000,000,000	PUSH 17,000000
	261740 000016 	 , , > ,000,000,007,000	PUSH 17,000016
	261740 000000 	 , , > ,000,000,000,000	PUSH 17,000000
	505617 000000 	 Q , 8 , x ,000,000,000	HRLI 14,000000(17)
	541617 000001 	 X , 8 , x ,000,000, @ 	HRRI 14,000001(17)
	270740 000000 	 . ,036,000,000,000,000	ADD 17,000000
	331000 000017 	 6 ,   ,000,000,007, @ 	SKIPL 000017
	265640 000000 	 - , : ,000,000,000,000	JSP 15,000000
	251617 000000 	 * , 8 , x ,000,000,000	BLT 14,000000(17)
	551517 777762 	 Z , 4 ,177,177, y ,000	HRRZI 12,777762(17)
	254000 000042' 	 + ,000,000,000,021,000	JRST 000042'
	000000 000000 	000,000,000,000,000,000	000 000000
LINK BLOCK
	000000 000006 
	000000 000145' 
PROGRAM
	LOCATION 000000 000146' 
	000000 000131' 	000,000,000,000, , , @ 	000 000131'
	000000 000002 	000,000,000,000,001,000	000 000002
	440700 000000 	 H ,034,000,000,000,000	ANDCB 16,000000
	020040 000000 	004,002,000,000,000,000	020 01,000000
	000000 000003 	000,000,000,000,001, @ 	000 000003
	000000 000016 	000,000,000,000,007,000	000 000016
	000001 000000 	000,000,010,000,000,000	000 000000(01)
	000001 000000 	000,000,010,000,000,000	000 000000(01)
INTERNAL REQUEST
	000015' 000016' 
	000011' 000032' 
	000031' 000036' 
	000030' 000040' 
	000024' 000041' 
	000123' 000003 
	000116' 000004 
	000117' 000005 
	000124' 000006 
	000102' 000007 
	000075' 000010 
	000076' 000011 
	000103' 000012 
	000061' 000013 
	000062' 000014 
	000050' 000015 
	000051' 000016 
	000132' 000156' 
PROGRAM
	LOCATION 000000 000156' 
	000146' 000000 	000,006, 0 ,000,000,000	000 03,000000(06) (R)
	000134' 000033' 	000,005, ` ,000,015, @ 	000 02,@000033'(14) (R)
	000042' 000126' 	000,002,020,000, + ,000	000 01,000126'(02) (R)
	000000 000035' 	000,000,000,000,016, @ 	000 000035'
	000640 000000 	000,032,000,000,000,000	000 15,000000
	000640 000000 	000,032,000,000,000,000	000 15,000000
	000000 000000 	000,000,000,000,000,000	000 000000
	501420 000000 	 P , 1 ,000,000,000,000	HLLI 10,@000000
	200612 777775 	   ,030, W ,177,176, @ 	MOVE 14,777775(12)
	202612 000000 	   , X , P ,000,000,000	MOVEM 14,000000(12)
	261752 777775 	 , , > , W ,177,176, @ 	PUSH 17,777775(12)
	200612 777776 	   ,030, W ,177,177,000	MOVE 14,777776(12)
	202612 000000 	   , X , P ,000,000,000	MOVEM 14,000000(12)
	261752 777776 	 , , > , W ,177,177,000	PUSH 17,777776(12)
	402012 000172' 	 @ , @ , P ,000, = ,000	SETZM 000172'(12)
	402012 000167' 	 @ , @ , P ,000, ; , @ 	SETZM 000167'(12)
	260740 000010' 	 , ,036,000,000,004,000	PUSHJ 17,000010'
PROGRAM
	LOCATION 000000 000177' 
	200612 777775 	   ,030, W ,177,176, @ 	MOVE 14,777775(12)
	202612 000000 	   , X , P ,000,000,000	MOVEM 14,000000(12)
	261752 777775 	 , , > , W ,177,176, @ 	PUSH 17,777775(12)
	200612 777776 	   ,030, W ,177,177,000	MOVE 14,777776(12)
	202612 000000 	   , X , P ,000,000,000	MOVEM 14,000000(12)
	261752 777776 	 , , > , W ,177,177,000	PUSH 17,777776(12)
	402012 000203' 	 @ , @ , P ,000, A , @ 	SETZM 000203'(12)
	402012 000200' 	 @ , @ , P ,000, @ ,000	SETZM 000200'(12)
	260740 000010' 	 , ,036,000,000,004,000	PUSHJ 17,000010'
	200612 777775 	   ,030, W ,177,176, @ 	MOVE 14,777775(12)
	202612 000000 	   , X , P ,000,000,000	MOVEM 14,000000(12)
	261752 777775 	 , , > , W ,177,176, @ 	PUSH 17,777775(12)
	200612 777775 	   ,030, W ,177,176, @ 	MOVE 14,777775(12)
	202612 000000 	   , X , P ,000,000,000	MOVEM 14,000000(12)
	261752 777775 	 , , > , W ,177,176, @ 	PUSH 17,777775(12)
	200612 777776 	   ,030, W ,177,177,000	MOVE 14,777776(12)
	202612 000000 	   , X , P ,000,000,000	MOVEM 14,000000(12)
PROGRAM
	LOCATION 000000 000220' 
	261752 777776 	 , , > , W ,177,177,000	PUSH 17,777776(12)
	402012 000217' 	 @ , @ , P ,000, G , @ 	SETZM 000217'(12)
	402012 000214' 	 @ , @ , P ,000, F ,000	SETZM 000214'(12)
	260740 000010' 	 , ,036,000,000,004,000	PUSHJ 17,000010'
	202052 000000 	   , B , P ,000,000,000	MOVEM 01,000000(12)
	261740 000001 	 , , > ,000,000,000, @ 	PUSH 17,000001
	402012 000224' 	 @ , @ , P ,000, J ,000	SETZM 000224'(12)
	402012 000211' 	 @ , @ , P ,000, D , @ 	SETZM 000211'(12)
	260740 000010' 	 , ,036,000,000,004,000	PUSHJ 17,000010'
	200612 777775 	   ,030, W ,177,176, @ 	MOVE 14,777775(12)
	202612 000000 	   , X , P ,000,000,000	MOVEM 14,000000(12)
	261752 777775 	 , , > , W ,177,176, @ 	PUSH 17,777775(12)
	200612 777775 	   ,030, W ,177,176, @ 	MOVE 14,777775(12)
	202612 000000 	   , X , P ,000,000,000	MOVEM 14,000000(12)
	261752 777775 	 , , > , W ,177,176, @ 	PUSH 17,777775(12)
	200612 777776 	   ,030, W ,177,177,000	MOVE 14,777776(12)
	202612 000000 	   , X , P ,000,000,000	MOVEM 14,000000(12)
PROGRAM
	LOCATION 000000 000241' 
	261752 777776 	 , , > , W ,177,177,000	PUSH 17,777776(12)
	402012 000240' 	 @ , @ , P ,000, P ,000	SETZM 000240'(12)
	402012 000235' 	 @ , @ , P ,000, N , @ 	SETZM 000235'(12)
	260740 000010' 	 , ,036,000,000,004,000	PUSHJ 17,000010'
	202052 000000 	   , B , P ,000,000,000	MOVEM 01,000000(12)
	261740 000001 	 , , > ,000,000,000, @ 	PUSH 17,000001
	402012 000245' 	 @ , @ , P ,000, R , @ 	SETZM 000245'(12)
	402012 000232' 	 @ , @ , P ,000, M ,000	SETZM 000232'(12)
	260740 000010' 	 , ,036,000,000,004,000	PUSHJ 17,000010'
	200512 000000 	   ,024, P ,000,000,000	MOVE 12,000000(12)
	274740 000127' 	 / ,036,000,000, + , @ 	SUB 17,000127'
	254037 000003 	 + ,001, x ,000,001, @ 	JRST @000003(17)
	261740 000012 	 , , > ,000,000,005,000	PUSH 17,000012
	261740 000000 	 , , > ,000,000,000,000	PUSH 17,000000
	261740 000016 	 , , > ,000,000,007,000	PUSH 17,000016
	261740 000134' 	 , , > ,000,000, . ,000	PUSH 17,000134'
	505617 000000 	 Q , 8 , x ,000,000,000	HRLI 14,000000(17)
PROGRAM
	LOCATION 000000 000262' 
	541617 000001 	 X , 8 , x ,000,000, @ 	HRRI 14,000001(17)
	270740 000137' 	 . ,036,000,000, / , @ 	ADD 17,000137'
	331000 000017 	 6 ,   ,000,000,007, @ 	SKIPL 000017
	265640 000141' 	 - , : ,000,000, 0 , @ 	JSP 15,000141'
	251617 000000 	 * , 8 , x ,000,000,000	BLT 14,000000(17)
	551517 777762 	 Z , 4 ,177,177, y ,000	HRRZI 12,777762(17)
	254000 000166' 	 + ,000,000,000, ; ,000	JRST 000166'
	000000 000000 	000,000,000,000,000,000	000 000000
LINK BLOCK
	000000 000006 
	000000 000271' 
PROGRAM
	LOCATION 000000 000272' 
	000000 000255' 	000,000,000,000, V , @ 	000 000255'
	000000 000002 	000,000,000,000,001,000	000 000002
	440700 000000 	 H ,034,000,000,000,000	ANDCB 16,000000
	020040 000000 	004,002,000,000,000,000	020 01,000000
	000000 000003 	000,000,000,000,001, @ 	000 000003
	000000 000016 	000,000,000,000,007,000	000 000016
	000001 000000 	000,000,010,000,000,000	000 000000(01)
	000001 000000 	000,000,010,000,000,000	000 000000(01)
	000272' 000000 	000,013, P ,000,000,000	000 05,@000000(12) (R)
	000260' 000157' 	000,013,000,000, 7 , @ 	000 05,@000157' (R)
	000166' 000252' 	000,007, 0 ,000, U ,000	000 03,@000252'(06) (R)
	000000 000161' 	000,000,000,000, 8 , @ 	000 000161'
	000640 000000 	000,032,000,000,000,000	000 15,000000
	000640 000000 	000,032,000,000,000,000	000 15,000000
INTERNAL REQUEST
	000155' 000162' 
	000154' 000164' 
	000150' 000165' 
	000247' 000003 
	000242' 000004 
	000243' 000005 
	000250' 000006 
	000226' 000007 
	000221' 000010 
	000222' 000011 
	000227' 000012 
	000205' 000013 
	000206' 000014 
	000174' 000015 
	000175' 000016 
	000256' 000302' 
	000301' 000306' 
	000300' 000310' 
PROGRAM
	LOCATION 000000 000310' 
	740000 000000 	 x ,000,000,000,000,000	BLKI 000000
	740000 000000 	 x ,000,000,000,000,000	BLKI 000000
	740000 000000 	 x ,000,000,000,000,000	BLKI 000000
	740000 000000 	 x ,000,000,000,000,000	BLKI 000000
	000000 000000 	000,000,000,000,000,000	000 000000
	501440 000000 	 P , 2 ,000,000,000,000	HLLI 11,000000
	200612 777775 	   ,030, W ,177,176, @ 	MOVE 14,777775(12)
	202612 000000 	   , X , P ,000,000,000	MOVEM 14,000000(12)
	261752 777775 	 , , > , W ,177,176, @ 	PUSH 17,777775(12)
	200612 777776 	   ,030, W ,177,177,000	MOVE 14,777776(12)
	202612 000000 	   , X , P ,000,000,000	MOVEM 14,000000(12)
	261752 777776 	 , , > , W ,177,177,000	PUSH 17,777776(12)
	402012 000322' 	 @ , @ , P ,000, i ,000	SETZM 000322'(12)
	402012 000317' 	 @ , @ , P ,000, g , @ 	SETZM 000317'(12)
	260740 000010' 	 , ,036,000,000,004,000	PUSHJ 17,000010'
	200612 777775 	   ,030, W ,177,176, @ 	MOVE 14,777775(12)
	202612 000000 	   , X , P ,000,000,000	MOVEM 14,000000(12)
PROGRAM
	LOCATION 000000 000331' 
	261752 777775 	 , , > , W ,177,176, @ 	PUSH 17,777775(12)
	200612 777776 	   ,030, W ,177,177,000	MOVE 14,777776(12)
	202612 000000 	   , X , P ,000,000,000	MOVEM 14,000000(12)
	261752 777776 	 , , > , W ,177,177,000	PUSH 17,777776(12)
	402012 000333' 	 @ , @ , P ,000, m , @ 	SETZM 000333'(12)
	402012 000330' 	 @ , @ , P ,000, l ,000	SETZM 000330'(12)
	260740 000010' 	 , ,036,000,000,004,000	PUSHJ 17,000010'
	200612 777775 	   ,030, W ,177,176, @ 	MOVE 14,777775(12)
	202612 000000 	   , X , P ,000,000,000	MOVEM 14,000000(12)
	261752 777775 	 , , > , W ,177,176, @ 	PUSH 17,777775(12)
	200612 777775 	   ,030, W ,177,176, @ 	MOVE 14,777775(12)
	202612 000000 	   , X , P ,000,000,000	MOVEM 14,000000(12)
	261752 777775 	 , , > , W ,177,176, @ 	PUSH 17,777775(12)
	200612 777776 	   ,030, W ,177,177,000	MOVE 14,777776(12)
	202612 000000 	   , X , P ,000,000,000	MOVEM 14,000000(12)
	261752 777776 	 , , > , W ,177,177,000	PUSH 17,777776(12)
	402012 000347' 	 @ , @ , P ,000, s , @ 	SETZM 000347'(12)
PROGRAM
	LOCATION 000000 000352' 
	402012 000344' 	 @ , @ , P ,000, r ,000	SETZM 000344'(12)
	260740 000010' 	 , ,036,000,000,004,000	PUSHJ 17,000010'
	202052 000000 	   , B , P ,000,000,000	MOVEM 01,000000(12)
	261740 000001 	 , , > ,000,000,000, @ 	PUSH 17,000001
	402012 000354' 	 @ , @ , P ,000, v ,000	SETZM 000354'(12)
	402012 000341' 	 @ , @ , P ,000, p , @ 	SETZM 000341'(12)
	260740 000010' 	 , ,036,000,000,004,000	PUSHJ 17,000010'
	200612 777775 	   ,030, W ,177,176, @ 	MOVE 14,777775(12)
	202612 000000 	   , X , P ,000,000,000	MOVEM 14,000000(12)
	261752 777775 	 , , > , W ,177,176, @ 	PUSH 17,777775(12)
	200612 777775 	   ,030, W ,177,176, @ 	MOVE 14,777775(12)
	202612 000000 	   , X , P ,000,000,000	MOVEM 14,000000(12)
	261752 777775 	 , , > , W ,177,176, @ 	PUSH 17,777775(12)
	200612 777776 	   ,030, W ,177,177,000	MOVE 14,777776(12)
	202612 000000 	   , X , P ,000,000,000	MOVEM 14,000000(12)
	261752 777776 	 , , > , W ,177,177,000	PUSH 17,777776(12)
	402012 000370' 	 @ , @ , P ,000,174,000	SETZM 000370'(12)
PROGRAM
	LOCATION 000000 000373' 
	402012 000365' 	 @ , @ , P ,000, z , @ 	SETZM 000365'(12)
	260740 000010' 	 , ,036,000,000,004,000	PUSHJ 17,000010'
	202052 000000 	   , B , P ,000,000,000	MOVEM 01,000000(12)
	261740 000001 	 , , > ,000,000,000, @ 	PUSH 17,000001
	402012 000375' 	 @ , @ , P ,000,176, @ 	SETZM 000375'(12)
	402012 000362' 	 @ , @ , P ,000, y ,000	SETZM 000362'(12)
	260740 000010' 	 , ,036,000,000,004,000	PUSHJ 17,000010'
	200512 000000 	   ,024, P ,000,000,000	MOVE 12,000000(12)
	274740 000253' 	 / ,036,000,000, U , @ 	SUB 17,000253'
	254037 000003 	 + ,001, x ,000,001, @ 	JRST @000003(17)
	261740 000012 	 , , > ,000,000,005,000	PUSH 17,000012
	261740 000000 	 , , > ,000,000,000,000	PUSH 17,000000
	261740 000016 	 , , > ,000,000,007,000	PUSH 17,000016
	261740 000260' 	 , , > ,000,000, X ,000	PUSH 17,000260'
	505617 000000 	 Q , 8 , x ,000,000,000	HRLI 14,000000(17)
	541617 000001 	 X , 8 , x ,000,000, @ 	HRRI 14,000001(17)
	270740 000263' 	 . ,036,000,000, Y , @ 	ADD 17,000263'
PROGRAM
	LOCATION 000000 000414' 
	331000 000017 	 6 ,   ,000,000,007, @ 	SKIPL 000017
	265640 000265' 	 - , : ,000,000, Z , @ 	JSP 15,000265'
	251617 000000 	 * , 8 , x ,000,000,000	BLT 14,000000(17)
	551517 777762 	 Z , 4 ,177,177, y ,000	HRRZI 12,777762(17)
	254000 000316' 	 + ,000,000,000, g ,000	JRST 000316'
	000000 000000 	000,000,000,000,000,000	000 000000
LINK BLOCK
	000000 000006 
	000000 000421' 
PROGRAM
	LOCATION 000000 000422' 
	000000 000405' 	000,000,000,001,002, @ 	000 000405'
	000000 000002 	000,000,000,000,001,000	000 000002
	440700 000000 	 H ,034,000,000,000,000	ANDCB 16,000000
	020040 000000 	004,002,000,000,000,000	020 01,000000
	000000 000003 	000,000,000,000,001, @ 	000 000003
	000000 000016 	000,000,000,000,007,000	000 000016
	000001 000000 	000,000,010,000,000,000	000 000000(01)
	000001 000000 	000,000,010,000,000,000	000 000000(01)
	000422' 000000 	000,021,020,000,000,000	000 10,@000000(02) (R)
	000410' 000303' 	000,020, @ ,000, a , @ 	000 10,000303'(10) (R)
	000316' 000402' 	000,014, p ,001,001,000	000 06,000402'(16) (R)
	000000 000305' 	000,000,000,000, b , @ 	000 000305'
	000640 000000 	000,032,000,000,000,000	000 15,000000
	000640 000000 	000,032,000,000,000,000	000 15,000000
	000000 000000 	000,000,000,000,000,000	000 000000
	501460 000000 	 P , 3 ,000,000,000,000	HLLI 11,@000000
INTERNAL REQUEST
	000274' 000315' 
	000377' 000003 
	000372' 000004 
	000373' 000005 
	000400' 000006 
	000356' 000007 
	000351' 000010 
	000352' 000011 
	000357' 000012 
	000335' 000013 
	000336' 000014 
	000324' 000015 
	000325' 000016 
	000406' 000432' 
	000431' 000436' 
	000430' 000440' 
	000424' 000441' 
	000007' 000442' 
PROGRAM
	LOCATION 000000 000442' 
	260740 000000 	 , ,036,000,000,000,000	PUSHJ 17,000000
	201540 000435' 	   , 6 ,000,001,016, @ 	MOVEI 13,000435'
	260740 000000 	 , ,036,000,000,000,000	PUSHJ 17,000000
	200512 000000 	   ,024, P ,000,000,000	MOVE 12,000000(12)
	274740 000000 	 / ,036,000,000,000,000	SUB 17,000000
	263740 000000 	 , ,176,000,000,000,000	POPJ 17,000000
	000000 000000 	000,000,000,000,000,000	000 000000
LINK BLOCK
	000000 000006 
	000000 000450' 
PROGRAM
	LOCATION 000000 000451' 
	000000 000003' 	000,000,000,000,001, @ 	000 000003'
	000000 000003 	000,000,000,000,001, @ 	000 000003
	440700 000000 	 H ,034,000,000,000,000	ANDCB 16,000000
	020040 000000 	004,002,000,000,000,000	020 01,000000
	000000 000000 	000,000,000,000,000,000	000 000000
	000000 000002 	000,000,000,000,001,000	000 000002
	000000 000000 	000,000,000,000,000,000	000 000000
	000000 000000 	000,000,000,000,000,000	000 000000
	000451' 000000 	000,022, H ,000,000,000	000 11,000000(11) (R)
	000000 000000 	000,000,000,000,000,000	000 000000
	000000 000000 	000,000,000,000,000,000	000 000000
	000000 000000 	000,000,000,000,000,000	000 000000
	740040 000000 	 x ,002,000,000,000,000	BLKI 01,000000
	000000 000000 	000,000,000,000,000,000	000 000000
	432371 700000 	 F , O , O ,000,000,000	XORM 07,@700000(11)
SYMBOLS
	14      A	000000 000003 
	10     A.	000000 000166' 
	14      B	000000 000003 
	10     B.	000000 000177' 
	14      C	000000 000003 
	10     C.	000000 000210' 
	14      D	000000 000003 
	10     D.	000000 000231' 
	14    FOO	000000 000001 
SYMBOLS
	10   FOO.	000000 000442' 
	10      P	000000 000010' 
	10     P$	000000 000022' 
	10     P1	000000 000131' 
	10    P1$	000000 000146' 
	10     P2	000000 000255' 
	10    P2$	000000 000272' 
	10     P3	000000 000405' 
	10    P3$	000000 000422' 
PROGRAM
	LOCATION 000000 000470' 
	000000 000000 	000,000,000,000,000,000	000 000000
	777777 777777 	177,177,177,177,177, @ 	CONSO 17,@777777(17)
	000003 000003 	000,000,030,000,001, @ 	000 000003(03)
	000013 000013 	000,000, X ,000,005, @ 	000 000013(13)
	000022 000022 	000,001,020,000,011,000	000 @000022(02)
	000006 000006 	000,000, 0 ,000,003,000	000 000006(06)
	000000 000000 	000,000,000,000,000,000	000 000000
INTERNAL REQUEST
	000433' 000451' 
	000004' 000461' 
	000457' 000465' 
	000443' 000465' 
	000453' 000467' 
	000446' 000472' 
	000413' 000473' 
	000403' 000474' 
	000017' 000475' 
	000410' 000476' 
SYMBOLS
	10    FOO	000000 000003' 
	60 $PDLOV	000000 000415' 
	60  BEXIT	000000 000444' 
	60 .UINIT	000000 000442' 
LIBRARY REQUEST
	SYS   :LIBSA8.REL
PROGRAM
	LOCATION 000000 000477' 
	000000 000000 	000,000,000,000,000,000	000 000000
	000011 000010 	000,000, H ,000,004,000	000 000010(11)
	000000 000000 	000,000,000,000,000,000	000 000000
	000000 007777 	000,000,000,017,177, @ 	000 007777
	000000 000000' 	000,000,000,000,000,000	000 000000'
	000000 000000 	000,000,000,000,000,000	000 000000
	000000 000000 	000,000,000,000,000,000	000 000000
	000000 000000 	000,000,000,000,000,000	000 000000
	000000 000000 	000,000,000,000,000,000	000 000000
	000000 000000 	000,000,000,000,000,000	000 000000
	000000 000000 	000,000,000,000,000,000	000 000000
	000000 000470' 	000,000,000,001,034,000	000 000470'
	000000 000471' 	000,000,000,001,034, @ 	000 000471'
	102200 000017 	020, H ,000,000,007, @ 	102 04,000017
	000000 000451' 	000,000,000,001,024, @ 	000 000451'
	000000 000000 	000,000,000,000,000,000	000 000000
	000000 000000 	000,000,000,000,000,000	000 000000
LINK BLOCK
	000000 000002 
	000000 000477' 
STARTING ADDRESS
	000000 000000' 
SYMBOLS
	60 SAILOR	000000 000002' 
	60  RPGSW	000000 000001' 
SYMBOLS
	10     S.	000000 000000' 
	10      P	000000 000017 
	10     SP	000000 000016 
	10  ARERR	007000 000000 
	10  FLOAT	002000 000000 
	10    FIX	003000 000000 
END BLOCK
	000000 000520'