fact: Definition pointwise_op {A} {B : A -> Type} (P : forall a, B a -> B a -> Prop) (f g : forall a, B a) := forall a, P a (f a) (g a).
imports: SetoidClass Coq.Classes.Morphisms Coq.Arith.PeanoNat Fiat.Common.Coq__8_4__8_5__Compat