proposition: Lemma iso_comp_left_isweq {C : precategory} {a b : ob C} (h : iso a b) (c : C) : isweq (fun f : c --> a => f · h).
proof: Proof. intros. apply (isweq_iso _ (λ g, g · inv_from_iso h)). - intro x. rewrite <- assoc. apply remove_id_right. apply iso_inv_after_iso. apply idpath. - intro y. rewrite <- assoc. apply remove_id_right. apply iso_after_iso_inv. apply idpath. Defined.
imports: UniMath.Foundations.PartA UniMath.Foundations.Propositions UniMath.Foundations.Sets UniMath.MoreFoundations.Tactics UniMath.CategoryTheory.Core.Categories