| vols[v][m] = ⌜n⌝ ∧ v ∈ vols ∧ m < # vols[v] ↔ stat0 = used ∧ n < # apebs ∧ n < # wlar ∧ avhdr.valid? ∧ avhdr.vol = v ∧ avhdr.leb = m, apebs[n] = mkpeb(aehdr, avhdr, buf, m2, boolvar), wlar[n1] = wl-entry(m1, free), wlar[n1, wle][n] = wl-entry(m3, stat), wlar[n] = wl-entry(m4, stat0) ⊦ vols[v][m] = ⌜n⌝ ∧ v ∈ vols ∧ m < # vols[v] ↔ stat = used ∧ n < # apebs ∧ n < # wlar ∧ avhdr.valid? ∧ avhdr.vol = v ∧ avhdr.leb = m ∧ n ≠ n1, n = n0 |
Used simplifier rules: ⊦ m ≠ n → wlar[n, wle][m] = wlar[m]; (s)% ⊦ wl-entry(m, stat) = wl-entry(m0, stat0) ↔ m = m0 ∧ stat = stat0; (ws)% ⊦ m < n ↔ ¬ n ≤ m; (ss)% ⊦ m ≤ n → (n < m ↔ false); (s)%m < # wlar ⊦ wlar[m, wle][m] = wle; (s)%f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic%lf-02: ⊦ m < n ∧ m = n0 → n0 < n; (forward) from specification nat-basic% ⊦ used ≠ free; (s) Used formulas: n = n1