fact: CoInductive eff_hom_e : Type := { eval : forall t, E t -> itree F (eff_hom_e * t) }.
imports: ExtLib(Structures.Functor Structures.Monad) ITree(Basics.Basics Basics.CategoryOps Basics.CategoryKleisli Core.ITreeDefinition Indexed.Function Indexed.Sum Core.Subevent Interp.Interp)