Definition uncurry_functor_data: functor_data (C × D) E. Proof. use make_functor_data. - intro cd. induction cd as [c d]. exact (pr1 (G d) c). - intros cd cd' ff'. induction cd as [c d]. induction cd' as [c' d']. induction ff' as [f f']. cbn in *. exact (#(G d: functor C E) f · pr1 (#G f') c'). Defined.
Require Import UniMath.Foundations.All. Require Import UniMath.MoreFoundations.All. Require Import UniMath.CategoryTheory.Core.Categories. Require Import UniMath.CategoryTheory.Core.Isos. Require Import UniMath.CategoryTheory.Core.Univalence. Require Import UniMath.CategoryTheory.Core.Functors. Require Import UniMath.CategoryTheory.Core.NaturalTransformations. Require Import UniMath.CategoryTheory.FunctorCategory. Require Import UniMath.CategoryTheory.opp_precat.