End INJ_SIMULATION_STAR_WF.
Section INJ_SIMULATION_STAR.
Variable measure: C1 -> nat.
Hypothesis inj_star_simulation:
forall c1 m1 c1' m1', corestep Sem1 ge1 c1 m1 c1' m1'  ->
forall c2 m2 j, match_states c1 j c1 m1 c2 m2 ->
(exists c2', exists m2', exists j',
inject_incr j j' /\
inject_separated j j' m1 m2 /\
match_states c1' j' c1' m1' c2' m2' /\
(corestep_plus Sem2 ge2 c2 m2 c2' m2'
\/ ((measure c1' < measure c1)%nat /\ corestep_star Sem2 ge2 c2 m2 c2' m2'))).

(* Specifications: *)
Lemma inj_simulation_star:
Forward_simulation_inj.Forward_simulation_inject Sem1 Sem2 ge1 ge2 entry_points.