reduce-historical/psl-1983/20-tests/dsub7.mac

	radix 10
	extern L0001
	extern L0002
	extern SYMNAM
	extern SYMVAL
	extern SYMFNC
	extern SYMPRP
	extern L0003
	extern L0004
	extern ARG1
	extern ARG2
	extern ARG3
	extern ARG4
	extern ARG5
	extern ARG6
	extern ARG7
	extern ARG8
	extern ARG9
	extern ARG10
	extern ARG11
	extern ARG12
	extern ARG13
	extern ARG14
	extern ARG15
L1103:	block 1001
	intern L1103
L1104:	<30_31>+360
	<30_31>+361
	<30_31>+361
	<30_31>+362
	<30_31>+361
	<30_31>+361
	<30_31>+361
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	intern L1104
L1105:	<30_31>+364
	<30_31>+152
	<30_31>+365
	<30_31>+366
	<30_31>+367
	<30_31>+152
	<30_31>+152
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	intern L1105
L1106:	<30_31>+368
	<30_31>+368
	<30_31>+368
	<30_31>+368
	<30_31>+368
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	<30_31>+363
	intern L1106
L1107:	block 32
	intern L1107
L1108:	block 32
	intern L1108
L1109:	0
	80
	80
	10000
	10000
	80
	80
	0
	0
	0
	0
	0
	0
	0
	0
	0
	0
	0
	0
	0
	0
	0
	0
	0
	0
	0
	0
	0
	0
	0
	0
	0
	intern L1109
L1110:	1
	2
	3
	3
	3
	0
	0
	0
	0
	0
	0
	0
	0
	0
	0
	0
	0
	0
	0
	0
	0
	0
	0
	0
	0
	0
	0
	0
	0
	0
	0
	0
	intern L1110
L1111:	block 32
	intern L1111
L1112:	block 32
	intern L1112
L1113:	block 32
	intern L1113
L1114:	block 32
	intern L1114
	end