| dirs[m] = mkdir(m0, md, m1, m2, entries), ((abs|(tree, ino0, p3, m) * abs(tree[p3], m)))(dirs), tree[p3 + str ' + p0].dir?, tree[p3].dir?, ispath(p0, entries[str], m, dirs, files), ispath(p3, ino0, m, dirs, files), str ∈ entries, p3 ∈ tree, ino0 ∈ dirs, p0 ∈ tree[p3][str '], str ' ∈ tree[p3], m ∈ dirs, ∀ ino. ⌜ino⌝ ∈ tree.fids → ino ∈ files, ∀ ino. ¬ ino ∈ files ∨ ¬ ino ∈ dirs ⊦ |
⊦ tree.dir? → abs(tree, ino) = _∃(λ ad. ino => ad * abs(tree.entries, ad.entries) ∧ ⌜ad.meta = tree.meta⌝ ∧ ⌜ad.size = # ad.entries⌝ )
dirs[m] = mkdir(m0, md, m1, m2, entries), ((abs|(tree, ino0, p3, m) * _∃(λ ad. m => ad * abs(tree[p3].entries, ad.entries) ∧ ⌜ad.meta = tree[p3].meta⌝ ∧ ⌜ad.size = # ad.entries⌝ )) )(dirs), tree[p3 + str ' + p0].dir?, tree[p3].dir?, ispath(p3, ino0, m, dirs, files), ispath(p0, entries[str], m, dirs, files), m ∈ dirs, str ' ∈ tree[p3], p0 ∈ tree[p3][str '], ino0 ∈ dirs, p3 ∈ tree, str ∈ entries, ∀ ino. ¬ ino ∈ files ∨ ¬ ino ∈ dirs, ∀ ino. ⌜ino⌝ ∈ tree.fids → ino ∈ files ⊦
Used terms: m, tree[p3]