∀ (R : Type u_1) {S : Type u_2} {A : Type u_3} [inst : CommRing R] [inst_1 : CommRing S] [inst_2 : Ring A]
  [inst_3 : Algebra R S] [inst_4 : Algebra R A] [inst_5 : Algebra S A] [IsScalarTower R S A] [NoZeroDivisors S]
  [int : Algebra.IsIntegral R S] {a : A}, IsAlgebraic S a → IsAlgebraic R a