| avols = avols0[default-volid, avols0[default-volid][m, unmapped]], err0 = ESUCCESS, m < # avols0[default-volid], ebm-cons(avols0), default-volid ∈ avols0, ⌊err0⌋ ∨ err0 = ESUCCESS ⊦ ⟪avols[default-volid][m] := mapped(emptyleb, 0)⟫ (default-volid ∈ avols ∧ ebm-cons(avols)) |
Used simplifier rules: ⊦ ¬ ⌊ESUCCESS⌋ ; (s)% ⊦ avols[v, evol][v] = evol; (s)% ⊦ # evol[n, leb] = # evol; (s)% ⊦ v ∈ avols[v, evol]; (s)% ⊦ m < n ↔ ¬ n ≤ m; (ss)% ⊦ m < n → (n ≤ m ↔ false); (s)%m < # evol ⊦ evol[m, leb][m, leb0] = evol[m, leb0]; (s)% ⊦ avols[v, evol][v, evol0] = avols[v, evol0]; (s)%⊦ v ∈ avols ∧ m < # avols[v] ∧ ebm-cons(avols) → ( ebm-cons(avols[v, avols[v][m, leb]]) ↔ valid-leb(avols[v][m]) → valid-leb(leb)); (ss)%⊦ valid-leb(leb) ↔ leb.mapped? → # leb.data = LEB_SIZE ∧ leb.fill ≤ LEB_SIZE ∧ is-aligned(leb.fill, EB_PAGE_SIZE) ∧ range=(leb.data, leb.fill, emptyleb, 0, LEB_SIZE - leb.fill); (s)% ⊦ mapped(buf, m).mapped?; (s)% ⊦ mapped(buf, m).data = buf; (s)% ⊦ # emptyleb = LEB_SIZE; (s)% ⊦ mapped(buf, m).fill = m; (s)% ⊦ 0 ≤ m; (s)% ⊦ EB_PAGE_SIZE ≠ 0; (s)%n ≠ 0 ⊦ is-aligned(0, n); (s)% ⊦ m - 0 = m; (s)% ⊦ range=(buf, n, buf, n, m) ↔ n + m ≤ # buf; (s)% ⊦ n + 0 = n; (s)%a: ⊦ (m + n0) + n1 = m + n0 + n1; from specification nat-basic%c: ⊦ m + n = n + m; from specification nat-basic% ⊦ m ≤ m; (s)