| # ax1 = # ndx, new(ax1, fs), ri-cons(ri, fs) ⊦ ri-cons(ri, fs[ax1, ndx]) |
# ax1 = # ndx, new(ax1, fs), key ∈ ri, ∀ key. key ∈ ri → ri[key] ∈ fs ∧ key-cons(key, fs[ri[key]]) ⊦ (ri[key] ∈ fs ∨ ri[key] ∈ ax1) ∧ key-cons(key, fs[ax1, ndx][ri[key]])
Used simplifier rules: ri-cons: ⊦ ri-cons(ri, fs) ↔ (∀ key. key ∈ ri → ri[key] ∈ fs ∧ key-cons(key, fs[ri[key]]));%# ax = # ndx ⊦ adr ∈ fs[ax, ndx] ↔ adr ∈ fs ∨ adr ∈ ax; (s)