| err = ESUCCESS, err0 = err1, root.dir?, fids-cons(root, fs, ofh), pre-unlink(path, err, user, root, fs, ofh) ⊦ ⟪let fid = root[path].fid in {root := root -- path; if ¬ fid ∈ ofh.fids ∧ ¬ fid ∈ root.fids then fs := fs -- fid}; psynced := ?⟫ (root.dir? ∧ fids-cons(root, fs, ofh)) |
err = ESUCCESS, err0 = err1, fid = root[path].fid, root.dir?, fids-cons(root, fs, ofh), pre-unlink(path, err, user, root, fs, ofh) ⊦ ⟪root := root -- path; if ¬ fid ∈ ofh.fids ∧ ¬ fid ∈ root.fids then fs := fs -- fid; psynced := ?⟫ (root.dir? ∧ fids-cons(root, fs, ofh))