Re: [Flashforth-devel] Floating point math for FF 5.x - trigonm. test

[om1zz <om...@vo...>]

\ TRIGONOMETRIC FUNCTIONS TEST - 9 degree test
\ Based on "9 DEGREE" calculator test
\ asin(acos(atan(tan(cos(sin(9.0)))))) == 9.0
\ other results at:
\ http://www.rskey.org/~mwsebastian/miscprj/results.htm
\ IgorM 2015

-trig9
marker -trig9
: Pi f# 3.14159265e ;
: d2r Pi f# 180e f/ ;
: r2d f# 180e Pi f/ ;
: TRIG9
		d2r f* fsin
		d2r f* fcos
		d2r f* ftan
		fatan r2d f*
		facos r2d f*
		fasin r2d f*
;
\   9.0 degree must return 9.0 degree
\   not with single precision, however :)
f# 9.0e TRIG9 fs.

f# 9.0e TRIG9 fs. 8.88809E0  ok<#,ram>