fact: Definition morph_pointwise {A B C OC} {tC : t C OC} (f : B -> A) : morph (pointwise_ops (fun _ : A => OC)) (pointwise_ops (fun _ : B => OC)) (fun g b => g (f b)).
imports: SetoidClass Coq.Classes.Morphisms Coq.Arith.PeanoNat Fiat.Common.Coq__8_4__8_5__Compat