Program Definition cmin_coop_sem :
  CoopCoreSem Cminor.genv CMin_core.

(* Specifications: *)
Lemma CMin_corestep_2_CompCertStep: forall (ge : genv) (q : CMin_core) (m : mem) (q' : CMin_core) (m' : mem) , CMin_corestep ge q m q' m' -> exists t, step ge (ToState q m) t (ToState q' m').
Lemma CompCertStep_CMin_corestep: forall (ge : genv) (q : CMin_core) (m : mem) (q' : CMin_core) (m' : mem) t, step ge (ToState q m) t (ToState q' m') -> CMin_at_external q = None -> CMin_corestep ge q m q' m'.
Lemma CompCertStep_CMin_corestep': forall (ge : genv) (q : CMin_core) (m : mem) c' t, step ge (ToState q m) t c' -> CMin_at_external q = None -> CMin_corestep ge q m (fst (FromState c')) (snd (FromState c')).
Lemma CompCertStep_2_CMin_corestep: forall (ge : genv) (q : CMin_core) (m : mem) t c', step ge (ToState q m) t c' -> CMin_at_external q = None -> exists q', exists m', c' = ToState q' m' /\ CMin_corestep ge q m q' m'.
Lemma CMin_core2state_injective: forall q m q' m', ToState q m = ToState q' m' -> q'=q /\ m'=m.