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