Searched refs:exponent (Results 1 - 25 of 26) sorted by relevance

12

/osnet-11/usr/src/lib/libc/port/fp/
H A Dpack_float.c142 pu->exponent++;
164 kluge.f.msw.exponent = 0;
169 kluge.f.msw.exponent = 0xff;
173 kluge.f.msw.exponent = 0xff;
179 pu->exponent += SINGLE_BIAS;
180 if (pu->exponent <= 0) {
181 kluge.f.msw.exponent = 0;
182 __fp_rightshift(pu, 1 - pu->exponent);
186 kluge.f.msw.exponent = 1;
199 pu->exponent
[all...]
H A Ddecimal_bin.c41 * nonzero fractional part. If pd->exponent > 0 and **ppb is not
43 * verted significand scaled by 10^pd->exponent), then on exit,
136 /* scale pb by 10^pd->exponent */
158 exp = pd->exponent;
259 px->exponent = pbb->bexponent + (pbb->blength << 4) - 1;
272 px->exponent--;
345 exp = pd->exponent;
366 /* small positive exponent */
377 /* small negative exponent */
440 if (pm->rd != fp_nearest || pd->ndigits > 18 || pd->exponent
[all...]
H A Dfconvert.c60 *decpt = dr.exponent + dr.ndigits;
67 if (ndigits > 0 && dr.exponent > -ndigits) {
68 while (i < dr.ndigits + dr.exponent + ndigits)
114 *decpt = dr.exponent + dr.ndigits;
121 if (ndigits > 0 && dr.exponent > -ndigits) {
122 while (i < dr.ndigits + dr.exponent + ndigits)
191 *decpt = dr.exponent + dr.ndigits;
H A Dhex_bin.c53 * Adjust the (base two) exponent to reflect the fact that the
58 pu->exponent = pd->exponent + (pd->ndigits << 2) - 1;
87 pu->exponent--;
108 * (-1)^(pd->sign) * m * 2^(pd->exponent)
123 kluge.f.msw.exponent = 0;
144 kluge.f.msw.exponent = 0;
168 kluge.f.msw.exponent = 0;
194 kluge.f.msw.exponent = 0;
H A Dgconvert.c57 if ((pd->exponent > 0) || (pd->exponent < -(ndigits + 3))) {
75 n = pd->exponent + i - 1;
93 if (pd->exponent >= (1 - ndigits)) { /* x.xxx */
94 for (i = 0; i < (ndigits + pd->exponent); )
105 for (i = 0; i < -(pd->exponent + ndigits); i++)
H A Dchar_to_decimal.h126 pd->exponent = 0;
361 * an exponent delimiter (E or e for any decimal form; +, -, D, d,
378 pd->exponent += (nzbp + 1) << expshift;
432 * nzbp to pd->exponent to account for them.
449 * Only accept these as the start of the exponent
460 goto exponent;
466 goto exponent;
484 * or an exponent delimiter. (Note that it is possible to get
499 pd->exponent = (-(nzap + 1)) << expshift;
506 pd->exponent
[all...]
H A D_base_sup.c100 if (kluge.f.msw.exponent == 0) { /* 0 or sub */
108 } else if (kluge.f.msw.exponent == 0x7fff) { /* inf or nan */
H A Ddouble_decim.c69 * nonzero fractional part. If pb->exponent > 0 and **ppd is not
71 * verted significand scaled by 2^pb->exponent), then on exit,
160 * string is stored in pd->ndigits, and the corresponding exponent
161 * is stored in pd->exponent. If the converted value is not exact,
167 * the exponent and the decimal place at which the value is rounded
278 pd->exponent = elast;
318 pd->exponent++;
320 pd->exponent++;
456 pf->bexponent = x->f.msw.exponent - DOUBLE_BIAS - 52;
462 if (x->f.msw.exponent
[all...]
H A Deconvert.c81 *decpt = dr.exponent + ndigits;
126 *decpt = dr.exponent + ndigits;
177 *decpt = dr.exponent + ndigits;
H A D__flt_decim.c313 pd->exponent = -pm->ndigits;
381 * the exponent.
387 pd->exponent = -i;
/osnet-11/usr/src/lib/libc/inc/
H A Dbase_conversion.h43 /* exponent bias */
55 * The exponent is unbiased. The significand array is long enough
65 int exponent; member in struct:__anon1298
78 unsigned exponent:8; member in struct:__anon1299
84 unsigned exponent:11; member in struct:__anon1300
89 unsigned exponent:15; member in struct:__anon1301
96 unsigned exponent:15; member in struct:__anon1302
126 unsigned exponent:8; member in struct:__anon1307
132 unsigned exponent:11; member in struct:__anon1308
138 unsigned exponent member in struct:__anon1309
144 unsigned exponent:15; member in struct:__anon1310
[all...]
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/
H A Dnumeric.c692 /* we can have an optional exponent part */
722 S_mulexp10(NV value, I32 exponent) argument
729 if (exponent == 0)
737 * to support G_FLOAT on both VAX and Alpha, and though the exponent
757 if (exponent >= NV_MAX_10_EXP || exponent + exp_v >= NV_MAX_10_EXP)
759 if (exponent < 0) {
760 if (-(exponent + exp_v) >= NV_MAX_10_EXP)
762 while (-exponent >= NV_MAX_10_EXP) {
763 /* combination does not overflow, but 10^(-exponent) doe
827 I32 exponent = 0; local
[all...]
/osnet-11/usr/src/lib/libc/port/i18n/
H A Dwstod.c214 pd->exponent = 0;
369 * digit, an exponent delimiter (E or e for decimal form,
385 pd->exponent += (nzbp + 1) << expshift;
423 * nzbp to pd->exponent to account for them.
436 goto exponent;
442 goto exponent;
458 * or an exponent delimiter. (Note that it is possible to get
469 pd->exponent = (-(nzap + 1)) << expshift;
476 pd->exponent -= (nzap + 1) << expshift;
478 pd->exponent
[all...]
/osnet-11/usr/src/grub/grub2/grub-core/gnulib/
H A Dvasnprintf.c1620 12; /* sign, decimal point, exponent etc. */
3072 int exponent; local
3076 mantissa = printf_frexpl (arg, &exponent);
3079 exponent = 0;
3149 SNPRINTF (p, 6 + 1, decimal_format, exponent);
3156 sprintf ((char *) p, "%+d", exponent);
3164 sprintf (expbuf, "%+d", exponent);
3223 int exponent; local
3227 mantissa = printf_frexp (arg, &exponent);
3230 exponent
3522 int exponent = floorlog10l (arg < 0 ? -arg : arg); local
3538 int exponent = floorlog10 (arg < 0 ? -arg : arg); local
3664 int exponent; local
3814 int exponent; local
4126 int exponent; local
4288 int exponent; local
[all...]
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/t/op/
H A Dsprintf.t71 # $x may have 3 exponent digits, not 2
92 { # three-digit exponent
93 print("ok $i # >$result< $x three-digit exponent accepted\n");
96 # Suppress tests with modulo of exponent >= 100 on platforms
102 " Suppressed: exponent out of range?\n")
131 >%G< >1234567e96< >1.23457E+102< >exponent too big for OS/390<
132 >%G< >.1234567e-101< >1.23457E-102< >exponent too small for OS/390<
133 >%e< >1234567E96< >1.234567e+102< >exponent too big for OS/390<
134 >%e< >.1234567E-101< >1.234567e-102< >exponent too small for OS/390<
135 >%g< >.1234567E-101< >1.23457e-102< >exponent to
[all...]
/osnet-11/usr/src/lib/libresolv2/common/resolv/
H A Dres_debug.c789 int mantissa, exponent; local
792 exponent = (int)((prec >> 0) & 0x0f) % 10;
794 val = mantissa * poweroften[exponent];
806 int exponent; local
825 for (exponent = 0; exponent < 9; exponent++)
826 if (cmval < poweroften[exponent+1])
829 mantissa = cmval / poweroften[exponent];
833 retval = (mantissa << 4) | exponent;
[all...]
/osnet-11/usr/src/lib/libprtdiag/common/
H A Ddisplay_sun4v.c1337 int32_t exponent; local
1493 * Get the exponent if present, and do a little math so that
1498 &exponent, sizeof (exponent)) != PICL_SUCCESS)
1499 exponent = 0;
1500 if (exponent == 0)
1504 pow((double)10, (double)exponent);
1510 * exponent to zero will prevent the printf below
1512 * negative exponent is used to set the precision
1515 if ((int)display_val == display_val || exponent >
[all...]
/osnet-11/usr/src/lib/libcmd/common/
H A Dod.c187 int exponent; member in struct:Size_s
799 if (!(zp = xp) || zp->exponent)
846 if (zp->exponent)
855 base = sfsprintf(dig, sizeof(dig), "%u", zp->exponent);
886 if (zp->exponent)
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Math/
H A DBigRat.pm164 my $diff_e = $MBI->new ($nf->exponent())->bsub ( $f->exponent);
1039 $x->{_n}->blsft($x->{_d}->exponent()->babs(),10); # 7.1/4.51 => 7.1/45.1
1045 $x->{_d}->blsft($x->{_n}->exponent()->babs(),10); # 71/45.1 => 710/45.1
H A DBigInt.pm517 # split str in m mantissa, e exponent, i integer, f fraction, v value, s sign
539 my $e = int("$$es$$ev"); # exponent (avoid recursion)
1604 # takes a very large number to a very large exponent in a given very
1615 # check exponent for valid values
1967 sub exponent subroutine
1969 # return a copy of the exponent (here always 0, NaN or 1 for $m == 0)
2001 # return a copy of both the exponent and the mantissa
2004 ($x->mantissa(),$x->exponent());
2509 # sign,value for exponent,mantint,mantfrac
2511 # valid exponent
[all...]
H A DBigFloat.pm8 # _e : exponent (ref to $CALC object)
113 # _e: exponent
168 $self->{_e} = $MBI->_new($$ev); # exponent
465 # lengths (corrected by exponent) are equal
529 # lengths (corrected by exponent) are equal
1418 # $ym is now mantissa of $y based on exponent 0
1438 # now mantissas are equalized, exponent of $x is adjusted, so calc result
2210 sub exponent subroutine
2212 # return a copy of the exponent
2241 # return a copy of both the exponent an
[all...]
/osnet-11/usr/src/lib/libproc/common/
H A DP32ton.c649 exp = fpru.reg.exponent & 0x7fff;
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/B/B/
H A DDeparse.pm3394 # exponent. Assumes you've already made sure the number isn't zero or
3398 my $exponent = 0;
3402 $exponent++;
3407 $exponent--;
3411 return ($mantissa, $exponent);
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Devel/PPPort/
H A DPPPort.pm1106 /* we can have an optional exponent part */
/osnet-11/usr/src/lib/libc/port/
H A Dllib-lc1668 int exponent;

Completed in 109 milliseconds

12