Definition main_sig : signature := mksignature nil (Some AST.Tint).

Lemma cc_sim_coop_sim: forall {F1 C1 V1 F2 C2 V2:Type} (Sem1 : CoopCoreSem (Genv.t F1 V1) C1) (Sem2 : CoopCoreSem(Genv.t F2 V2) C2) (P1 : AST.program F1 V1) (P2 : AST.program F2 V2) I epts ExternIdents (CCSim: CompilerCorrectness.cc_sim I ExternIdents epts F1 C1 V1 F2 C2 V2 Sem1 Sem2 P1 P2), Forward_simulation.coop_sim Sem1 Sem2 (Genv.globalenv P1) (Genv.globalenv P2) epts.