| # buf2 = # buf1, VFS_PAGE_SIZE = n4 + (n0 + n3) % VFS_PAGE_SIZE, files[m] = mkfile(m3, md0, # links(m, dirs), content), n1 = n5 + n0 + n3, n3 < # buf1, n0 + n3 < m3, n0 + n3 < n1, afs-cons(dirs, files), read-inv(n0, n1, mkinode(m, md, boolvar, m0, m1, m3), buf2, buf3, n2, dirs, files), read-inv(n0, n1, buf2, buf1, n3, content), m ∈ files, (n0 + n3) % VFS_PAGE_SIZE + min(n5, n4, m3 - n0 + n3) ≤ VFS_PAGE_SIZE, n1 ≤ # buf1 + n0, n3 + min(n5, n4, m3 - n0 + n3) ≤ # buf1, n0 + n3 ≤ n1 ⊦ m3 = n0 + n3, n1 = n0 + n3, n4 = 0, n0 + n3 + min(n5, n4, m3 - n0 + n3) ≤ n1 ∧ n0 + n3 + min(n5, n4, m3 - n0 + n3) ≤ m3 ∧ read-inv (n0, n1, buf2, copy(getpage((n0 + n3) / VFS_PAGE_SIZE, content), (n0 + n3) % VFS_PAGE_SIZE, buf1, n3, min(n5, n4, m3 - n0 + n3)), n3 + min(n5, n4, m3 - n0 + n3), content) |
# buf2 = # buf1, VFS_PAGE_SIZE = n4 + (n0 + n3) % VFS_PAGE_SIZE, files[m] = mkfile(m3, md0, # links(m, dirs), content), n3 < # buf1, n0 + n3 < m3, afs-cons(dirs, files), read-inv(n0, n5 + n0 + n3, mkinode(m, md, boolvar, m0, m1, m3), buf2, buf3, n2, dirs, files), read-inv(n0, n5 + n0 + n3, buf2, buf1, n3, content), m ∈ files, n5 + n3 ≤ # buf1, n3 + min(n5, n4, m3 - n0 + n3) ≤ # buf1, (n0 + n3) % VFS_PAGE_SIZE + min(n5, n4, m3 - n0 + n3) ≤ VFS_PAGE_SIZE, min(n5, n4, m3 - n0 + n3) ≤ n5 ⊦ 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, m3 - n0 + n3)), n3 + min(n5, n4, m3 - n0 + n3), content) ∧ n0 + n3 + min(n5, n4, m3 - n0 + n3) ≤ m3
Used simplifier rules: ⊦ ¬ n0 < 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)