gonzui

t2ex

bsd_source/lib/libc/src_bsd/math/e_sinhf.c - 1.6KB - 56 lines

38:                 if(shuge+x>one) return x;/* sinh(tiny) = tiny with inexact */
39:             t = expm1f(fabsf(x));
40:             if(ix<0x3f800000) return h*((float)2.0*t-t*t/(t+one));
44:     /* |x| in [22, log(maxdouble)] return 0.5*exp(|x|) */
45:         if (ix < 0x42b17180)  return h*expf(fabsf(x));
46: 
48:         if (ix<=0x42b2d4fc) {
49:             w = expf((float)0.5*fabsf(x));
50:             t = h*w;