| ((ino0 => mkdir(n0, md, m0, n, entries0) * {dirs0} * abs(sdt0, sdi)))(dirs2), ((abs(tree, ino1) * abs(sdt0, sdi) * {dirs0} * ino0 => mkdir(n0, md, m0, n, entries0)))(dirs1 ∪ dirs2), abs(tree, ino1)(dirs1), ino ∈ dirs2, sdi[str, ino1] ⊆ entries0, dirs1 ⊥ dirs2, ∀ str0. str0 ∈ sdt0[str, tree] → (∀ ino, dirs, ino0, dirs0, files. ino ∈ dirs ∧ ((abs(sdt0[str, tree][str0], ino0) * {dirs0} ))(dirs) → ino ∈ dirs0 ∨ (∃ p. ispath(p, ino0, ino, dirs, files))), ∀ sdt1, ino0, n0, md, m0, n, entries0, entries, dirs0, dirs, ino, files. # sdt1 < # sdt0[str, tree] → (((ino0 => mkdir(n0, md, m0, n, entries0) * abs(sdt1, entries)) * {dirs0} ))(dirs) ∧ ino ∈ dirs ∧ entries ⊆ entries0 ∧ (∀ str. str ∈ sdt1 → (∀ ino, dirs, ino0, dirs0, files. ino ∈ dirs ∧ ((abs(sdt1[str], ino0) * {dirs0} ))(dirs) → ino ∈ dirs0 ∨ (∃ p. ispath(p, ino0, ino, dirs, files)))) → ino ∈ dirs0 ∨ (∃ p. ispath(p, ino0, ino, dirs, files)) ⊦ ino ∈ dirs0, str ∈ sdi, str ∈ sdt0, ∀ str. str ∈ sdi → str ∈ entries0 ∧ sdi[str] = entries0[str], ∃ p. ispath(p, ino0, ino, dirs1 ∪ dirs2, files) |
⊦ str ∈ sdi ∧ ((abs(sdt, sdi) * D))(dirs) → str ∈ sdt
⊦ str ∈ sdt ∧ ((abs(sdt, sdi) * D))(dirs) → str ∈ sdi
((ino0 => mkdir(n0, md, m0, n, entries0) * {dirs0} * abs(sdt0, sdi)))(dirs2), ((abs(tree, ino1) * abs(sdt0, sdi) * {dirs0} * ino0 => mkdir(n0, md, m0, n, entries0)))(dirs1 ∪ dirs2), abs(tree, ino1)(dirs1), str0 ∈ sdt0, ino ∈ dirs2, str0 ∈ sdi, sdi[str, ino1] ⊆ entries0, dirs1 ⊥ dirs2, ∀ str0. str0 ∈ sdt0[str, tree] → (∀ ino, dirs, ino0, dirs0, files. ino ∈ dirs ∧ ((abs(sdt0[str, tree][str0], ino0) * {dirs0} ))(dirs) → ino ∈ dirs0 ∨ (∃ p. ispath(p, ino0, ino, dirs, files))), ∀ sdt1, ino0, n0, md, m0, n, entries0, entries, dirs0, dirs, ino, files. # sdt1 < # sdt0[str, tree] → (((ino0 => mkdir(n0, md, m0, n, entries0) * abs(sdt1, entries)) * {dirs0} ))(dirs) ∧ ino ∈ dirs ∧ entries ⊆ entries0 ∧ (∀ str. str ∈ sdt1 → (∀ ino, dirs, ino0, dirs0, files. ino ∈ dirs ∧ ((abs(sdt1[str], ino0) * {dirs0} ))(dirs) → ino ∈ dirs0 ∨ (∃ p. ispath(p, ino0, ino, dirs, files)))) → ino ∈ dirs0 ∨ (∃ p. ispath(p, ino0, ino, dirs, files)) ⊦ ino ∈ dirs0, str ∈ sdi, str ∈ sdt0, ∃ p. ispath(p, ino0, ino, dirs1 ∪ dirs2, files), str0 ∈ entries0 ∧ sdi[str0] = entries0[str0]
Used simplifier rules: entries-dom1: ⊦ str ∈ sdi ∧ ((abs(sdt, sdi) * D))(dirs) → str ∈ sdt;%entries-dom2: ⊦ str ∈ sdt ∧ ((abs(sdt, sdi) * D))(dirs) → str ∈ sdi;%sep-com: ⊦ D * D0 = D0 * D; from specification heap-sep[dir-heap]%sep-ass: ⊦ (D * D0) * D1 = D * D0 * D1; from specification heap-sep[dir-heap]