add inverse form of ni_commutes

[coq-categories.git] / src / Adjoints_ch9.v

diff --git a/src/Adjoints_ch9.v b/src/Adjoints_ch9.v
index df870eb..b4361ef 100644 (file)
--- a/src/Adjoints_ch9.v
+++ b/src/Adjoints_ch9.v
@@ -1,5 +1,5 @@
 Generalizable All Variables.
-Require Import Preamble.
+Require Import Notations.
 Require Import Categories_ch1_3.
 Require Import Functors_ch1_4.
 Require Import Isomorphisms_ch1_5.
@@ -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 *)