| m1 + n1 = m1 / VFS_PAGE_SIZE * VFS_PAGE_SIZE + VFS_PAGE_SIZE, of[n0] = mkfile(m3, mode0, m4), files1[m] = mkfile(m1, md0, # links(m, dirs), content0), of[fd] = mkfile(m, mode, m0), files[m] = mkfile(m2, md, # links(m, dirs), content), of[fd, mkfile(m, mode, m0 + (m0 ≤ m1 ⊃ m1 - m0;0))][n0] = mkfile(m5, mode1, m6), m1 = n2 + m1 / VFS_PAGE_SIZE * VFS_PAGE_SIZE, m1 < m0 + ino4, dom of < ino3, afs-cons(dirs, files1), afs-cons(dirs, files), of-cons(of, dirs, files1), of-cons(of, dirs, files), n0 ∈ of, m3 ∈ files1, m ∈ files, fd ∈ of, m1 / VFS_PAGE_SIZE ∈ content0, m ∈ files1, n0 ∈ of[fd, mkfile(m, mode, m0 + (m1 - m0))], n2 + n1 ≤ VFS_PAGE_SIZE, n ≤ # buf0, m1 % VFS_PAGE_SIZE + n1 ≤ VFS_PAGE_SIZE, ⌊err0⌋ ⊦ ino4 = 0, n = 0, n2 = 0, m5 ∈ files, mode ≠ MODE_W ∧ mode ≠ MODE_RW, err1 = ESUCCESS ∧ ¬ isdir |
m1 + n1 = m1 / VFS_PAGE_SIZE * VFS_PAGE_SIZE + VFS_PAGE_SIZE, of[fd, mkfile(m, mode, m0 + (m0 ≤ m1 ⊃ n3;0))][n0] = mkfile(m5, mode1, m6), files[m] = mkfile(m2, md, # links(m, dirs), content), of[fd] = mkfile(m, mode, m0), files1[m] = mkfile(m1, md0, # links(m, dirs), content0), of[n0] = mkfile(m3, mode0, m4), m1 = n2 + m1 / VFS_PAGE_SIZE * VFS_PAGE_SIZE, m1 = n3 + m0, dom of < ino3, m1 < m0 + ino4, afs-cons(dirs, files), afs-cons(dirs, files1), of-cons(of, dirs, files), of-cons(of, dirs, files1), n0 ∈ of[fd, mkfile(m, mode, m0 + n3)], m ∈ files1, m1 / VFS_PAGE_SIZE ∈ content0, fd ∈ of, m ∈ files, m3 ∈ files1, n0 ∈ of, m1 % VFS_PAGE_SIZE + n1 ≤ VFS_PAGE_SIZE, n ≤ # buf0, n2 + n1 ≤ VFS_PAGE_SIZE, m0 ≤ m1, ⌊err0⌋ ⊦ ino4 = 0, n = 0, n2 = 0, m5 ∈ files, err1 = ESUCCESS ∧ ¬ isdir, mode ≠ MODE_W ∧ mode ≠ MODE_RW
Used simplifier rules: ⊦ n + 0 = n; (s)%a: ⊦ (m + n0) + n1 = m + n0 + n1; from specification nat-basic%c: ⊦ m + n = n + m; from specification nat-basic% ⊦ of[fd] = file ∧ fd ∈ of → of[fd, file] = of; (s)% ⊦ m ≤ n ↔ ¬ n < m; (ss)%⊦ of-cons(of, dirs, files) ∧ fd ∈ of ∧ of[fd] = mkfile(ino, mode, n) → ino ∈ files; (ss)%n ≤ m ⊦ n0 = m - n ↔ m = n0 + n; (elim) Used terms: m0, m1, n3