∀ {R : Type u_1} {A : Type u_3} {B : Type u_4} [inst : CommSemiring R] [inst_1 : Semiring A] [inst_2 : Semiring B]
  [inst_3 : Algebra R A] [inst_4 : Algebra R B] (a : A ≃ₐ[R] Bᵐᵒᵖ) (a_1 : B),
  (AlgEquiv.opComm a).symm a_1 = (↑↑AlgEquiv.refl).symm ((↑↑((AlgEquiv.op a).trans (AlgEquiv.opOp R B).symm)).symm a_1)