| n0 + n = n3 + m0 * VFS_PAGE_SIZE, files1 -- ino = files0 -- ino, VFS_PAGE_SIZE = n4 + n3 + m, files1[ino] = mkfile(m2, md0, # links(ino, dirs), content0), files0[ino] = mkfile(m2, md0, m4, content), afs-cons(dirs, files1), ino ∈ files1, ino ∈ files0, m0 * VFS_PAGE_SIZE ≤ n1, n + m ≤ # buf, n ≤ # buf, n1 ≤ # buf + n0, n0 + n ≤ n1, m0 * VFS_PAGE_SIZE ≤ # buf + n0, m0 * VFS_PAGE_SIZE ≤ n0 + n, m0 * VFS_PAGE_SIZE ≤ n + n0 ⊦ n4 + m = 0, ((content.stream to n0) + (⌜buf⌝ to n) to m0 * VFS_PAGE_SIZE) + ((content.stream to n0) + (⌜buf⌝ to n to n) from m0 * VFS_PAGE_SIZE) + ((⌜buf⌝ from n) to m) = (content.stream to n0) + (⌜buf⌝ to n + m), #(⌜buf⌝ to n) < ⌜n⌝ , # content.stream < ⌜n0⌝ |
n0 + n = n3 + m0 * VFS_PAGE_SIZE, files1 -- ino = files0 -- ino, VFS_PAGE_SIZE = n4 + n3 + m, files0[ino] = mkfile(m2, md0, m4, content), files1[ino] = mkfile(m2, md0, # links(ino, dirs), content0), afs-cons(dirs, files1), ino ∈ files0, ino ∈ files1, m0 * VFS_PAGE_SIZE ≤ n + n0, m0 * VFS_PAGE_SIZE ≤ n0 + n, m0 * VFS_PAGE_SIZE ≤ # buf + n0, n0 + n ≤ n1, n1 ≤ # buf + n0, n ≤ # buf, n + m ≤ # buf, m0 * VFS_PAGE_SIZE ≤ n1 ⊦ n4 + m = 0, ((content.stream to n0) + (⌜buf⌝ to n) to m0 * VFS_PAGE_SIZE) + ((content.stream to n0) + (⌜buf⌝ to n) from m0 * VFS_PAGE_SIZE) + ((⌜buf⌝ from n) to m) = (content.stream to n0) + (⌜buf⌝ to n + m)
Used simplifier rules: ⊦ m ≤ m; (s)% ⊦ m < n ↔ ¬ n ≤ m; (ss)%¬ # σ0 < ⌜n⌝ ⊦ #(σ0 to n) = ⌜n⌝ ; (s)% ⊦ ¬ ∞ < n∞; (s)% ⊦ # content.stream = ∞; (s)%append-assoc: ⊦ (σ0 + σ3) + σ4 = σ0 + σ3 + σ4; from specification stream[buffer-inf]%¬ # σ0 < ⌜n⌝ ⊦ σ0 to n to n = σ0 to n; (s)% ⊦ m ≤ n → (n < m ↔ false); (s)% ⊦ ⌜m⌝ < ⌜n⌝ ↔ m < n; (s)% ⊦ # ⌜buf⌝ = ⌜# buf⌝ ; (s)