| # kx = # ax1 + # ax0 + 1, kx.toSet ⊆ dom ri, ∀ key. key ∈ ri → ri[key] ∈ fs ∧ key-cons(key, fs[ri[key]]) ⊦ dups(kx), dups(ax1 + ax0), dups(ax1), dups(ax0), node-cons(fs[ax1 + adr ' + ax0, fs[ri[kx]]][adr].key, fs[ax1 + adr ' + ax0, fs[ri[kx]]][adr]), adr ∈ ax1, adr ∈ ax0 |
n ≤ # kx ⊦ ∃ kx0, kx1. kx = kx0 + kx1 ∧ # kx0 = n
# kx = # ax1 + # ax0 + 1, kx.toSet ⊆ dom ri, ∀ key. key ∈ ri → ri[key] ∈ fs ∧ key-cons(key, fs[ri[key]]), ∃ kx0, kx1. kx = kx0 + kx1 ∧ # kx0 = # ax1 ⊦ dups(ax0), dups(ax1), dups(ax1 + ax0), dups(kx), node-cons(fs[ax1 + adr ' + ax0, fs[ri[kx]]][adr].key, fs[ax1 + adr ' + ax0, fs[ri[kx]]][adr]), adr ∈ ax0, adr ∈ ax1
Used simplifier rules: ⊦ m ≤ n ↔ ¬ n < m; (ss)%f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic%lf-02: ⊦ m < n ∧ m = n0 → n0 < n; (forward) from specification nat-basic% ⊦ # ax = 0 ↔ ax = []; (s)% ⊦ ¬ m + n < m; (s)%a: ⊦ (m + n0) + n1 = m + n0 + n1; from specification nat-basic%c: ⊦ m + n = n + m; from specification nat-basic Used terms: # ax1, kx