| ⟨files := (files ++ ino)[ino, mkfile(0, md, 1, ∅)]; dent1 := mkdentry(dent.name, ino); err := ESUCCESS⟩ ( dent1 = dent0 ∧ err = err0 ∧ dirs[p_ino, dirs[p_ino].entries:= dirs[p_ino].entries[dent.name, ino]] [p_ino, dirs[p_ino, dirs[p_ino].entries:= dirs[p_ino].entries[dent.name, ino]][p_ino] .size:= (dirs[p_ino, dirs[p_ino].entries:= dirs[p_ino].entries[dent.name, ino]][p_ino].size + 1) ] = dirs0 ∧ files = files0), dirs1[m] = mkdir(m0, md2, # links(m, dirs1), m2, entries0), dent = negdentry(str), dirs = dirs1, files = files1, ino = ino0, p_ino = m, afs-cons(dirs0, files0), afs-cons(dirs1, files1), afs-cons(dirs0[m, dirs0[m].meta:= md0], files0), m ∈ dirs0, m ∈ dirs1, links(m, dirs1) ≠ ∅ ∨ m = ROOT_INO ⊦ ino0 = 0, dent0.dentry?, ino0 ∈ dirs1, ino0 ∈ files1, str ∈ entries0 |
⟨dent1 := mkdentry(dent.name, ino); err := ESUCCESS⟩ ( dent1 = dent0 ∧ err = err0 ∧ dirs[p_ino, dirs[p_ino].entries:= dirs[p_ino].entries[dent.name, ino]] [p_ino, dirs[p_ino, dirs[p_ino].entries:= dirs[p_ino].entries[dent.name, ino]][p_ino] .size:= (dirs[p_ino, dirs[p_ino].entries:= dirs[p_ino].entries[dent.name, ino]][p_ino].size + 1) ] = dirs0 ∧ (files ++ ino)[ino, mkfile(0, md, 1, ∅)] = files0), dirs1[m] = mkdir(m0, md2, # links(m, dirs1), m2, entries0), dent = negdentry(str), dirs = dirs1, files = files1, ino = ino0, p_ino = m, afs-cons(dirs0[m, dirs0[m].meta:= md0], files0), afs-cons(dirs1, files1), afs-cons(dirs0, files0), m ∈ dirs1, m ∈ dirs0, links(m, dirs1) ≠ ∅ ∨ m = ROOT_INO ⊦ ino0 = 0, dent0.dentry?, str ∈ entries0, ino0 ∈ files1, ino0 ∈ dirs1