| ino0 ∈ dirs, str ∈ entries ⊦ links(ino, dirs[ino0, mkdir(m, md, n0, n1, entries -- str)]) = (str ∈ entries ∧ entries[str] = ino ⊃ links(entries[str], dirs[ino0, mkdir(m, md, n0, n1, entries)]) -- mklink(ino0, str) ;links(ino, dirs[ino0, mkdir(m, md, n0, n1, entries)]) ) |
str ∈ entries, ino0 ∈ dirs ⊦ links(ino, dirs[ino0, mkdir(m, md, n0, n1, entries -- str)]) = (entries[str] = ino ⊃ links(entries[str], dirs[ino0, mkdir(m, md, n0, n1, entries)]) -- mklink(ino0, str) ;links(ino, dirs[ino0, mkdir(m, md, n0, n1, entries)]) )