.TITLE DATAN2
	.GLOBL DATAN2,.DA,.AO,.AT,.ED,ATAN
DATAN2	0
	JMS*	.DA
	JMP	.+3
ARG1	0
ARG2	0
	LAC	DATAN2
	DAC*	ATAN
	JMS*	.AO
		ARG1+400000
	JMS*	.AT
		ARG2+400000
	JMP*	.ED
	.END