| dirs[ino1] = mkdir(# entries0, md0, # links(ino1, dirs), m2, entries0), files[entries0[str]] = mkfile(m0, md1, # links(entries0[str], dirs), content0), err = err0, files0 = files, p_inode = mkinode(entries0[str], md1, false, # links(entries0[str], dirs), 0, m0), root.dir?, root[q].dir?, dom of < ino0, abs(root, ROOT_INO)(dirs), afs-cons(dirs, files), fids-cons(root, abs-files(files), abs-of(of)), ispath(q, ROOT_INO, ino1, dirs, files), of-cons(of, dirs, files), pw(user, md0), px(user, md0), px-parent(user, q, ROOT_INO, dirs, files), str ∈ entries0, ino1 ∈ dirs, entries0[str] ∈ files, ⌊err0⌋ , psynced → asynced0, links(ino1, dirs) ≠ ∅ ∨ ino1 = ROOT_INO ⊦ ⟨fs := abs-files(files0); posix_unlink#(q + str ', user, abs-of(of); err1, root, fs; psynced)⟩ (fs = abs-files(files) ∧ abs(root, ROOT_INO)(dirs) ∧ (psynced → asynced) ∧ err = err1), root[q + str '].dir?, entries0[str] ∈ dirs |
files[entries0[str]] = mkfile(m0, md1, # links(entries0[str], dirs), content0), dirs[ino1] = mkdir(# entries0, md0, # links(ino1, dirs), m2, entries0), err = err0, files0 = files, fs = abs-files(files0), p_inode = mkinode(entries0[str], md1, false, # links(entries0[str], dirs), 0, m0), root[q].dir?, root.dir?, dom of < ino0, abs(root, ROOT_INO)(dirs), afs-cons(dirs, files), fids-cons(root, abs-files(files), abs-of(of)), ispath(q, ROOT_INO, ino1, dirs, files), of-cons(of, dirs, files), pw(user, md0), px(user, md0), px-parent(user, q, ROOT_INO, dirs, files), entries0[str] ∈ files, ino1 ∈ dirs, str ∈ entries0, ⌊err0⌋ , psynced → asynced0, links(ino1, dirs) ≠ ∅ ∨ ino1 = ROOT_INO ⊦ ⟨posix_unlink#(q + str ', user, abs-of(of); err1, root, fs; psynced)⟩ (fs = abs-files(files) ∧ abs(root, ROOT_INO)(dirs) ∧ (psynced → asynced) ∧ err = err1), root[q + str '].dir?, entries0[str] ∈ dirs