Section EUTTG_principles.
Context {E : Type -> Type} {R1 R2 : Type} (RR : R1 -> R2 -> Prop).
Local Notation euttG := (@euttG E R1 R2 RR).
(* Make new hypotheses *)
(* Process itrees *)
(* Drop weak hypotheses for general rewriting *)
(* Make a weakly guarded progress *)
(* Make a strongly guarded progress *)
(* Use available hypotheses *)
(** Correctness **)

Lemma euttG_le_eutt:
euttG bot2 bot2 bot2 bot2 <2= eutt RR.