enrich refine-def with predicates R : astate × cstate; axioms initialization : ⊦ CINIT ⊆ AINIT ⊗ R; correctness : ⊦ R ⊗ COP(i) ⊆ AOP(i) ⊗ R; finalization : ⊦ R ⊗ CFIN ⊆ AFIN; end enrich