| files0[ino0] = mkfile(m, md0, # links(ino0, dirs), content0), n0 < VFS_PAGE_SIZE, ⌜n0⌝ + ⌜n⌝ < #((σ⊥ to VFS_PAGE_SIZE) + σ⊥), afs-cons(dirs, files0), ino0 ∈ files0 ⊦ ((σ⊥ to VFS_PAGE_SIZE) + σ⊥)[n0 + n] = zero, n0 = 0, m0 ∈ content0 |
files0[ino0] = mkfile(m, md0, # links(ino0, dirs), content0), n0 < VFS_PAGE_SIZE, afs-cons(dirs, files0), ino0 ∈ files0 ⊦ ((σ⊥ to VFS_PAGE_SIZE) + σ⊥)[n0 + n] = zero, n0 = 0, m0 ∈ content0
Used simplifier rules: ⊦ ⌜m⌝ ≠ ∞; (s)% ⊦ ⌜m⌝ + n∞ = ∞ ↔ n∞ = ∞; (s)% ⊦ n∞ < ∞ ↔ n∞ ≠ ∞; (s)%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)%¬ # σ0 < ⌜n⌝ ⊦ #(σ0 to n) = ⌜n⌝ ; (s)% ⊦ ¬ ∞ < n∞; (s)% ⊦ # σ⊥ = ∞; (s)% ⊦ #(σ0 + σ2) = # σ0 + # σ2; (s)