fpu     1
    xdef    _sin
_sin
    fsin.d  4(sp),fp0
    rts