| 0 < j, i < j, prime(i), ∀ j0, i. i→n(j0) < i→n(j) → prime(i) ∧ i < j0 ∧ 0 < j0 → i | fac(j0) ⊦ prime(i) ∧ i < j - 1 ∧ 0 < j - 1, i | j, i | fac(j - 1) |
0 < j, i < j, prime(i), ∀ j0, i. i→n(j0) < i→n(j) → prime(i) ∧ i < j0 ∧ 0 < j0 → i | fac(j0) ⊦ i | j, i | fac(j - 1), i + 1 < j ∧ 1 < j
Used simplifier rules: add-c: ⊦ i + j = j + i; from specification int-basic2%add-a: ⊦ i + j + i0 = (i + j) + i0; from specification int-basic2%sub-ls-01: ⊦ i < j - i0 ↔ i + i0 < j; from specification int-abs