| ⊦ σ0 + σ from m = σ from (m - (# σ0).n), ⌜m⌝ < # σ0, # σ0 < ⌜m⌝ |
# σ0 = ⌜m⌝ ⊦ σ0 + σ from m = σ
Used simplifier rules: from-zero: ⊦ σ from 0 = σ;% ⊦ m ≤ m; (s)% ⊦ m < n ↔ ¬ n ≤ m; (ss)% ⊦ ⌜m⌝ < ⌜n⌝ ↔ m < n; (s)% ⊦ m - m = 0; (s)% ⊦ ⌜m⌝ .n = m; (s)% ⊦ ¬ n∞1 < n∞ → (n∞ < n∞1 ↔ n∞ ≠ n∞1); (ss)