| of[n0] = mkfile(m, mode, m0), of[fd, of[fd].pos:= n][n0] = mkfile(m1, mode0, m2), dom of < ino, afs-cons(dirs, files), of-cons(of, dirs, files), fd ∈ of, n0 ∈ of[fd, of[fd].pos:= n], n0 ∈ of → m ∈ files ⊦ whence = SEEK_CUR, whence = SEEK_END, m1 ∈ files |
Used simplifier rules: ⊦ fd ≠ fd0 → of[fd0, file][fd] = of[fd]; (s)% ⊦ fd ≠ fd0 → (fd ∈ of[fd0, file] ↔ fd ∈ of); (s)%⊦ of-cons(of, dirs, files) ∧ fd ∈ of ∧ of[fd] = mkfile(ino, mode, n) → ino ∈ files; (ss)% ⊦ of[fd, file][fd] = file; (s)% ⊦ fd ∈ of[fd, file]; (s)% ⊦ mkfile(m, mode, m0).pos:= m2 = mkfile(m, mode, m2); (s)%⊦ mkfile(m, mode, m0) = mkfile(m1, mode0, m2) ↔ m = m1 ∧ mode = mode0 ∧ m0 = m2; (ws) Used formulas: n0 = fd