| (key.ino = m1 ⊃ mkfile(m4, md, # links(key.ino, dirs), content0);files[key.ino]) = mkfile(m2, md3, m3, content1), files[m] = mkfile(m0, md0, # links(m, dirs), content), files[m1] = mkfile(m5, md1, # links(m1, dirs), content0), dirs[m1] = mkdir(m7, md2, m8, m9, entries), icache[m] = mkientry(true, mkinode(m1, md, false, # links(m1, dirs), 0, m4)), pcache[key] = mkpentry(boolvar, buf), afs-cons(dirs, files), afs-cons(dirs, files[m1, mkfile(m4, md, # links(m1, dirs), content0)]), synced(dirs, icache, pcache), m1 ∈ files, m ∈ icache, m ∈ files, key ∈ pcache, key ∈ pcache → key.data? ∧ # pcache[key].page = VFS_PAGE_SIZE ∧ key.ino ∈ files ∧ (¬ pcache[key].dirty → key.part ∈ files[key.ino].content ∧ pcache[key].page = files[key.ino].content[key.part]), ∀ key0. key0 ∈ pcache → key0.data? ∧ # pcache[key0].page = VFS_PAGE_SIZE ∧ key0.ino ∈ files ∧ (¬ pcache[key0].dirty → key0.part ∈ files[key0.ino].content ∧ pcache[key0].page = files[key0.ino].content[key0.part]) ⊦ key.data? ∧ # buf = VFS_PAGE_SIZE ∧ key.ino ∈ files ∧ (¬ boolvar → key.part ∈ content1 ∧ buf = content1[key.part]) |
# files[key.ino].content[key.part] = VFS_PAGE_SIZE, (key.ino = m1 ⊃ mkfile(m4, md, # links(key.ino, dirs), content0);files[key.ino]) = mkfile(m2, md3, m3, content1), pcache[key] = mkpentry(false, files[key.ino].content[key.part]), icache[m] = mkientry(true, mkinode(m1, md, false, # links(m1, dirs), 0, m4)), dirs[m1] = mkdir(m7, md2, m8, m9, entries), files[m1] = mkfile(m5, md1, # links(m1, dirs), content0), files[m] = mkfile(m0, md0, # links(m, dirs), content), key.data?, afs-cons(dirs, files[m1, mkfile(m4, md, # links(m1, dirs), content0)]), afs-cons(dirs, files), synced(dirs, icache, pcache), key.part ∈ files[key.ino].content, key ∈ pcache, m ∈ files, m ∈ icache, m1 ∈ files, key.ino ∈ files, ∀ key0. key0 ∈ pcache → key0.data? ∧ # pcache[key0].page = VFS_PAGE_SIZE ∧ key0.ino ∈ files ∧ (¬ pcache[key0].dirty → key0.part ∈ files[key0.ino].content ∧ pcache[key0].page = files[key0.ino].content[key0.part]) ⊦ key.part ∈ content1 ∧ files[key.ino].content[key.part] = content1[key.part]
Used simplifier rules: ⊦ mkpentry(boolvar, buf).dirty ↔ boolvar; (s)% ⊦ mkpentry(boolvar, buf).page = buf; (s)