F G HO HM : ap object_of (@path_functor_uncurried F G (HO; HM)) = HO. Proof. destruct F, G; simpl in *. path_induction_hammer. Qed.
Require Import Category.Core Functor.Core. Require Import HoTT.Basics HoTT.Types HoTT.Tactics.