 xref _MathIeeeDoubTransBase

 xdef _tan
_tan:
 movem.l 4(sp),d0-d1
 move.l  a6,-(sp)
 move.l  _MathIeeeDoubTransBase,a6
 jsr     -48(a6)
 move.l  (sp)+,a6
 rts
