X-Git-Url: http://git.megacz.com/?p=coq-categories.git;a=blobdiff_plain;f=src%2FAdjoints_ch9.v;h=8d947b7231a77db4396030c26b3ff7989ddc81c4;hp=df870eb947210f3aa79789acd6a7b4e772ace464;hb=00b060e4854e5a1ba01746be44ac9deb49d7fbf5;hpb=18d94149267db9cf2e8e93977c5506278309173d

diff --git a/src/Adjoints_ch9.v b/src/Adjoints_ch9.v
index df870eb..8d947b7 100644
--- a/src/Adjoints_ch9.v
+++ b/src/Adjoints_ch9.v
@@ -26,8 +26,8 @@ Notation "'η'"    := (adj_unit _).
 (*
 Lemma homset_adjunction `(C:ECategory(V:=V))`(D:ECategory(V:=V))(L:Func C D)(R:Func D C)
  :  (L -| R)
- -> RepresentableFunctorºᑭ _ _ >>>> YonedaBiFunctor D ≃
-    RepresentableFunctorºᑭ _ _ >>>> YonedaBiFunctor C.
+ -> HomFunctorºᑭ _ _ >>>> YonedaBiFunctor D ≃
+    HomFunctorºᑭ _ _ >>>> YonedaBiFunctor C.
   *)
   (* adjuncts are unique up to natural iso *)
   (* adjuncts compose *)