| n→i(m) ^2 |%| j = n→i(n) ^2 |%| j, 0 ≤ j, m < i→n(1 + (j - 1) / 2), n < i→n(1 + (j - 1) / 2), prime(j), n→i(m) ≤ (j - 1) / 2, n→i(n) ≤ (j - 1) / 2 ⊦ countFun(0, (j - 1) / 2, λ i. i ^2 |%| j) = [], j = 2, m = n, ~1 = (j - 1) / 2 |
⊦ 0 < j → (≡mod(i, i0, j) ↔ i |%| j = i0 |%| j)
0 < j, ≡mod(n→i(m) ^2, n→i(n) ^2, j), 0 ≤ j, m < i→n(1 + (j - 1) / 2), n < i→n(1 + (j - 1) / 2), prime(j), n→i(m) ≤ (j - 1) / 2, n→i(n) ≤ (j - 1) / 2 ⊦ countFun(0, (j - 1) / 2, λ i. i ^2 |%| j) = [], j = 2, m = n, ~1 = (j - 1) / 2
Used simplifier rules: lels: ⊦ ¬ i < j ↔ j ≤ i; from specification int-abs%anti: ⊦ i ≤ j → (j ≤ i ↔ i = j); from specification int-abs%countFun-one: ⊦ countFun(i, i, intfun) = intfun(i) '; from specification intlist%zero-i: ⊦ 0 ^2 = 0; from specification int-square%e: ⊦ i ' ≠ []; from specification list[intlista]%nat2int-10: ⊦ n→i(n) ≤ 0 ↔ n = 0; from specification intnat Used terms: n→i(n) ^2, j, n→i(m) ^2