Lemma runitor_CAT_pointwise_is_z_iso {C D : category} (F : [C, D]) : is_z_isomorphism (runitor_CAT F). Proof. exists (rinvunitor_CAT F). split. - apply runitor_rinvunitor_CAT. - apply rinvunitor_runitor_CAT. Defined.
Require Import UniMath.Foundations.PartD. Require Import UniMath.MoreFoundations.Tactics. Require Import UniMath.CategoryTheory.Core.Categories. Require Import UniMath.CategoryTheory.Core.Functors. Require Import UniMath.CategoryTheory.Core.Isos. Require Import UniMath.CategoryTheory.Core.NaturalTransformations. Require Import UniMath.CategoryTheory.FunctorCategory. Require Import UniMath.CategoryTheory.whiskering.