| buf = mkbuf(VFS_PAGE_SIZE), ((m0 =>mkfile(n2, md, m1, σ) * F))(files), afs-cons(dirs, files), m0 ∈ files, m + n1 ≤ # buf1, n0 + n1 ≤ VFS_PAGE_SIZE ⊦ [afs_readpage#(mkinode(m0, md0, boolvar, m2, m3, m4), n3, dirs, files, asynced; buf, err)] ( err = ESUCCESS ∧ ⌜buf⌝ = (σ from n3 * VFS_PAGE_SIZE) to VFS_PAGE_SIZE ∨ ⌊err⌋ → [if err = ESUCCESS then afs_check_commit#(dirs, files; err; asynced); files0 := files; if err = ESUCCESS then {buf := copy(buf1, m, buf, n0, n1); afs_writepage#(mkinode(m0, md0, boolvar, m2, m3, m4), n3, buf, dirs; err, files; asynced)}] ( err = ESUCCESS ∧ ((m0 =>mkfile(n2, md, m1, (σ to n3 * VFS_PAGE_SIZE + n0) + ((⌜buf1⌝ from m) to n1) + (σ from n3 * VFS_PAGE_SIZE + n0 + n1)) * F) )(files) ∨ ⌊err⌋ ∧ files0 = files)) |
buf = mkbuf(VFS_PAGE_SIZE), ((m0 =>mkfile(n2, md, m1, σ) * F))(files), afs-cons(dirs, files), m0 ∈ files, n0 + n1 ≤ VFS_PAGE_SIZE, m + n1 ≤ # buf1 ⊦ ∀ buf, err. err = ESUCCESS ∧ ⌜buf⌝ = (σ from n3 * VFS_PAGE_SIZE) to VFS_PAGE_SIZE ∨ ⌊err⌋ → [if err = ESUCCESS then afs_check_commit#(dirs, files; err; asynced); files0 := files; if err = ESUCCESS then {buf := copy(buf1, m, buf, n0, n1); afs_writepage#(mkinode(m0, md0, boolvar, m2, m3, m4), n3, buf, dirs; err, files; asynced)}] ( err = ESUCCESS ∧ ((m0 =>mkfile(n2, md, m1, (σ to n3 * VFS_PAGE_SIZE + n0) + ((⌜buf1⌝ from m) to n1) + (σ from n3 * VFS_PAGE_SIZE + n0 + n1)) * F) )(files) ∨ ⌊err⌋ ∧ files0 = files)