| ⊦ inodekey(n) ∈ ri[key, adr] ↔ n ∈ ri.inos ∪ (key.inode? ⊃ ∅ ++ key.ino;∅) |
n ∈ ri.inos ∪ (key.inode? ⊃ ∅ ++ key.ino;∅) ⊦ inodekey(n) ∈ ri[key, adr]
Used simplifier rules: inos-node-store-def: ⊦ n ∈ ri.inos ↔ inodekey(n) ∈ ri;% ⊦ n ∈ ns ∪ ns0 ↔ ¬(¬ n ∈ ns ∧ ¬ n ∈ ns0); (ss)%una: ⊦ (ns ∪ ns0) ∪ ns1 = ns ∪ ns0 ∪ ns1; from specification set-union[nat-set]%unc: ⊦ ns ∪ ns0 = ns0 ∪ ns; from specification set-union[nat-set]% ⊦ key ∈ ri[key0, adr] ↔ key = key0 ∨ key ∈ ri; (ws)% ⊦ inodekey(m).inode?; (s)% ⊦ inodekey(m).ino = m; (s)% ⊦ n ∈ ∅ ++ n0 ↔ n = n0; (s)