gonzui

t2ex

bsd_source/lib/libc/src_bsd/math/e_atanhf.c - 1.2KB - 41 lines

36:             t = x+x;
37:             t = (float)0.5*log1pf(t+t*x/(one-x));
38:         } else 
39:             t = (float)0.5*log1pf((x+x)/(one-x));
40:         if(hx>=0) return t; else return -t;