| dirs0[m1] = mkdir(m0, md2, # links(m1, dirs0), m4, entries1), afs-cons(dirs0, files0), afs-cons(dirs0[m1, mkdir(m0 + 1, md1, # links(m1, dirs0), m4, entries1[str, ino0])], (files0 ++ ino0)[ino0, mkfile(0, md, 1, ∅)]), pcache-cons(pcache, dirs0, files0), synced(dirs0, icache0, pcache), m1 ∈ dirs0, asynced1 → synced(files0, icache0, pcache), links(m1, dirs0) ≠ ∅ ∨ m1 = ROOT_INO ⊦ ino0 = 0, ino0 ∈ dirs0, ino0 ∈ files0, str ∈ entries1, ∀ key. key ∈ pcache → key.data? ∧ # pcache[key].page = VFS_PAGE_SIZE ∧ valid-file-ino (key.ino, dirs0[m1, mkdir(m0 + 1, md1, # links(m1, dirs0), m4, entries1[str, ino0])], (files0 ++ ino0)[ino0, mkfile(0, md, 1, ∅)]) ∧ ( ¬ pcache[key].dirty → key.part ∈ (files0 ++ ino0)[ino0, mkfile(0, md, 1, ∅)][key.ino].content ∧ pcache[key].page = (files0 ++ ino0)[ino0, mkfile(0, md, 1, ∅)][key.ino].content[key.part]) |
dirs0[m1] = mkdir(m0, md2, # links(m1, dirs0), m4, entries1), afs-cons(dirs0[m1, mkdir(m0 + 1, md1, # links(m1, dirs0), m4, entries1[str, ino0])], (files0 ++ ino0)[ino0, mkfile(0, md, 1, ∅)]), afs-cons(dirs0, files0), pcache-cons(pcache, dirs0, files0), synced(dirs0, icache0, pcache), key ∈ pcache, m1 ∈ dirs0, asynced1 → synced(files0, icache0, pcache), links(m1, dirs0) ≠ ∅ ∨ m1 = ROOT_INO ⊦ ino0 = 0, str ∈ entries1, ino0 ∈ files0, ino0 ∈ dirs0, key.data? ∧ # pcache[key].page = VFS_PAGE_SIZE ∧ (key.ino = ino0 ∨ key.ino ∈ files0) ∧ ( ¬ pcache[key].dirty → key.part ∈ (key.ino = ino0 ⊃ mkfile(0, md, 1, ∅);(files0 ++ ino0)[key.ino]).content ∧ pcache[key].page = (key.ino = ino0 ⊃ mkfile(0, md, 1, ∅);(files0 ++ ino0)[key.ino]).content[key.part])
Used simplifier rules: ⊦ files[ino, af][ino0] = (ino0 = ino ∧ ino ∈ files ⊃ af;files[ino0]); (s)%ino ≠ 0, ¬ ino ∈ files ⊦ ino0 ∈ files ++ ino ↔ ino0 = ino ∨ ino0 ∈ files; (s)% ⊦ ino ∈ files[ino0, af] ↔ ino ∈ files; (s)% ⊦ valid-file-ino(ino, dirs, files) ↔ ino ∈ files; (s)