gonzui

t2ex

bsd_source/lib/libc/src_bsd/math/e_coshf.c - 1.6KB - 60 lines

35:         if(ix<0x3eb17218) {
36:             t = expm1f(fabsf(x));
37:             w = one+t;
43:         if (ix < 0x41b00000) {
44:                 t = expf(fabsf(x));
45:                 return half*t+half/t;
48:     /* |x| in [22, log(maxdouble)] return half*exp(|x|) */
49:         if (ix < 0x42b17180)  return half*expf(fabsf(x));
50: 
52:         if (ix<=0x42b2d4fc) {
53:             w = expf(half*fabsf(x));
54:             t = half*w;