TEXT	asin(SB),$0
	FASIND	a+0(FP),F0
	RTS