∀ {R : Type u_1} [inst : CommRing R] {X Y : Type u_2} [inst_1 : CommRing X] [inst_2 : Bialgebra R X]
  [inst_3 : CommRing Y] [inst_4 : Bialgebra R Y] (x : X ≃ₐc[R] Y),
  CommBialgCat.bialgEquivOfIso (CommBialgCat.isoMk x) = CommBialgCat.bialgEquivOfIso (CommBialgCat.isoMk x)