| # buf = VFS_PAGE_SIZE, (key.ino = m ⊃ mkfile(m0, md, # links(key.ino, dirs), content[n, buf]);files1[key.ino]) = mkfile(m1, md0, m3, content0), files1[m] = mkfile(m0, md, # links(m, dirs), content), files0[m] = mkfile(m0, md, # links(m, dirs), content1), pcache[datakey(m, n)] = mkpentry(true, buf), pcache[key] = mkpentry(boolvar, buf0), n * VFS_PAGE_SIZE < m2, afs-cons(dirs, files0), afs-cons(dirs, files1), afs-cons(dirs, files1[m, mkfile(m0, md, # links(m, dirs), content[n, buf])]), pcache-cons(pcache1, dirs, files0), datakey(m, n) ∈ pcache, m ∈ files1, m ∈ files0, key ∈ pcache, ⌊err0⌋ , ∀ pageno. (pageno < n ⊃ (pageno ∈ content ↔ pageno ∈ content1 ⊕ mkcontent(m, pcache1)) ∧ content[pageno] = (content1 ⊕ mkcontent(m, pcache1))[pageno] ;(pageno ∈ content ↔ pageno ∈ content1) ∧ content[pageno] = content1[pageno] ), ∀ key. (key ∈ pcache ↔ key ∈ pcache1) ∧ pcache[key].page = pcache1[key].page ∧ (pcache[key].dirty → pcache1[key].dirty), ∀ key. key ∈ pcache → key.data? ∧ # pcache[key].page = VFS_PAGE_SIZE ∧ valid-file-ino(key.ino, dirs, files1) ∧ (¬ pcache[key].dirty → key.part ∈ files1[key.ino].content ∧ pcache[key].page = files1[key.ino].content[key.part]) ⊦ key.data? ∧ # buf0 = VFS_PAGE_SIZE ∧ key.ino ∈ files1 ∧ (¬ boolvar → key.part ∈ content0 ∧ buf0 = content0[key.part]) |
# buf = VFS_PAGE_SIZE, (key.ino = m ⊃ mkfile(m0, md, # links(key.ino, dirs), content[n, buf]);files1[key.ino]) = mkfile(m1, md0, m3, content0), pcache[key] = mkpentry(boolvar, buf0), pcache[datakey(m, n)] = mkpentry(true, buf), files0[m] = mkfile(m0, md, # links(m, dirs), content1), files1[m] = mkfile(m0, md, # links(m, dirs), content), n * VFS_PAGE_SIZE < m2, afs-cons(dirs, files1[m, mkfile(m0, md, # links(m, dirs), content[n, buf])]), afs-cons(dirs, files1), afs-cons(dirs, files0), pcache-cons(pcache1, dirs, files0), key ∈ pcache, m ∈ files0, m ∈ files1, datakey(m, n) ∈ pcache, ⌊err0⌋ , ∀ key. (key ∈ pcache ↔ key ∈ pcache1) ∧ pcache[key].page = pcache1[key].page ∧ (pcache[key].dirty → pcache1[key].dirty), ∀ pageno. (pageno < n ⊃ (pageno ∈ content ↔ pageno ∈ content1 ⊕ mkcontent(m, pcache1)) ∧ content[pageno] = (content1 ⊕ mkcontent(m, pcache1))[pageno] ;(pageno ∈ content ↔ pageno ∈ content1) ∧ content[pageno] = content1[pageno] ), ∀ key0. key0 ∈ pcache → key0.data? ∧ # pcache[key0].page = VFS_PAGE_SIZE ∧ key0.ino ∈ files1 ∧ (¬ pcache[key0].dirty → key0.part ∈ files1[key0.ino].content ∧ pcache[key0].page = files1[key0.ino].content[key0.part]) ⊦ key.data? ∧ # buf0 = VFS_PAGE_SIZE ∧ key.ino ∈ files1 ∧ (¬ boolvar → key.part ∈ content0 ∧ buf0 = content0[key.part])
Used simplifier rules: ⊦ valid-file-ino(ino, dirs, files) ↔ ino ∈ files; (s)