Definition CL_coop_sem
           (FE:function -> list val -> mem -> env -> temp_env -> mem -> Prop)
           (HFE: forall f vargs m e le m', FE f vargs m e le m'-> mem_forward m m')
           : CoopCoreSem genv CL_core.

Lemma alloc_variables_forward: forall vars m e e2 m' (M: alloc_variables e m vars e2 m'), mem_forward m m'.