| # links(m, dirs) = 0, dirs[m] = mkdir(m5, md1, 0, m7, entries0), dirs[ino] = mkdir(m2, md0, m3, m4, entries), files[ino] = mkfile(m0, md, m1, content), m ∈ dirs, ROOT_INO ∈ dirs, ino ∈ dirs ∧ ino ≠ ROOT_INO ∧ links(ino, dirs) = ∅ → entries = ∅, ino ∈ files → ¬ ino ∈ dirs ∧ m1 = # links(ino, dirs), ino ∈ dirs ∧ name ∈ entries → entries[name] ∈ dirs ∨ entries[name] ∈ files, ino ∈ dirs → m3 = # links(ino, dirs) ∧ # links(ino, dirs) ≤ 1 ∧ m2 = # entries ∧ m4 = # subdirs(ino, dirs), m ∈ dirs ∧ m ≠ ROOT_INO ∧ links(m, dirs) = ∅ → dirs[m].entries = ∅, m ∈ dirs → ¬ m ∈ files ∧ dirs[m].nlink = # links(m, dirs) ∧ dirs[m].nlink ≤ 1 ∧ dirs[m].size = # dirs[m].entries ∧ dirs[m].nsubdirs = # subdirs(m, dirs), m ∈ files → ¬ m ∈ dirs ∧ files[m].nlink = # links(m, dirs), ∀ name0. m ∈ dirs ∧ name0 ∈ dirs[m].entries → dirs[m].entries[name0] ∈ dirs ∨ dirs[m].entries[name0] ∈ files, ∀ n. m ∈ files ∧ n ∈ files[m].content → # files[m].content[n] = VFS_PAGE_SIZE ⊦ m = ROOT_INO, (ino ≠ m ∧ ino ∈ dirs ∧ ino ≠ ROOT_INO ∧ links(ino, dirs -- m) = ∅ → entries = ∅) ∧ ( ino ≠ m ∧ ino ∈ dirs → m3 = # links(ino, dirs -- m) ∧ # links(ino, dirs -- m) ≤ 1 ∧ m2 = # entries ∧ m4 = # subdirs(ino, dirs -- m)) ∧ (ino ∈ files → (ino = m ∨ ¬ ino ∈ dirs) ∧ m1 = # links(ino, dirs -- m)) ∧ (ino ≠ m ∧ ino ∈ dirs ∧ name ∈ entries → entries[name] ≠ m ∧ entries[name] ∈ dirs ∨ entries[name] ∈ files) |
files[ino] = mkfile(m0, md, m1, content), dirs[ino] = mkdir(m2, md0, m3, m4, entries), dirs[m] = mkdir(0, md1, 0, # subdirs(m, dirs), ∅), links(m, dirs) = ∅, ROOT_INO ∈ dirs, m ∈ dirs, ino ∈ dirs → m3 = # links(ino, dirs) ∧ # links(ino, dirs) ≤ 1 ∧ m2 = # entries ∧ m4 = # subdirs(ino, dirs), ino ∈ dirs ∧ name ∈ entries → entries[name] ∈ dirs ∨ entries[name] ∈ files, ino ∈ files → ¬ ino ∈ dirs ∧ m1 = # links(ino, dirs), ino ∈ dirs ∧ ino ≠ ROOT_INO ∧ links(ino, dirs) = ∅ → entries = ∅ ⊦ m = ROOT_INO, m ∈ files, (ino ≠ m ∧ ino ∈ dirs ∧ ino ≠ ROOT_INO ∧ links(ino, dirs) = ∅ → entries = ∅) ∧ (ino ≠ m ∧ ino ∈ dirs → m3 = # links(ino, dirs) ∧ # links(ino, dirs) ≤ 1 ∧ m2 = # entries ∧ m4 = # subdirs(ino, dirs -- m)) ∧ (ino ≠ m ∧ ino ∈ dirs ∧ name ∈ entries → entries[name] ≠ m ∧ entries[name] ∈ dirs ∨ entries[name] ∈ files)
Used simplifier rules: ⊦ ino0 ∈ dirs ∧ dirs[ino0] = mkdir(m, md, n, n0, ∅) → links(ino, dirs -- ino0) = links(ino, dirs); (s)% ⊦ ¬ str ∈ ∅; (s)% ⊦ # ∅ = 0; (s)% ⊦ # ∅ = 0; (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]% ⊦ mkdir(m, md, m0, m1, entries).nlink = m0; (s)% ⊦ mkdir(m, md, m0, m1, entries).entries = entries; (s)% ⊦ mkdir(m, md, m0, m1, entries).size = m; (s)% ⊦ mkdir(m, md, m0, m1, entries).nsubdirs = m1; (s)