sin (x) :
f = (C1 * x) / (C2 * x^2 + 1.)
:
c1 = 1.043406062
c2 = .2508691922
, DHFTI, .
0 & pi;/2, - :
IF (t < pi) THEN
IF (t < pi/2) THEN
x = t
ELSE
x = pi - t
END IF
ELSE
IF (t < (3./2)*pi) THEN
x = t - pi
ELSE
x = twopi - t
END IF
END IF
:
f = (C1 * x) / (C2 * x*x + 1.0)
IF (t > pi) f = -f
[0, 2 & pi;], x mod 2 & pi;
5% .