Re: [Amforth-devel] Floating point - fsin, fcos, ftan

[pito <pi...@vo...>]

.. a better fsin:

\ calculate fsin 
: fsin _pihalf f- fcos ;

FYI:
\ Leon's flib and Pito's flib asm v 1.1 and atmega@25MHz:
> fmeasure ( _half fsin )
9.2494154E-3 secs duration of fsin FUNCTION ok
> fmeasure ( _half fcos )
1.23060155E-2 secs duration of fcos FUNCTION ok
> fmeasure ( _half ftan )
2.1606884E-2 secs duration of ftan FUNCTION ok
> fmeasure ( _pihalf fsin)
1.3543334E-2 secs duration of fsin FUNCTION ok
>pito