Lines Matching defs:pb
149 /* *pb = *pb / 2**multiplier to normalize. 15 <= multiplier <= 1 */
242 _unpacked_to_big_float(unpacked *pu, _big_float *pb, int *pe)
245 * Converts pu into a bigfloat *pb of minimal length; exponent *pe
246 * such that pu = *pb * 2 ** *pe
254 pb->bsignificand[2 * (iz - it)] = pu->significand[it] & 0xffff;
255 pb->bsignificand[2 * (iz - it) + 1] = pu->significand[it] >> 16;
258 pb->blength = 2 * iz + 2;
259 if (pb->bsignificand[0] == 0) {
260 for (it = 1; it < pb->blength; it++)
261 pb->bsignificand[it - 1] = pb->bsignificand[it];
262 pb->blength--;
264 *pe = pu->exponent + 1 - 16 * pb->blength;
265 pb->bexponent = 0;
269 _display_big_float(pb, 2);
295 _big_binary_to_big_decimal(_big_float *pb, _big_float *pd)
301 pd->bsignificand[0] = pb->bsignificand[pb->blength - 1] % 10000;
302 if (pd->bsignificand[0] == pb->bsignificand[pb->blength - 1]) {
306 pd->bsignificand[1] = pb->bsignificand[pb->blength - 1] / 10000;
308 for (i = pb->blength - 2; i >= 0; i--) { /* Multiply by 2**16 and
310 _mul_65536short(pd, (unsigned long) pb->bsignificand[i]);
312 for (i = 0; i <= (pb->bexponent - 16); i += 16) { /* Multiply by 2**16 for
316 if (pb->bexponent > i)
317 _left_shift_base_ten(pd, (short unsigned) (pb->bexponent - i));