| # kx = # ax, new(ax, fs), key ∈ ri, kx.toSet ⊆ dom ri, ∀ key. key ∈ ri → ri[key] ∈ fs ∧ key-cons(key, fs[ri[key]]) ⊦ dups(ax), dups(kx), key ∈ kx, (ri[kx, ax][key] ∈ fs ∨ ri[kx, ax][key] ∈ ax) ∧ key-cons(key, fs[ax, fs[ri[kx]]][ri[kx, ax][key]]) |
# kx = # ax, new(ax, fs), key ∈ ri, kx.toSet ⊆ dom ri, ∀ key. key ∈ ri → ri[key] ∈ fs ∧ key-cons(key, fs[ri[key]]) ⊦ dups(kx), dups(ax), key ∈ kx, (ri[key] ∈ fs ∨ ri[key] ∈ ax) ∧ key-cons(key, fs[ax, fs[ri[kx]]][ri[key]])
Used simplifier rules: ⊦ # kx = # ax ∧ key ∈ ri ∧ ¬ key ∈ kx → ri[kx, ax][key] = ri[key]; (s)