∀ {R : Type u} {S : Type v} [inst : CommRing R] [inst_1 : Ring S] {f : Polynomial R} [inst_2 : Algebra R S]
  (h : IsAdjoinRoot S f) {T : Type u_1} [inst_3 : Ring T] [inst_4 : Algebra R T] (h' : IsAdjoinRoot T f) {U : Type u_2}
  [inst_5 : Ring U] [inst_6 : Algebra R U] (h'' : IsAdjoinRoot U f),
  (h.algEquiv h').trans (h'.algEquiv h'') = h.algEquiv h''