| mon(σσ), σσ ≠ [] ⊦ ∃ σ. (∀ n. ⌜n⌝ < # σσ → σσ[n] ⊑ σ) ∧ (∀ m. ¬ # σ < ⌜m⌝ → (∃ n. ⌜n⌝ < # σσ ∧ σ to m ⊑ σσ[n])) |
mon(σσ) ⊦ σσ = [], ∃ σ. (∀ n. ⌜n⌝ < # σσ → (∃ σ1. σσ[n] + σ1 = σ)) ∧ (∀ m. ¬ # σ < ⌜m⌝ → (∃ n. ⌜n⌝ < # σσ ∧ (∃ σ1. (σ to m) + σ1 = σσ[n])))
Used simplifier rules: prefix-def: ⊦ σ ⊑ σ0 ↔ (∃ σ1. σ + σ1 = σ0);