| pebs[m] = mkpeb(buf, m0, false), m < # pebs, mtd-cons(pebs) ⊦ ⟪if m < # pebs ∧ ¬ pebs[m].bad then {fail_or_success#(; ; err); if err = ESUCCESS then pebs[m] := mkpeb(emptypeb, 0, pebs[m].bad)} else abort⟫ mtd-cons(pebs) |
pebs[m] = mkpeb(buf, m0, false), m < # pebs, mtd-cons(pebs) ⊦ ⟪fail_or_success#(; ; err); if err = ESUCCESS then pebs[m] := mkpeb(emptypeb, 0, pebs[m].bad)⟫ mtd-cons(pebs)
Used simplifier rules: ⊦ mkpeb(buf, m, boolvar).bad ↔ boolvar; (s)