X-Git-Url: http://git.megacz.com/?p=coq-categories.git;a=blobdiff_plain;f=src%2FIsomorphisms_ch1_5.v;h=65eaf4624265e65d2d567e8da5b31949cbce6bc7;hp=40a5f878309ceaf06b103e1029d6ecaa8caea0ab;hb=e928451c4c45cdbdd975bbfb229e8cc2616b8194;hpb=27ffdd2265eb1c15acc62970f49d25a07bcadb05

diff --git a/src/Isomorphisms_ch1_5.v b/src/Isomorphisms_ch1_5.v
index 40a5f87..65eaf46 100644
--- a/src/Isomorphisms_ch1_5.v
+++ b/src/Isomorphisms_ch1_5.v
@@ -45,7 +45,7 @@ Definition iso_id `{C:Category}(A:C) : Isomorphic A A.
   Defined.
 
 (* the composition of two isomorphisms is an isomorphism *)
-Definition id_comp `{C:Category}{a b c:C}(i1:Isomorphic a b)(i2:Isomorphic b c) : Isomorphic a c.
+Definition iso_comp `{C:Category}{a b c:C}(i1:Isomorphic a b)(i2:Isomorphic b c) : Isomorphic a c.
   intros; apply (@Build_Isomorphic _ _ C a c (#i1 >>> #i2) (#i2⁻¹ >>> #i1⁻¹));
     setoid_rewrite juggle3;
     [ setoid_rewrite (iso_comp1 i2) | setoid_rewrite (iso_comp2 i1) ];