| # links(m, dirs) = 0, dirs[m] = mkdir(m0, md, 0, m2, ∅), afs-cons(dirs, files), m ∈ dirs ⊦ m = ROOT_INO, ∀ ino. (ino ∈ dirs \ orphans(dirs, files) ↔ ino ∈ (dirs \ (orphans(dirs, files) -- m)) -- m) ∧ (ino ∈ dirs \ orphans(dirs, files) → (dirs \ orphans(dirs, files))[ino] = ((dirs \ (orphans(dirs, files) -- m)) -- m)[ino]) |
# links(m, dirs) = 0, dirs[m] = mkdir(m0, md, 0, m2, ∅), afs-cons(dirs, files), m ∈ dirs ⊦ m = ROOT_INO, (¬ m ∈ orphans(dirs, files) → ino ≠ m) ∧ (ino ∈ dirs ∧ ¬ ino ∈ orphans(dirs, files) → dirs[ino] = ((dirs \ (orphans(dirs, files) -- m)) -- m)[ino])
Used simplifier rules: ⊦ ino ∈ dirs ∧ ¬ ino ∈ ns → (dirs \ ns)[ino] = dirs[ino]; (s)% ⊦ ino ∈ ns -- ino0 ↔ ino ≠ ino0 ∧ ino ∈ ns; (s)% ⊦ ino ∈ dirs -- ino0 ↔ ino ≠ ino0 ∧ ino ∈ dirs; (s)% ⊦ ino ∈ dirs \ ns ↔ ino ∈ dirs ∧ ¬ ino ∈ ns; (s)