Lines Matching defs:e1
100 e, e1, esign, i, j, k, nd, nd0, nf, nz, nz0, sign;
332 e1 = e -= nf;
424 e1 += nd - k;
446 /* Get starting approximation = rv * 10**e1 */
448 if (e1 > 0) {
449 if ( (i = e1 & 15) !=0)
451 if (e1 &= ~15) {
452 if (e1 > DBL_MAX_10_EXP) {
493 e1 = (unsigned int)e1 >> 4;
494 for(j = 0; e1 > 1; j++, e1 = (unsigned int)e1 >> 1)
495 if (e1 & 1)
513 else if (e1 < 0) {
514 e1 = -e1;
515 if ( (i = e1 & 15) !=0)
517 if (e1 >>= 4) {
518 if (e1 >= 1 << n_bigtens)
521 if (e1 & Scale_Bit)
523 for(j = 0; e1 > 0; j++, e1 = (unsigned int)e1 >> 1)
524 if (e1 & 1)
540 for(j = 0; e1 > 1; j++, e1 = (unsigned int)e1 >> 1)
541 if (e1 & 1)
Indexes created Tue Sep 30 17:09:57 GMT 2025