gonzui

t2ex

bsd_source/lib/libc/src_bsd/math/s_asinh.c - 1.9KB - 67 lines

48:         if(ix>0x41b00000) {    /* |x| > 2**28 */
49:             w = log(fabs(x))+ln2;
50:         } else if (ix>0x40000000) {    /* 2**28 > |x| > 2.0 */
51:             t = fabs(x);
52:             w = log(2.0*t+one/(sqrt(x*x+one)+t));
54:             t = x*x;
55:             w =log1p(fabs(x)+t/(one+sqrt(one+t)));
56:         }