∀ {R : Type u_1} {S : Type u_2} [inst : CommRing R] [inst_1 : Ring S] [inst_2 : Algebra R S] {S' : Type u_7}
  [inst_3 : CommRing S'] [inst_4 : Algebra R S'] (pb : PowerBasis R S) (e : S ≃ₐ[R] S'), (pb.map e).dim = pb.dim