Lines Matching defs:e1
333 int dsign, e, e1, e2, emin, esign, finished, i, inex, irv;
528 e1 = e -= nf;
567 e1 -= e;
577 e1 -= i;
597 e1 -= e2;
605 e1 -= e;
610 e1 += nd - k;
612 /* Get starting approximation = rv * 10**e1 */
615 if (e1 > 0) {
616 if ( (i = e1 & 15) !=0)
618 if (e1 &= ~15) {
619 e1 = (unsigned int)e1 >> 4;
620 while(e1 >= (1 << (n_bigtens-1))) {
626 e1 -= 1 << (n_bigtens-1);
631 for(j = 0; e1 > 0; j++, e1 = (unsigned int)e1 >> 1)
632 if (e1 & 1)
636 else if (e1 < 0) {
637 e1 = -e1;
638 if ( (i = e1 & 15) !=0)
640 if (e1 &= ~15) {
641 e1 = (unsigned int)e1 >> 4;
642 while(e1 >= (1 << (n_bigtens-1))) {
648 e1 -= 1 << (n_bigtens-1);
653 for(j = 0; e1 > 0; j++, e1 = (unsigned int)e1 >> 1)
654 if (e1 & 1)
Indexes created Wed Oct 01 07:09:59 GMT 2025