∀ {b₀ b₁ : AlgebraicGeometry.Schemeᵒᵖ} (f : b₀ ⟶ b₁),
  CategoryTheory.CategoryStruct.comp
      ((fun {b₀ b₁ b₂} x x_1 =>
            CategoryTheory.Bicategory.Adj.iso₂Mk
              (CategoryTheory.Cat.Hom.isoMk (AlgebraicGeometry.Scheme.Modules.pullbackComp x_1.unop x.unop).symm)
              (CategoryTheory.Cat.Hom.isoMk (AlgebraicGeometry.Scheme.Modules.pushforwardComp x_1.unop x.unop)) ⋯)
          f (CategoryTheory.CategoryStruct.id b₁)).hom
      (CategoryTheory.CategoryStruct.comp
        (CategoryTheory.Bicategory.whiskerLeft
          ((fun {b b'} f =>
              { l := (AlgebraicGeometry.Scheme.Modules.pullback f.unop).toCatHom,
                r := (AlgebraicGeometry.Scheme.Modules.pushforward f.unop).toCatHom,
                adj := (AlgebraicGeometry.Scheme.Modules.pullbackPushforwardAdjunction f.unop).toCat })
            f)
          ((fun x =>
                CategoryTheory.Bicategory.Adj.iso₂Mk
                  (CategoryTheory.Cat.Hom.isoMk (AlgebraicGeometry.Scheme.Modules.pullbackId (Opposite.unop x)))
                  (CategoryTheory.Cat.Hom.isoMk (AlgebraicGeometry.Scheme.Modules.pushforwardId (Opposite.unop x)).symm)
                  ⋯)
              b₁).hom)
        (CategoryTheory.Bicategory.rightUnitor
            ((fun {b b'} f =>
                { l := (AlgebraicGeometry.Scheme.Modules.pullback f.unop).toCatHom,
                  r := (AlgebraicGeometry.Scheme.Modules.pushforward f.unop).toCatHom,
                  adj := (AlgebraicGeometry.Scheme.Modules.pullbackPushforwardAdjunction f.unop).toCat })
              f)).hom) =
    CategoryTheory.eqToHom ⋯