| # nσ = ⌜n⌝ , m0 < n, m < n, nσ[n - 1] < nσ[m], nσ[n - 1] + 1 < nσ[m], nσ[m0] < nσ[m], nσ[n - 1] < nσ[m0], stutf(nσ), m0 ≤ m ⊦ |
# nσ = ⌜n⌝ , n = m1 + 1, nσ[m1] < nσ[m0], nσ[m0] < nσ[m], nσ[m1] + 1 < nσ[m], nσ[m1] < nσ[m], m < n, m0 < n, stutf(nσ), m0 ≤ m ⊦ n = 0
Used simplifier rules: stutf-nonempty: ⊦ stutf(nσ) → (nσ = [] ↔ false);% ⊦ # nσ = ⌜0⌝ ↔ nσ = []; (s)%n ≠ 0 ⊦ m = n - 1 ↔ n = m + 1; (elim) Used terms: n, m1