| ⊦ fid = tree.fid ↔ tree = fnode(fid), tree.dir? |
⊦ fnode(fid).fid = fid
⊦ tree.dir? ↔ ¬(∃ fid. tree = fnode(fid))
Used simplifier rules: fid: ⊦ fnode(fid).fid = fid;%fnode-elim-strong: ⊦ tree.dir? ↔ ¬(∃ fid. tree = fnode(fid));% ⊦ fnode(fid) = fnode(fid0) ↔ fid = fid0; (s)