| # σσ = ⌜n0⌝ + ⌜1⌝ , mon(σσ) ⊦ σσ = [], # σσ[n0] < ⌜m⌝ , ∃ n. ¬ n0 < n ∧ (∃ σ1. (σσ[n0] to m) + σ1 = σσ[n]), ∃ σ. (∀ n. ¬ n0 < n → (∃ σ1. σσ[n] + σ1 = σ)) ∧ (∀ m. ¬ # σ < ⌜m⌝ → (∃ n. ¬ n0 < n ∧ (∃ σ1. (σ to m) + σ1 = σσ[n]))), ∃ σ1. (σσ[n0] to m) + σ1 = σσ[n0] |
Used simplifier rules: to-plus-from-simp: ¬ # σ < ⌜n⌝ ⊦ (σ to n) + (σ from n) ≠ σ ↔ false; from specification stream%append-assoc: ⊦ (σ + σ1) + σ2 = σ + σ1 + σ2; from specification stream Used terms: σσ[n0] from m