fact: Definition inject (o:O) : strict_list_monoid := @embed (listMonoid O) (cons o nil).
imports: Coq(ssreflect ssrfun ssrbool List) Coq(FunctionalExtensionality) Coq(Relation_Definitions Morphisms) Mon(SPropBase SPropMonadicStructures)