proposition: Proposition prod_profunctor_laws : profunctor_laws prod_profunctor_data.
proof: Proof. repeat split ; cbn. - intros y x h. rewrite !profunctor_id. apply idpath. - intros y₁ y₂ y₃ g₁ g₂ x₁ x₂ x₃ f₁ f₂ h. rewrite !profunctor_comp. apply idpath. - intros y x. apply isaset_dirprod ; apply setproperty. Qed.
imports: UniMath.Foundations.All UniMath.CategoryTheory.Core.Prelude UniMath.CategoryTheory.Categories.HSET.All UniMath.CategoryTheory.Categories.HSET.SetCoends UniMath.CategoryTheory.Profunctors.Core