| ≡mod((i ^ (i0 / 2) - 1) * (i ^ (i0 / 2) + 1), 0, j), gcd(i, j) = 1, gcd(i ^ (i0 / 2) - 1, j) = 1, 1 < i, i < j, ≡mod(i ^ i0, 1, j), even(i0), 0 < j, 0 < i, 0 ≤ i0, 1 < j ⊦ j | abs(i ^ (i0 / 2) - ~1), prime(j) |
gcd(i, j) = 1, gcd(i ^ (i0 / 2) - 1, j) = 1, ≡mod((i ^ (i0 / 2) - 1) * (i ^ (i0 / 2) + 1), 0, j), 1 < i, i < j, ≡mod(i ^ i0, 1, j), even(i0), 0 < j, 0 < i, 0 ≤ i0, 1 < j ⊦ prime(j), j | i ^ (i0 / 2) + 1
Used simplifier rules: div-abs-02: ⊦ i | abs(j) ↔ i | j; from specification int-gcd%minus-neg: j < 0 ⊦ i - (* j) = i + ~ j; from specification int-abs