Proposition fully_faithful_precomp_inv_right : EF x y · fully_faithful_precomp_inv = identity _. Proof. unfold fully_faithful_precomp_inv. rewrite !assoc. refine (_ @ z_iso_inv_after_z_iso φ). apply maponpaths_2. apply idpath. Qed.
Require Import UniMath.Foundations.All. Require Import UniMath.MoreFoundations.All. Require Import UniMath.CategoryTheory.Core.Prelude. Require Import UniMath.CategoryTheory.EnrichedCats.Enrichment. Require Import UniMath.CategoryTheory.EnrichedCats.EnrichmentFunctor. Require Import UniMath.CategoryTheory.EnrichedCats.EnrichmentTransformation. Require Import UniMath.CategoryTheory.Monoidal.Categories.