{R : Type u_1} →
  {S : Type u_2} →
    {T : Type u_3} →
      [inst : CommRing R] →
        [inst_1 : CommRing S] →
          [inst_2 : CommRing T] →
            [inst_3 : Algebra R S] →
              [inst_4 : Algebra R T] →
                (f : S ≃ₐ[R] T) →
                  (p : Polynomial S) →
                    (q : Polynomial T) → Associated (Polynomial.map (↑f) p) q → AdjoinRoot p ≃ₐ[R] AdjoinRoot q