| # 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], m0 ≤ m, stutf(nσ) ⊦ |
n = m1 + 1 ∧ n ≠ 0, # nσ = ⌜n⌝ , m0 < n, m < n, nσ[m1] < nσ[m], nσ[m1] + 1 < nσ[m], nσ[m0] < nσ[m], nσ[m1] < nσ[m0], m0 ≤ m, stutf(nσ) ⊦
Used simplifier rules: stutf-nonempty: ⊦ stutf(nσ) → (¬ nσ ≠ [] ↔ false);%size-empty-equiv: ⊦ # nσ = ⌜0⌝ ↔ nσ = []; from specification stream[natstream]%n ≠ 0 ⊦ m = n - 1 ↔ n = m + 1; (elim) Used terms: n, m1