fact: Record lifting_of := mkLiftingOf { lifting_carrier :> ord_relativeMonad JC ; lifting_obj : lifts_object F lifting_carrier MD; lifting_ret : lifts_ret ϕ lifting_obj ; lifting_bind : lifts_bind ϕ lifting_obj ; }.
imports: Coq(ssreflect ssrfun) Mon(SPropBase) Coq(RelationClasses Morphisms Relation_Definitions)