End CORESTEPS.

Lemma Match_corestep: forall st1 m1 st1' m1'
(CS1:corestep csharpmin_eff_sem ge st1 m1 st1' m1')
st2 mu m2 (MC: Match_cores st1 mu st1 m1 st2 m2),
exists st2' m2' mu',  intern_incr mu mu' /\
sm_inject_separated mu mu' m1 m2 /\
sm_locally_allocated mu mu' m1 m2 m1' m2' /\
Match_cores st1' mu' st1' m1' st2' m2' /\
SM_wd mu' /\ sm_valid mu' m1' m2' /\
(corestep_plus cmin_eff_sem tge st2 m2 st2' m2' \/
(MC_measure st1' < MC_measure st1)%nat /\
corestep_star cmin_eff_sem tge st2 m2 st2' m2').