| leninv(nσ) = ⌜n0⌝ , nσ[n] < n0, ⌜n⌝ < # nσ, stutf(nσ), max∞(λ n0. ⌜n0⌝ < # nσ ∧ nσ[n0] = nσ[n]).n < n ⊦ |
n0 = n1 +1, leninv(nσ) = ⌜n0⌝ , nσ[n] < n0, ⌜n⌝ < # nσ, stutf(nσ), max∞(λ n0. ⌜n0⌝ < # nσ ∧ nσ[n0] = nσ[n]).n < n ⊦
Used simplifier rules: nat freely generated by 0, +1;;%zero-01: ⊦ ¬ m < 0; from specification nat-basic1