| files1 -- ino = files0 -- ino, files1[ino] = mkfile(files0[ino].size, files0[ino].meta, # links(ino, dirs), content), afs-cons(dirs, files1), write-inv(0, n1, buf, n, files0[ino].content, content), ino ∈ files0, ino ∈ files1, n ≤ # buf, n1 ≤ # buf, n ≤ n1 ⊦ write-inv (0, n1, mkinode(ino, files0[ino].meta, false, # links(ino, dirs), 0, files0[ino].size + n), buf, n, dirs, files0[ino, files0[ino].size:= (files0[ino].size + n)], files1[ino, mkfile(files0[ino].size + n, files0[ino].meta, # links(ino, dirs), content)]) |
files1 -- ino = files0 -- ino, files1[ino] = mkfile(m, md, # links(ino, dirs), content), files0[ino] = mkfile(m, md, m0, content0), afs-cons(dirs, files1), write-inv(0, n1, buf, n, content0, content), ino ∈ files1, ino ∈ files0, n ≤ n1, n1 ≤ # buf, n ≤ # buf ⊦ write-inv (0, n1, mkinode(ino, md, false, # links(ino, dirs), 0, m + n), buf, n, dirs, files0[ino, files0[ino].size:= (m + n)], files1[ino, mkfile(m + n, md, # links(ino, dirs), content)])
Used simplifier rules: ⊦ ((m = af.size ∧ md = af.meta) ∧ m0 = af.nlink) ∧ content = af.content ↔ af = mkfile(m, md, m0, content); (elim) Used terms: files0[ino], m0, md0, m2, content1