proposition: Lemma pure_inl {A B} : pure (b := A + B) inl_ ⩯ inl_.
proof: Proof. reflexivity. Qed.
imports: Coq(Program Setoid Morphisms RelationClasses) ExtLib(Structures.Monad) ITree(Basics.Basics Basics.Category Basics.Monad Basics.CategoryFunctor Basics.CategoryKleisli Basics.Function)