| # buf2 = # buf1, VFS_PAGE_SIZE = n4 + (n0 + n3) % VFS_PAGE_SIZE, files[m] = mkfile(m3, md0, # links(m, dirs), content), m3 = n1 + n0 + n3, n0 + n3 < m3, n3 < # buf1, afs-cons(dirs, files), read-inv(n0, n5 + n0 + n3, buf2, buf1, n3, content), read-inv(n0, n5 + n0 + n3, mkinode(m, md, boolvar, m0, m1, m3), buf2, buf3, n2, dirs, files), m ∈ files, min(n5, n4, n1) ≤ n5, (n0 + n3) % VFS_PAGE_SIZE + min(n5, n4, n1) ≤ VFS_PAGE_SIZE, n3 + min(n5, n4, n1) ≤ # buf1, n5 + n3 ≤ # buf1, n0 + n3 ≤ m3 ⊦ m3 = n0 + n3, n4 = 0, n5 = 0, read-inv (n0, n5 + n0 + n3, buf2, copy(getpage((n0 + n3) / VFS_PAGE_SIZE, content), (n0 + n3) % VFS_PAGE_SIZE, buf1, n3, min(n5, n4, n1)), n3 + min(n5, n4, n1), content) ∧ n0 + n3 + min(n5, n4, n1) ≤ m3 |
# buf2 = # buf1, VFS_PAGE_SIZE = n4 + (n0 + n3) % VFS_PAGE_SIZE, files[m] = mkfile(n1 + n0 + n3, md0, # links(m, dirs), content), n3 < # buf1, afs-cons(dirs, files), read-inv(n0, n5 + n0 + n3, buf2, buf1, n3, content), read-inv(n0, n5 + n0 + n3, mkinode(m, md, boolvar, m0, m1, n1 + n0 + n3), buf2, buf3, n2, dirs, files), m ∈ files, min(n5, n4, n1) ≤ n5, (n0 + n3) % VFS_PAGE_SIZE + min(n5, n4, n1) ≤ VFS_PAGE_SIZE, n3 + min(n5, n4, n1) ≤ # buf1, n5 + n3 ≤ # buf1, min(n5, n4, n1) ≤ n1 ⊦ n1 = 0, n4 = 0, n5 = 0, read-inv (n0, n5 + n0 + n3, buf2, copy(getpage((n0 + n3) / VFS_PAGE_SIZE, content), (n0 + n3) % VFS_PAGE_SIZE, buf1, n3, min(n5, n4, n1)), n3 + min(n5, n4, n1), content)
Used simplifier rules: ⊦ ¬ n2 < min(n0, n1, n2); (s)% ⊦ m ≤ n ↔ ¬ n < m; (ss)% ⊦ m < m + n ↔ n ≠ 0; (s)% ⊦ m + n < m + n0 ↔ n < n0; (s)% ⊦ m ≤ m + n; (s)% ⊦ m + n ≤ m + n0 ↔ n ≤ n0; (s)%c: ⊦ m + n = n + m; from specification nat-basic%a: ⊦ (m + n0) + n1 = m + n0 + n1; from specification nat-basic% ⊦ m = m + n ↔ n = 0; (s)% ⊦ m + n = m + n0 ↔ n = n0; (s)