Home
last modified time | relevance | path

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

/picolibc-latest/newlib/libm/math/
Dsf_hypot.c22 __int32_t j, k, ha, hb; in hypotf() local
24 GET_FLOAT_WORD(ha, x); in hypotf()
25 ha &= 0x7fffffffL; in hypotf()
28 if (hb > ha) { in hypotf()
29 j = ha; in hypotf()
30 ha = hb; in hypotf()
33 SET_FLOAT_WORD(a, ha); /* a <- |a| */ in hypotf()
35 if ((ha - hb) > 0xf000000L) { in hypotf()
39 if (ha > 0x58800000L) { /* a>2**50 */ in hypotf()
40 if (!FLT_UWORD_IS_FINITE(ha)) { /* Inf or NaN */ in hypotf()
[all …]
Ds_hypot.c54 __int32_t j, k, ha, hb; in hypot64() local
56 GET_HIGH_WORD(ha, x); in hypot64()
57 ha &= 0x7fffffff; in hypot64()
60 if (hb > ha) { in hypot64()
63 j = ha; in hypot64()
64 ha = hb; in hypot64()
70 SET_HIGH_WORD(a, ha); /* a <- |a| */ in hypot64()
72 if ((ha - hb) > 0x3c00000) { in hypot64()
76 if (ha > 0x5f300000) { /* a>2**500 */ in hypot64()
77 if (ha >= 0x7ff00000) { /* Inf or NaN */ in hypot64()
[all …]
/picolibc-latest/newlib/libm/ld/ld128/
De_hypotl.c51 int64_t j,k,ha,hb; in hypotl() local
53 GET_LDOUBLE_MSW64(ha,x); in hypotl()
54 ha &= 0x7fffffffffffffffLL; in hypotl()
57 if(hb > ha) {a=y;b=x;j=ha; ha=hb;hb=j;} else {a=x;b=y;} in hypotl()
58 SET_LDOUBLE_MSW64(a,ha); /* a <- |a| */ in hypotl()
60 if((ha-hb)>0x78000000000000LL) {return a+b;} /* x/y > 2**120 */ in hypotl()
62 if(ha > 0x5f3f000000000000LL) { /* a>2**8000 */ in hypotl()
63 if(ha >= 0x7fff000000000000LL) { /* Inf or NaN */ in hypotl()
67 if(((ha&0xffffffffffffLL)|low)==0 && !issignalingl_inline(b)) in hypotl()
75 ha -= 0x2580000000000000LL; in hypotl()
[all …]
/picolibc-latest/newlib/libm/common/
Dfma_inc.h132 FLOAT_T ha, hb, la, lb, p, q; in dd_mul() local
135 ha = a - p; in dd_mul()
136 ha += p; in dd_mul()
137 la = a - ha; in dd_mul()
144 p = ha * hb; in dd_mul()
145 q = ha * lb + la * hb; in dd_mul()