1.global atan2
2.type atan2,@function
3atan2:
4	fldl 4(%esp)
5	fldl 12(%esp)
6	fpatan
7	fstl 4(%esp)
8	mov 8(%esp),%eax
9	add %eax,%eax
10	cmp $0x00200000,%eax
11	jae 1f
12		# subnormal x, return x with underflow
13	fsts 4(%esp)
141:	ret
15