| files1 -- ino = files0 -- ino, files1[ino] = mkfile(m1, md1, # links(ino, dirs), content1), files0[ino] = mkfile(m1, md1, n2, content0), content0.stream from m1 = σ⊥, afs-cons(dirs, files1), ino ∈ files0, ino ∈ files1, n0 + n ≤ n1, n1 ≤ # buf + n0, n ≤ # buf ⊦ splice(buf, 0, (content0.stream to m1).buf, n0, n) = ((content0.stream to n0) + (⌜buf⌝ to n) + (content0.stream from n0 + n) to (n ≠ 0 ∧ m1 < n0 + n ⊃ n0 + n;m1)).buf |
⊦ buf = buf0 ↔ # buf = # buf0 ∧ (∀ n. n < # buf → buf[n] = buf0[n])
files1 -- ino = files0 -- ino, files0[ino] = mkfile(m1, md1, n2, content0), files1[ino] = mkfile(m1, md1, # links(ino, dirs), content1), content0.stream from m1 = σ⊥, afs-cons(dirs, files1), ino ∈ files1, ino ∈ files0, n ≤ # buf, n1 ≤ # buf + n0, n0 + n ≤ n1 ⊦ # splice(buf, 0, (content0.stream to m1).buf, n0, n) = # ((content0.stream to n0) + (⌜buf⌝ to n) + (content0.stream from n0 + n) to (n ≠ 0 ∧ m1 < n0 + n ⊃ n0 + n;m1)).buf ∧ (∀ n1. n1 < # splice(buf, 0, (content0.stream to m1).buf, n0, n) → splice(buf, 0, (content0.stream to m1).buf, n0, n)[n1] = ((content0.stream to n0) + (⌜buf⌝ to n) + (content0.stream from n0 + n) to (n ≠ 0 ∧ m1 < n0 + n ⊃ n0 + n;m1)).buf[n1])
Used terms: ( (content0.stream to n0) + (⌜buf⌝ to n) + (content0.stream from n0 + n) to (n ≠ 0 ∧ m1 < n0 + n ⊃ n0 + n;m1) ).buf, splice(buf, 0, (content0.stream to m1).buf, n0, n)