| tree[p] = dnode(md, sdt), ((m => mkdir(# entries, md, m1, m2, entries) * (abs(sdt -- str, entries -- str) * abs(sdt[str], entries[str])) * abs|(tree, ino0, p, m)))(dirs), ispath(p, ino0, m, dirs, files), str ∈ sdt, entries[str] ∈ files, ino0 ∈ dirs, str ∈ entries, p ∈ tree, ∀ ino. ¬ ino ∈ files ∨ ¬ ino ∈ dirs, ∀ ino. ⌜ino⌝ ∈ tree.fids → ino ∈ files ⊦ # links(entries[str], dirs) = 0, sdt[str] = fnode(⌜entries[str]⌝ ), ⌜entries[str]⌝ ∈ tree.fids |
⊦ ¬ ino ∈ dirs → (((abs(tree, ino) * D))(dirs) ↔ tree = fnode(⌜ino⌝ ) ∧ D(dirs))
Used simplifier rules: abs-is-file: ⊦ ¬ ino ∈ dirs → (((abs(tree, ino) * D))(dirs) ↔ tree = fnode(⌜ino⌝ ) ∧ D(dirs));%sep-ass: ⊦ (D * D0) * D1 = D * D0 * D1; from specification heap-sep[dir-heap]%sep-com: ⊦ D * D0 = D0 * D; from specification heap-sep[dir-heap] Used terms: entries[str]