∀ {S : Type u_2} [inst : Ring S] {A : Type u_4} [inst_1 : CommRing A] [inst_2 : Algebra A S] {S' : Type u_7}
  [inst_3 : Ring S'] [inst_4 : Algebra A S'] (pb pb_1 : PowerBasis A S) (e_pb : pb = pb_1) (pb' pb'_1 : PowerBasis A S')
  (e_pb' : pb' = pb'_1) (h₁ : (Polynomial.aeval pb.gen) (minpoly A pb'.gen) = 0)
  (h₂ : (Polynomial.aeval pb'.gen) (minpoly A pb.gen) = 0), pb.equivOfRoot pb' h₁ h₂ = pb_1.equivOfRoot pb'_1 ⋯ ⋯