End EQINJ.

(* Specifications: *)
Lemma coop_sim_trans_CaseEq: forall
(SimEq12 : Forward_simulation_equals Sem1 Sem2 g1 g2 epts12)
(SIM23 : coop_sim Sem2 Sem3 g2 g3 epts23),
coop_sim Sem1 Sem3 g1 g3 epts13.