Google
 

Trailing-Edge - PDP-10 Archives - bb-bt99e-bb - matgen.c07
There is 1 other file named matgen.c07 in the archive. Click here to see a list.
 INS 19/1	;07C1
	;JEH	09-JUN-83	[1472] fix DIVIDE literal INTO DN1, DN2, etc.
 REP 29/36	;07C2
		MOVE	TE,[EBASEB,,ESAVDV##]
 WIT
	DIVX5S:	MOVE	TE,[EBASEB,,ESAVDV##]	;[1472]
 INS 47/40	;07C3
	IFN ANS74,<
		SKIPE	DIVSRS		;[1472] IS IT DIVIDE SERIES?
		SKIPE	DIVTMP		;[1472]  AND "B" NOT SAVED YET?
		SKIPA			;[1472] NO
		JRST	DIVX5S		;[1472] YES
	> ;[1472]
 SUM 57090