| # nσ = ⌜n⌝ , stutf(nσ), ∀ n. ∃ n0. n < n0 ∧ (∃ m. ⌜m⌝ < # nσ ∧ nσ[m] = n0 - 1) ⊦ |
# nσ = ⌜n⌝ , n = n1 +1, stutf(nσ), ∀ n. ∃ n0. n < n0 ∧ (∃ m. ⌜m⌝ < # nσ ∧ nσ[m] = n0 - 1) ⊦
Used simplifier rules: stutf-nonempty: ⊦ stutf(nσ) → (nσ = [] ↔ false);%nat freely generated by 0, +1;;% ⊦ # nσ = ⌜0⌝ ↔ nσ = []; (s)