fact: Definition eutt_iter_gen {F A B R S} : @Proper ((A -> itree F (A + B)) -> A -> itree F B) ((R ==> eutt (sum_rel R S)) ==> R ==> (eutt S)) (iter (C := ktree F)).
imports: Coq(Classes.Morphisms Setoids.Setoid Relations.Relations) Paco(paco) ITree(Basics.Basics Basics.CategoryOps Basics.CategoryTheory Basics.CategoryKleisli Basics.CategoryKleisliFacts Basics.Function Basics.HeterogeneousRelations Core.ITreeDefinition Core.ITreeMonad Core.KTree Eq.Shallow Eq.Eqit Eq.UpToTaus Eq.Paco2)