∀ {B : Type u} [inst : CategoryTheory.Bicategory B] {a b : CategoryTheory.Bicategory.Adj B} {α β : a ⟶ b}
  (self : CategoryTheory.Bicategory.Adj.Hom₂ α β),
  self.τr = (CategoryTheory.Bicategory.conjugateEquiv β.adj α.adj) self.τl