Lines Matching refs:ieee_tanh
20 * 0. ieee_tanh(x) is defined to be -----------
23 * 1. reduce x to non-negative by ieee_tanh(-x) = -ieee_tanh(x).
24 * 2. 0 <= x <= 2**-55 : ieee_tanh(x) := x*(one+x)
26 * 2**-55 < x <= 1 : ieee_tanh(x) := -----; t = ieee_expm1(-2x)
29 * 1 <= x <= 22.0 : ieee_tanh(x) := 1- ----- ; t=ieee_expm1(2x)
31 * 22.0 < x <= INF : ieee_tanh(x) := 1.
35 * only ieee_tanh(0)=0 is exact for finite argument.
47 double ieee_tanh(double x)
49 double ieee_tanh(x)
62 if (jx>=0) return one/x+one; /* ieee_tanh(+-inf)=+-1 */
63 else return one/x-one; /* ieee_tanh(NaN) = NaN */
69 return x*(one+x); /* ieee_tanh(small) = small */
