Lines Matching refs:ibm_exp
616 static const double ibm_exp[] =
693 static const double ibm_exp[] =
793 * find the closest exponent in ibm_exp[]
797 hi = elementsof(ibm_exp) - 1;
801 if (ibm_exp[ex] < f)
806 if (ibm_exp[ex] < f)
814 f /= ibm_exp[ex];
864 * find the closest exponent in ibm_exp[]
868 hi = elementsof(ibm_exp) - 1;
872 if (ibm_exp[ex] < f)
877 if (ibm_exp[ex] < f)
885 f /= ibm_exp[ex];
967 f = i * (1.0 / 0x1000000) * ((s[0] < 0x80) ? ibm_exp[s[0]] : -ibm_exp[s[0] & 0x7F]);
981 f *= (s[0] < 0x80) ? ibm_exp[s[0]] : -ibm_exp[s[0] & 0x7F];