| # nσ = ⌜n⌝ + ⌜1⌝ , leninv(nσ) = ⌜0⌝ , stutf(nσ) ⊦ ([])[nσ[n]] = n |
⊦ stutf(nσ) → (leninv(nσ) = ⌜0⌝ ↔ nσ = ⌜λ n. 0⌝ )
Used simplifier rules: ⊦ # ⌜nnf⌝ = ∞; (s)% ⊦ ⌜n⌝ + n∞1 = ∞ ↔ n∞1 = ∞; (s)% ⊦ ⌜m⌝ ≠ ∞; (s)%add-assoc: ⊦ (n∞ + n∞1) + n∞2 = n∞ + n∞1 + n∞2; from specification nat-inf%add-comm: ⊦ n∞1 + n∞2 = n∞2 + n∞1; from specification nat-inf Used terms: nσ