| mon≤(nσ) ∧ n ≤ m0 ∧ ⌜m0⌝ < # nσ → nσ[n] ≤ nσ[m0], nσ[m2] + 1 = nσ[n], # nσ = ∞, n < m0, stutf(nσ), ∀ m1. m2 < m1 → nσ[m1] = nσ[n] ⊦ m0 = 0, nσ[m0] = nσ[n] |
nσ[m2] + 1 = nσ[n], # nσ = ∞, nσ[n] < nσ[m0], n < m0, stutf(nσ), ∀ m1. m2 < m1 → nσ[m1] = nσ[n] ⊦ nσ[m0] = 0, m0 = 0, nσ[m0] = nσ[n]
Used simplifier rules: stutf-monle: ⊦ stutf(nσ) → (¬ mon≤(nσ) ↔ false);%lf-02: ⊦ m < n ∧ m = n0 → n0 < n; (forward) from specification nat-basic1%f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic1%less-inf2: ⊦ ⌜m⌝ < ∞; from specification nat-inf%lels-02: ⊦ m ≠ n → (m ≤ n ↔ m < n); from specification nat%lels-03: ⊦ m < n → m ≤ n; from specification nat