| ri[fs[referenced-adrs(ax0, ri)].keys] = referenced-adrs(ax0, ri), ri-cons(ri, fs), adr ∈ ri ⊦ ri[fs[adr '].keys] = (adr ∈ ri ⊃ adr ';[]) |
ri[fs[referenced-adrs(ax0, ri)].keys] = referenced-adrs(ax0, ri), ri-cons(ri, fs), adr ∈ ri ⊦ ri[fs[adr].key] = adr
Used simplifier rules: keys-one: ⊦ nd '.keys = nd.key ';% ⊦ adr ' = adr0 ' ↔ adr = adr0; (s)% ⊦ ri[key '] = ri[key] '; (s)% ⊦ fs[adr '] = fs[adr] '; (s)