| VFS_PAGE_SIZE = n0 + (ino2 + ino5) % VFS_PAGE_SIZE, files[m] = mkfile(m3, md0, m4, content), err = ESUCCESS, min(ino1 - ino2 + ino5, n0) ≠ 0, m ∈ files, ino5 + min(ino1 - ino2 + ino5, n0) ≤ # buf0, ino2 + ino5 ≤ ino1, (ino2 + ino5) % VFS_PAGE_SIZE + min(ino1 - ino2 + ino5, n0) ≤ VFS_PAGE_SIZE, ¬ (ino2 + ino5) / VFS_PAGE_SIZE ∈ content, ino5 = 0 → files = files1 ⊦ [afs_writepage# (mkinode(m, md, boolvar, m0, m1, m2), (ino2 + ino5) / VFS_PAGE_SIZE, copy(buf0, ino5, zeropage, (ino2 + ino5) % VFS_PAGE_SIZE, min(ino1 - ino2 + ino5, n0)), dirs ; err, files ; asynced); n := min(ino1 - ino2 + ino5, n0); if err = ESUCCESS then ino5 := ino5 + n] (ino5 = 0 → files = files1) |
VFS_PAGE_SIZE = n0 + (ino2 + ino5) % VFS_PAGE_SIZE, files[m] = mkfile(m3, md0, m4, content), buf = copy(buf0, ino5, zeropage, (ino2 + ino5) % VFS_PAGE_SIZE, min(ino1 - ino2 + ino5, n0)), err = ESUCCESS, inode = mkinode(m, md, boolvar, m0, m1, m2), pageno = (ino2 + ino5) / VFS_PAGE_SIZE, m ∈ files, (ino2 + ino5) % VFS_PAGE_SIZE + min(ino1 - ino2 + ino5, n0) ≤ # zeropage, (ino2 + ino5) % VFS_PAGE_SIZE + min(ino1 - ino2 + ino5, n0) ≤ VFS_PAGE_SIZE, ino2 + ino5 ≤ ino1, ino5 + min(ino1 - ino2 + ino5, n0) ≤ # buf0, ino1 ≥ ino2 + ino5, ino5 = 0 → files = files1 ⊦ [if pre-writepage(inode, pageno, buf, dirs, files) then {{files[inode.ino].content[pageno] := buf; err := ESUCCESS} or fail#(; ; err); asynced := ?} else abort; n := min(ino1 - ino2 + ino5, n0); if err = ESUCCESS then ino5 := ino5 + n] (ino5 = 0 → files = files1), VFS_PAGE_SIZE = 0, min(ino1 - ino2 + ino5, n0) = 0, (ino2 + ino5) / VFS_PAGE_SIZE ∈ content
Used simplifier rules: afs_writepage#(INODE, PAGENO, PBUF, DIRS; ERR, FILES; ASYNCED) {if pre-writepage(INODE, PAGENO, PBUF, DIRS, FILES) then { {FILES[INODE.ino].content[PAGENO] := PBUF; ERR := ESUCCESS} or fail#(; ; ERR); ASYNCED := ?} else abort };