| err = ESUCCESS, inode = mkinode(m, md, boolvar, m0, m1, m2), afs-cons(dirs, files), of-cons(of, dirs, files), m ∈ dirs ∧ m0 = dirs[m].nlink ∧ m2 = dirs[m].size ∧ m1 = dirs[m].nsubdirs ∧ boolvar ∨ m ∈ files ∧ m0 = files[m].nlink ∧ m1 = 0 ∧ ¬ boolvar ⊦ [err := ESUCCESS; let ino = inode.ino in if ino ∈ dirs then if dirs[ino].nlink = 0 then dirs := dirs -- ino else if files[ino].nlink = 0 then files := files -- ino] (afs-cons(dirs, files) → of-cons(of, dirs, files)), m = ROOT_INO, is-open(m, of) |
err = ESUCCESS, inode = mkinode(m, md, boolvar, m0, m1, m2), afs-cons(dirs, files), of-cons(of, dirs, files), m ∈ dirs ∧ m0 = dirs[m].nlink ∧ m2 = dirs[m].size ∧ m1 = dirs[m].nsubdirs ∧ boolvar ∨ m ∈ files ∧ m0 = files[m].nlink ∧ m1 = 0 ∧ ¬ boolvar ⊦ [let ino = inode.ino in if ino ∈ dirs then if dirs[ino].nlink = 0 then dirs := dirs -- ino else if files[ino].nlink = 0 then files := files -- ino] (afs-cons(dirs, files) → of-cons(of, dirs, files)), m = ROOT_INO, is-open(m, of)