.TITLE ATAN2
	.GLOBL ATAN2,ATAN,.ED,.DA,.AG,.AL
ATAN2	0
	JMS*	.DA
	JMP	.+3
ARG1	0
ARG2	0
	LAC	ATAN2
	DAC*	ATAN
	JMS*	.AG
		ARG1+400000
	JMS*	.AL
		ARG2+400000
	JMP*	.ED
	.END