proposition: Proposition rwhisker_profunctor_nat_trans_mor_comm {C₁ C₂ C₃ : category} {P₁ P₂ : C₁ ↛ C₂} (τ : profunctor_nat_trans P₁ P₂) (Q : C₂ ↛ C₃) {z : C₃} {y : C₂} {x : C₁} (h : P₁ y x) (h' : Q z y) : rwhisker_profunctor_nat_trans_mor τ Q z x (comp_profunctor_ob_in P₁ Q y h h') = comp_profunctor_ob_in P₂ Q y (τ y x h) h'.
proof: Proof. unfold rwhisker_profunctor_nat_trans_mor. rewrite from_comp_profunctor_ob_comm. apply idpath. Qed.
imports: UniMath.Foundations.All UniMath.MoreFoundations.All UniMath.CategoryTheory.Core.Prelude UniMath.CategoryTheory.FunctorCategory UniMath.CategoryTheory.PrecategoryBinProduct UniMath.CategoryTheory.opp_precat UniMath.CategoryTheory.Categories.HSET.All UniMath.CategoryTheory.Categories.HSET.SetCoends UniMath.CategoryTheory.Profunctors.Core UniMath.CategoryTheory.Profunctors.Examples