| leninv(nσ) = ⌜n0⌝ , stutf(nσ), ⌜max∞(λ n0. ⌜n0⌝ < # nσ ∧ nσ[n0] = n).n⌝ + ⌜1⌝ < # nσ, n < n0 ⊦ nσ[max∞(λ n0. ⌜n0⌝ < # nσ ∧ nσ[n0] = n).n + 1] = n + 1, n0 = 0 |
n0 = n1 +1, leninv(nσ) = ⌜n0⌝ , stutf(nσ), ⌜max∞(λ n0. ⌜n0⌝ < # nσ ∧ nσ[n0] = n).n⌝ + ⌜1⌝ < # nσ, n < n0 ⊦ nσ[max∞(λ n0. ⌜n0⌝ < # nσ ∧ nσ[n0] = n).n + 1] = n + 1, n0 = 0
Used simplifier rules: nat freely generated by 0, +1;;