| VFS_PAGE_SIZE = n2 + n1, files1[ino0] = mkfile(m, md0, # links(ino0, dirs), content0), n1 < VFS_PAGE_SIZE, afs-cons(dirs, files1), ino0 ∈ files1, m0 ∈ content0 ⊦ [asynced := ?] ( ( (content0.stream to m0 * VFS_PAGE_SIZE + n1) + ((σ⊥ to n2) + (content0.stream from VFS_PAGE_SIZE * m0 + VFS_PAGE_SIZE) to n2) from m0 * VFS_PAGE_SIZE + n1) + σ⊥ = σ⊥), n1 = 0, n2 = 0, #((σ⊥ to n2) + (content0.stream from VFS_PAGE_SIZE * m0 + VFS_PAGE_SIZE)) < ⌜n2⌝ , # content0.stream < ⌜m0 * VFS_PAGE_SIZE + n1⌝ |
VFS_PAGE_SIZE = n2 + n1, files1[ino0] = mkfile(m, md0, # links(ino0, dirs), content0), n1 ≠ 0, n2 ≠ 0, n1 < VFS_PAGE_SIZE, afs-cons(dirs, files1), m0 ∈ content0, ino0 ∈ files1 ⊦ [asynced := ?] ( ( (content0.stream to m0 * VFS_PAGE_SIZE + n1) + ((σ⊥ to n2) + (content0.stream from VFS_PAGE_SIZE * m0 + VFS_PAGE_SIZE) to n2) from m0 * VFS_PAGE_SIZE + n1) + σ⊥ = σ⊥)
Used simplifier rules: append-assoc: ⊦ (σ0 + σ3) + σ4 = σ0 + σ3 + σ4; from specification stream[buffer-inf]%add-comm: ⊦ n∞1 + n∞2 = n∞2 + n∞1; from specification nat-inf%add-assoc: ⊦ (n∞ + n∞1) + n∞2 = n∞ + n∞1 + n∞2; from specification nat-inf% ⊦ ⌜m⌝ + ∞ = ∞; (s)% ⊦ #(content.stream from n) = ∞; (s)%¬ # σ0 < ⌜n⌝ ⊦ #(σ0 to n) = ⌜n⌝ ; (s)% ⊦ # σ⊥ = ∞; (s)% ⊦ #(σ0 + σ2) = # σ0 + # σ2; (s)% ⊦ ¬ ∞ < n∞; (s)%c: ⊦ m + n = n + m; from specification nat-basic%a: ⊦ (m + n0) + n1 = m + n0 + n1; from specification nat-basic% ⊦ ⌜m + n⌝ = ⌜m⌝ + ⌜n⌝ ; (s)% ⊦ # content.stream = ∞; (s)