j0
double j0(double);
uint32_t j0,j1,j2,j3,j4,j5,j6,j7,j8,j9,j10,j11,j12,j13,j14,j15;
j0 = x0 = crypto_le32dec(c + 0);
crypto_le32enc(out + 0, x0 + j0);
if (j0 > 30)
j0 = (uint32_t)x;
RETURNI(j0 & 1 ? -c : c);
uint32_t j0;
FFLOORL80(x, j0, ix, lx); /* Integer part of ax. */
if (j0 > 40)
if (j0 > 40)
if (j0 > 30)
j0 = (uint32_t)x;
if (j0 & 1) s = -s;
uint32_t j0;
FFLOORL80(x, j0, ix, lx); /* Integer part of ax. */
FFLOORL80(x, j0, ix, lx); /* Integer part of ax. */
uint32_t j0;
return (u/v + tpi*(j0(x)*log(x)));
if (n==0) return(j0(x));
a = j0(x);
b = (t*j0(x)/b);
#define FFLOORF(x, j0, ix) do { \
(j0) = (((ix) >> 23) & 0xff) - 0x7f; \
(ix) &= ~(0x007fffff >> (j0)); \
#define FFLOOR(x, j0, ix, lx) do { \
(j0) = (((ix) >> 20) & 0x7ff) - 0x3ff; \
if ((j0) < 20) { \
(ix) &= ~(0x000fffff >> (j0)); \
(lx) &= ~((uint32_t)0xffffffff >> ((j0) - 20)); \
#define FFLOORL80(x, j0, ix, lx) do { \
j0 = ix - 0x3fff + 1; \
if ((j0) < 32) { \
(lx) &= ~((((lx) << 32)-1) >> (j0)); \
_m = (uint64_t)-1 >> (j0); \
FFLOOR(x, j0, ix, lx); /* Integer part of ax. */
if (j0 > 30)
j0 = (uint32_t)x;
if (j0 & 1) s = -s;
uint32_t hx, ix, j0, lx;
j0 = (uint32_t)x;
s = (j0 & 1) ? -s : s;
uint32_t hx, ix, j0;
FFLOORF(x, j0, ix); /* Integer part of ax. */
uint32_t hx, ix, j0, lx;
FFLOOR(x, j0, ix, lx); /* Integer part of ax. */
DFUNC_DBL(j0)
TEST(j0(M_PI));
int i, j, m, i0, i1, j0, j1, nc;
j0 = J[i0 - 1] + 1;
for (i = i0, j = j0; i <= i1 && j <= j1; i++, j++)
change(file1, f1, file2, f2, i0, i1, j0, j1, &flags);
j0 = J[i0 + 1] - 1;
change(file1, f1, file2, f2, i1, i0, j1, j0, &flags);