| ((ino => mkdir(# entries, tree[p].meta, # links(ino, dirs), m1, entries) * abs(tree[p].entries, entries) * abs|(tree, ROOT_INO, p, ino)) )(dirs), tree[p].dir?, afs-cons(dirs, files), fids-cons(tree, abs-files(files), ofh), ispath(p, ROOT_INO, ino, dirs, files), p ∈ tree ⊦ abs(tree0, ROOT_INO)(dirs0), ∃ sdt. ((abs|(tree, ROOT_INO, p, ino) * ino => mkdir(# entries, tree[p].meta, # links(ino, dirs), m1, entries) * abs(sdt, entries)))(dirs) ∧ tree[p] = dnode(tree[p].meta, sdt) |
tree[p] = dnode(md, sdt0), ((ino => mkdir(# entries, md, # links(ino, dirs), m1, entries) * abs(sdt0, entries) * abs|(tree, ROOT_INO, p, ino)))(dirs), tree[p].dir?, afs-cons(dirs, files), fids-cons(tree, abs-files(files), ofh), ispath(p, ROOT_INO, ino, dirs, files), p ∈ tree ⊦ abs(tree0, ROOT_INO)(dirs0), ∃ sdt. ((abs|(tree, ROOT_INO, p, ino) * ino => mkdir(# entries, md, # links(ino, dirs), m1, entries) * abs(sdt, entries)))(dirs) ∧ tree[p] = dnode(md, sdt)
Used simplifier rules: tree.dir? ⊦ md = tree.meta ∧ sdt = tree.entries ↔ tree = dnode(md, sdt); (elim) Used terms: tree[p], md, sdt0