| # links(m, dirs) = 0, dirs[m] = mkdir(m0, md, 0, m2, entries), dirs[m3] = mkdir(m1, md0, # links(m3, dirs), m4, entries0), dcache[dentrykey(m3, str)] = mkdentry(str, entries0[str]), afs-cons(dirs, files), afs-cons(dirs -- m, files), synced(dirs, icache, pcache), str ∈ entries0, m ∈ dirs, dentrykey(m3, str) ∈ dcache, m3 ∈ dirs, asynced1 → synced(files, icache, pcache), ∀ key0. key0 ∈ dcache → key0.dentry? ∧ key0.name = dcache[key0].name ∧ key0.ino ∈ dirs ∧ (links(key0.ino, dirs) ≠ ∅ ∨ key0.ino = ROOT_INO) ∧ (dcache[key0].ino ∈ dirs ∨ dcache[key0].ino ∈ files) ∧ dcache[key0].name ∈ dirs[key0.ino].entries ∧ dcache[key0].ino = dirs[key0.ino].entries[dcache[key0].name] ∧ dcache[key0].dentry?, links(m3, dirs) ≠ ∅ ∨ m3 = ROOT_INO, entries0[str] ∈ dirs ∨ entries0[str] ∈ files ⊦ m = ROOT_INO, m3 ≠ m ∧ (links(m3, dirs -- m) ≠ ∅ ∨ m3 = ROOT_INO) ∧ (entries0[str] ≠ m ∧ entries0[str] ∈ dirs ∨ entries0[str] ∈ files) |
# links(m, dirs) = 0, dcache[dentrykey(m3, str)] = mkdentry(str, entries0[str]), dirs[m3] = mkdir(m1, md0, # links(m3, dirs), m4, entries0), dirs[m] = mkdir(m0, md, 0, m2, entries), afs-cons(dirs -- m, files), afs-cons(dirs, files), synced(dirs, icache, pcache), m3 ∈ dirs, dentrykey(m3, str) ∈ dcache, m ∈ dirs, str ∈ entries0, asynced1 → synced(files, icache, pcache), ∀ key0. key0 ∈ dcache → key0.dentry? ∧ key0.name = dcache[key0].name ∧ key0.ino ∈ dirs ∧ (links(key0.ino, dirs) ≠ ∅ ∨ key0.ino = ROOT_INO) ∧ (dcache[key0].ino ∈ dirs ∨ dcache[key0].ino ∈ files) ∧ dcache[key0].name ∈ dirs[key0.ino].entries ∧ dcache[key0].ino = dirs[key0.ino].entries[dcache[key0].name] ∧ dcache[key0].dentry?, entries0[str] ∈ dirs ∨ entries0[str] ∈ files, links(m3, dirs) ≠ ∅ ∨ m3 = ROOT_INO ⊦ links(m3, dirs) = ∅, m = ROOT_INO, m3 ≠ m ∧ (links(m3, dirs -- m) ≠ ∅ ∨ m3 = ROOT_INO) ∧ (entries0[str] ≠ m ∧ entries0[str] ∈ dirs ∨ entries0[str] ∈ files)
Used simplifier rules: ⊦ afs-cons(dirs, files) → ( links(ino, dirs) = ∅ ↔ (ino ∈ dirs → dirs[ino].nlink = 0) ∧ (ino ∈ files → files[ino].nlink = 0)); (ws)% ⊦ afs-cons(dirs, files) ∧ ino ∈ dirs → ¬ ino ∈ files; (s)% ⊦ mkdir(m, md, m0, m1, entries).nlink = m0; (s)%size-zero-02: ⊦ # ls = 0 → ls = ∅; (forward) from specification set-basic[alink-set]%size-zero-01: ⊦ ls ≠ ∅ → # ls ≠ 0; (forward) from specification set-basic[alink-set]%⊦ ino ∈ dirs ∧ dirs[ino] = mkdir(n0, md, n, n1, entries) ∧ str ∈ entries ∧ afs-cons(dirs, files) → (entries[str] ∈ files ↔ ¬ entries[str] ∈ dirs); (ss)%afs-cons-dir-nlink: ⊦ afs-cons(dirs, files) ∧ ino ∈ dirs ∧ dirs[ino] = mkdir(n0, md, n, n1, entries) → # links(ino, dirs) = n; (forward) from specification afs-base% ⊦ afs-cons(dirs, files) → ROOT_INO ∈ dirs; (ss)% ⊦ afs-cons(dirs, files) → ¬ ROOT_INO ∈ files; (s)%⊦ p_ino ∈ dirs ∧ dirs[p_ino] = mkdir(m, md, n, n0, entries) ∧ str ∈ entries → links(entries[str], dirs) ≠ ∅; (s) Used formulas: links(m3, dirs) = ∅