| # fill(content0[m1], zero, n2, n0) = VFS_PAGE_SIZE, VFS_PAGE_SIZE = n0 + n2, files0[m0] = mkfile(m, md0, # links(m0, dirs), content0), n2 < VFS_PAGE_SIZE, afs-cons(dirs, files0), m1 ∈ content0, m0 ∈ files0 ⊦ [asynced := ?] ( ( (content0.stream to m1 * VFS_PAGE_SIZE) + ⌜fill(content0[m1], zero, n2, n0)⌝ + (content0.stream from (m1 + 1) * VFS_PAGE_SIZE) to VFS_PAGE_SIZE * m1 + VFS_PAGE_SIZE) + σ⊥ to n1 + m1 * VFS_PAGE_SIZE + n2 = (content0.stream to m1 * VFS_PAGE_SIZE + n2) + (σ⊥ to n1)), n0 = 0, n1 = 0, n2 = 0 |
VFS_PAGE_SIZE = n0 + n2, files0[m0] = mkfile(m, md0, # links(m0, dirs), content0), n0 ≠ 0, n1 ≠ 0, n2 ≠ 0, n2 < VFS_PAGE_SIZE, afs-cons(dirs, files0), m0 ∈ files0, m1 ∈ content0 ⊦ [asynced := ?] ( ( (content0.stream to m1 * VFS_PAGE_SIZE) + ⌜fill(content0[m1], zero, n2, n0)⌝ + (content0.stream from VFS_PAGE_SIZE * m1 + VFS_PAGE_SIZE) to VFS_PAGE_SIZE * m1 + VFS_PAGE_SIZE) + σ⊥ to n1 + m1 * VFS_PAGE_SIZE + n2 = (content0.stream to m1 * VFS_PAGE_SIZE + n2) + (σ⊥ to n1))
Used simplifier rules: append-assoc: ⊦ (σ0 + σ3) + σ4 = σ0 + σ3 + σ4; from specification stream[buffer-inf]%mult-c: ⊦ m * n = n * m; from specification nat-mult%mult-a: ⊦ m0 * m * n = (m0 * m) * n; from specification nat-mult%c: ⊦ m + n = n + m; from specification nat-basic%a: ⊦ (m + n0) + n1 = m + n0 + n1; from specification nat-basic% ⊦ m * (n + 1) = m * n + m; (s)%⊦ afs-cons(dirs, files) ∧ ino ∈ files ∧ files[ino] = mkfile(m, md, n0, content) ∧ n ∈ content → # content[n] = VFS_PAGE_SIZE; (s)% ⊦ # fill(buf, d, m, n) = # buf; (s)