∀ {C : Type u_3} [inst : CategoryTheory.Category.{u_2, u_3} C] {R : CategoryTheory.Functor Cᵒᵖ CommRingCat}
  {X Y Z : Cᵒᵖ} (f : X ⟶ Y) (g : Y ⟶ Z),
  (⇑(RingCat.Hom.hom ((R.comp (CategoryTheory.forget₂ CommRingCat RingCat)).map g)) ∘
        ⇑(RingCat.Hom.hom ((R.comp (CategoryTheory.forget₂ CommRingCat RingCat)).map f)))
      1 =
    1