| ad = mkdir(m, md, m0, m1, entries), m = # entries, ((((abs|(sdt[str0][p0, tree0], entries[str0], q0, ino1) * abs(sdt -- str0, entries -- str0)) * ino0 => ad) * D))(dirs), sdt[str0][parent(p0)].dir?, parent(p0) ∈ sdt[str0], str0 ∈ sdt, str0 ∈ entries, q0 ⊑ p0, ∀ tree, p, tree0, ino0, ino1, D, dirs. tree[parent(p)].dir? ∧ parent(p) ∈ tree ∧ q0 ⊑ p → (((abs|(tree[p, tree0], ino0, q0, ino1) * D))(dirs) ↔ ((abs|(tree, ino0, q0, ino1) * D))(dirs)) ∨ p = ε ⊦ p0 = ε, ∃ ad0. str0 ∈ ad0.entries ∧ ad0.meta = md ∧ ad0.size = # ad0.entries ∧ ((((abs|(sdt[str0], ad0.entries[str0], q0, ino1) * abs(sdt -- str0, ad0.entries -- str0)) * ino0 => ad0) * D))(dirs) |
(( ((abs|(sdt[str0][p0, tree0], entries[str0], q0, ino1) * abs(sdt -- str0, entries -- str0)) * ino0 => mkdir(# entries, md, m0, m1, entries)) * D) )(dirs), sdt[str0][parent(p0)].dir?, str0 ∈ entries, str0 ∈ sdt, parent(p0) ∈ sdt[str0], q0 ⊑ p0, ∀ tree, p, tree0, ino0, ino1, D, dirs. tree[parent(p)].dir? ∧ parent(p) ∈ tree ∧ q0 ⊑ p → (((abs|(tree[p, tree0], ino0, q0, ino1) * D))(dirs) ↔ ((abs|(tree, ino0, q0, ino1) * D))(dirs)) ∨ p = ε ⊦ p0 = ε, ∃ ad0. str0 ∈ ad0.entries ∧ ad0.meta = md ∧ ad0.size = # ad0.entries ∧ ((((abs|(sdt[str0], ad0.entries[str0], q0, ino1) * abs(sdt -- str0, ad0.entries -- str0)) * ino0 => ad0) * D))(dirs)