Home
last modified time | relevance | path

Searched refs:xn (Results 1 – 1 of 1) sorted by relevance

/picolibc-3.7.0-3.6.0/newlib/libm/ld/common/
De_sqrtl.c80 long double lo, xn; in sqrtl() local
133 xn = (long double)sqrt((double)u.e); /* 53-bit estimate of sqrtl(x). */ in sqrtl()
134 xn = (xn + (u.e / xn)) * 0.5L; /* 106-bit estimate. */ in sqrtl()
142 lo = (lo - u.e) / xn; /* Low bits divided by xn. */ in sqrtl()
143 xn = xn + (u.e / xn); /* High portion of estimate. */ in sqrtl()
144 u.e = xn + lo; /* Combine everything. */ in sqrtl()
157 xn = x / u.e; /* Chopped quotient (inexact?). */ in sqrtl()
160 if (xn == u.e) { in sqrtl()
165 xn = dec(xn); /* xn = xn - ulp. */ in sqrtl()
169 xn = inc(xn); /* xn = xn + ulp. */ in sqrtl()
[all …]