| ⌜n + 1⌝ < # rem(⌜nl0⌝ , np), ∀ n. ⌜n⌝ + ⌜1⌝ < # rem(⌜nl0⌝ , np) → rem(⌜nl0⌝ , np)[n] < rem(⌜nl0⌝ , np)[n + 1], mon<(⌜nl0⌝ + ⌜m '⌝ ), ⌜n⌝ < # rem(⌜nl0⌝ , np), rem(⌜nl0⌝ , np)[n + 1] ≤ rem(⌜nl0⌝ , np)[n], ∀ nl1, np. # nl1 < #(nl0 + m ') → mon<(⌜nl1⌝ ) → mon<(rem(⌜nl1⌝ , np)) ⊦ np(# nl0) |
mon<(⌜nl0⌝ + ⌜m '⌝ ), ⌜n⌝ < # rem(⌜nl0⌝ , np), rem(⌜nl0⌝ , np)[n + 1] ≤ rem(⌜nl0⌝ , np)[n], ⌜n⌝ + ⌜1⌝ < # rem(⌜nl0⌝ , np), ∀ n. ⌜n⌝ + ⌜1⌝ < # rem(⌜nl0⌝ , np) → rem(⌜nl0⌝ , np)[n] < rem(⌜nl0⌝ , np)[n + 1], ∀ nl1, np. # nl1 < #(nl0 + m ') → mon<(⌜nl1⌝ ) → mon<(rem(⌜nl1⌝ , np)) ⊦ np(# nl0)
Used simplifier rules: c: ⊦ m + n = n + m; from specification nat-basic2%a: ⊦ (m + n0) + n1 = m + n0 + n1; from specification nat-basic2%add-fin: ⊦ ⌜m + n⌝ = ⌜m⌝ + ⌜n⌝ ; from specification nat-inf