rational-approximation ( t -- value )


Vocabulary
picomath

Inputs
tan object


Outputs
valuean object


Definition


:: rational-approximation ( t -- value )
c2 t * c1 + t * c0 + :> numerator d2 t * d1 + t * d0 + t *
1.0 + :> denominator t numerator denominator / - ;