| of[fd] = mkfile(m, mode, m0), root.dir?, dom of < ino0, abs(root, ROOT_INO)(dirs), afs-cons(dirs, files), fids-cons(root, abs-files(files), abs-of(of)), of-cons(of, dirs, files), fd ∈ of, ⌊err0⌋ , psynced → asynced ⊦ ⟪err := err0; n := n0; if err = ESUCCESS then n := inode.size + n; ofh := abs-of(of); if err = ESUCCESS then of[fd].pos := n⟫ ⟨posix_seek#(fd, SEEK_END, user, root, abs-files(files); n0, err1, ofh)⟩ (ofh = abs-of(of) ∧ (psynced → asynced) ∧ n = n0 ∧ err = err1) |
of[fd] = mkfile(m, mode, m0), err = err0, root.dir?, dom of < ino0, abs(root, ROOT_INO)(dirs), afs-cons(dirs, files), fids-cons(root, abs-files(files), abs-of(of)), of-cons(of, dirs, files), fd ∈ of, ⌊err0⌋ , psynced → asynced ⊦ ⟪n := n0; if err = ESUCCESS then n := inode.size + n; ofh := abs-of(of); if err = ESUCCESS then of[fd].pos := n⟫ ⟨posix_seek#(fd, SEEK_END, user, root, abs-files(files); n0, err1, ofh)⟩ (ofh = abs-of(of) ∧ (psynced → asynced) ∧ n = n0 ∧ err = err1)