fact: Definition op1_left_adjoint_weq_right_adjoint {B : bicat} {x y : B} {f : x --> y} : @left_adjoint (op1_bicat B) _ _ f ≃ @internal_right_adj B _ _ f.
imports: UniMath.Foundations.All UniMath.MoreFoundations.All UniMath.CategoryTheory.Core.Categories UniMath.Bicategories.Core.Bicat UniMath.Bicategories.Core.Examples.OpMorBicat UniMath.Bicategories.Morphisms.Adjunctions