proposition: Proposition rmap_precomp_profunctor {x₁ x₂ : C₁} {y : D₁} (f : x₁ --> x₂) (h : P (G y) (F x₁)) : rmap precomp_profunctor f h = rmap P (#F f) h.
proof: Proof. cbn. rewrite functor_id. rewrite lmap_id. apply idpath. Qed.
imports: UniMath.Foundations.All UniMath.CategoryTheory.Core.Prelude UniMath.CategoryTheory.Categories.HSET.All UniMath.CategoryTheory.Categories.HSET.SetCoends UniMath.CategoryTheory.Profunctors.Core