| files1[m] = mkfile(m0, md0, m1, content0), files[ino, files[ino].size:= inode.size][ino, files[ino, files[ino].size:= inode.size][ino].meta:= inode.meta] = files0, buf-opt = buf-opt0, dirs = dirs1, dirs = dirs0, files = files1[m, mkfile(m0, md0, m1, content0 upto min(n0, m2))], ino = inode.ino, inode = mkinode(m, md, false, m1, 0, n0), inode0 = mkinode(m, md, false, m1, 0, m2), m ∈ files1, ino ∈ files, buf-opt0.some? → # buf-opt0.buf = VFS_PAGE_SIZE ⊦ ⟨afs_truncate#(n0, m2 / VFS_PAGE_SIZE; buf-opt, inode0, boolvar1, err, dirs1, files1, boolvar2)⟩ ( buf-opt = buf-opt0 ∧ inode0 = (m ∈ dirs0 ⊃ mkinode(m, dirs0[m].meta, true, dirs0[m].nlink, dirs0[m].nsubdirs, dirs0[m].size) ;mkinode(m, files0[m].meta, false, files0[m].nlink, 0, files0[m].size) ) ∧ ¬ boolvar1 ∧ err = ESUCCESS ∧ dirs1 = dirs0 ∧ files1 = files0), m2 ≤ n0 ∧ m2 % VFS_PAGE_SIZE ≠ 0 ∧ (m2 / VFS_PAGE_SIZE ∈ content0 ∨ buf-opt0.some?) |
files1[m] = mkfile(m0, md0, m1, content0), files1[m, mkfile(n0, md, m1, content0 upto min(n0, m2))] = files0, buf-opt = buf-opt0, dirs0 = dirs1, inode0 = mkinode(m, md, false, m1, 0, m2), m ∈ files1, buf-opt0.some? → # buf-opt0.buf = VFS_PAGE_SIZE ⊦ ⟨afs_truncate#(n0, m2 / VFS_PAGE_SIZE; buf-opt, inode0, boolvar1, err, dirs1, files1, boolvar2)⟩ ( buf-opt = buf-opt0 ∧ inode0 = (m ∈ dirs0 ⊃ mkinode(m, dirs0[m].meta, true, dirs0[m].nlink, dirs0[m].nsubdirs, dirs0[m].size) ;mkinode(m, files0[m].meta, false, files0[m].nlink, 0, files0[m].size) ) ∧ ¬ boolvar1 ∧ err = ESUCCESS ∧ dirs1 = dirs0 ∧ files1 = files0), m2 ≤ n0 ∧ m2 % VFS_PAGE_SIZE ≠ 0 ∧ (m2 / VFS_PAGE_SIZE ∈ content0 ∨ buf-opt0.some?)
Used simplifier rules: ⊦ ino ∈ files[ino0, af] ↔ ino ∈ files; (s)% ⊦ mkfile(m, md, m0, content).meta:= md0 = mkfile(m, md0, m0, content); (s)% ⊦ mkinode(m, md, boolvar, m0, m1, m2).meta = md; (s)% ⊦ files[ino, af][ino, af0] = files[ino, af0]; (s)% ⊦ mkfile(m, md, m0, content).size:= m1 = mkfile(m1, md, m0, content); (s)% ⊦ mkinode(m, md, boolvar, m0, m1, m2).size = m2; (s)% ⊦ files[ino, af][ino0] = (ino0 = ino ∧ ino ∈ files ⊃ af;files[ino0]); (s)% ⊦ mkinode(m, md, boolvar, m0, m1, m2).ino = m; (s)