| n0 < n + m * VFS_PAGE_SIZE, n < VFS_PAGE_SIZE, n0 / VFS_PAGE_SIZE ∈ content ⊦ content[n0 / VFS_PAGE_SIZE][n0 % VFS_PAGE_SIZE] = (⌜(λ n0. (n0 / VFS_PAGE_SIZE ∈ content ⊃ content[n0 / VFS_PAGE_SIZE];zeropage)[n0 % VFS_PAGE_SIZE]) to m * VFS_PAGE_SIZE⌝ + (σ⊥ to n))[n0], ⌜n0⌝ < # ⌜(λ n0. (n0 / VFS_PAGE_SIZE ∈ content ⊃ content[n0 / VFS_PAGE_SIZE];zeropage)[n0 % VFS_PAGE_SIZE]) to m * VFS_PAGE_SIZE⌝ , m ∈ content |
n0 < n + m * VFS_PAGE_SIZE, n < VFS_PAGE_SIZE, n0 / VFS_PAGE_SIZE ∈ content, m * VFS_PAGE_SIZE ≤ n0 ⊦ content[n0 / VFS_PAGE_SIZE][n0 % VFS_PAGE_SIZE] = zero, n = 0, m ∈ content
Used simplifier rules: zerostream-size: ⊦ # σ⊥ = ∞;%c: ⊦ m + n = n + m; from specification nat-basic%a: ⊦ (m + n0) + n1 = m + n0 + n1; from specification nat-basic% ⊦ m < m + n ↔ n ≠ 0; (s)%fle-01: ⊦ m ≤ n ∧ n < n0 → m < n0; (forward) from specification nat%append-assoc: ⊦ (σ0 + σ3) + σ4 = σ0 + σ3 + σ4; from specification stream[buffer-inf]% ⊦ (σ⊥)[n] = zero; (s)%m < n, ¬ # σ0 < ⌜n⌝ ⊦ (σ0 to n)[m] = σ0[m]; (s)%n0 ≤ n ⊦ n - n0 < m ↔ n < m + n0; (s)% ⊦ m < n → (n ≤ m ↔ false); (s)% ⊦ m < n ↔ ¬ n ≤ m; (ss)% ⊦ ⌜m⌝ < ⌜n⌝ ↔ m < n; (s)% ⊦ ¬ ∞ < n∞; (s)% ⊦ m ≤ n ↔ ¬ n < m; (ss)% ⊦ ⌜m⌝ .n = m; (s)% ⊦ # ⌜nf0 to n⌝ = ⌜n⌝ ; (s)% ⊦ ¬ ⌜m⌝ < # σ0 → (σ0 + σ2)[m] = σ2[m - (# σ0).n]; (s)