fact: Definition all_infinite_ {E A} (sim : itree E A -> Prop) t := all_infiniteF sim (observe t).
imports: Coq(Setoid Morphisms RelationClasses) Paco(paco) ITree(Axioms Basics Core.ITreeDefinition Eq.Eqit Eq.Shallow)