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