Section ladj_iso_def.
Variables (C D : Category) (G : Functor C D) (la la' : LeftAdj G).
Let F := Adjoint la.
Let F' := Adjoint la'.
Let LAdj_unit (a : D) := Unit la a.
Let LAdj_unit' (a : D) := Unit la' a.
Definition LAdj_tau_iso (a : D) := UA_iso (LAdj_unit a) (LAdj_unit' a).
Definition LAdj_tau (a : D) := Iso_mor (LAdj_tau_iso a).
Canonical Structure LAdj_nt := Build_NT LAdj_nt_law.

Lemma LAdj_iso : NatIso F F'.