| tree[p].dir? ↔ m ∈ dirs, abs(tree, ino)(dirs), afs-cons(dirs, files), fids-cons(tree, abs-files(files), ofh), ispath(p, ino, m, dirs, files), q ⊑ p, ∀ q. q ⊑ p → px(user, meta(q, tree, abs-files(files))) ⊦ px(user, meta(q, ino, dirs, files)) |
∀ ino. ¬ ino ∈ files ∨ ¬ ino ∈ dirs, ∀ ino. ⌜ino⌝ ∈ tree.fids → ino ∈ files, ((abs(tree, ino) * D))(dirs), ispath(p, ino, dirs, files), fs = abs-files(files) ⊦ meta(p, tree, fs) = meta(p, ino, dirs, files)
⊦ ⌜n⌝ ∈ tree.fids ∧ abs(tree, ino)(dirs) ∧ fids-cons(tree, abs-files(files), ofh) → n ∈ files
tree[p].dir? ↔ m ∈ dirs, meta(q, tree, abs-files(files)) = meta(q, ino, dirs, files), abs(tree, ino)(dirs), afs-cons(dirs, files), fids-cons(tree, abs-files(files), ofh), ispath(p, ino, m, dirs, files), q ⊑ p, ∀ q. q ⊑ p → px(user, meta(q, tree, abs-files(files))) ⊦ px(user, meta(q, ino, dirs, files))
Used simplifier rules: fid-file: ⊦ ⌜n⌝ ∈ tree.fids ∧ abs(tree, ino)(dirs) ∧ fids-cons(tree, abs-files(files), ofh) → n ∈ files;% ⊦ afs-cons(dirs, files) ∧ ino ∈ dirs → ¬ ino ∈ files; (s)% ⊦ emp * D = D; (s)%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]% ⊦ ispath(q, n, m, dirs, files) ∧ p ⊑ q → ispath(p, n, dirs, files); (ss)%tree[p].dir? ⊦ meta(p, tree, fs) = tree[p].meta; (s) Used terms: files, dirs, tree, ino, emp, q, abs-files(files)