fact: Definition leftHom : ord_functor ( prod_cat (oppo I) D ) OrdCat.
imports: Coq(Relation_Definitions Morphisms) Relational(OrderEnrichedCategory OrderEnrichedRelativeMonadExamples) Mon(SPropBase) mathcomp(all_ssreflect boolp)