fact: Definition pointwise_action (m:A_M) (x : A -> X) (a:A) := m a ⧕ x a.
imports: Coq(ssreflect ssrfun ssrbool List) Coq(FunctionalExtensionality) Coq(Relation_Definitions Morphisms) Mon(SPropBase SPropMonadicStructures)