proposition: Lemma mem_galTrace K E a : galois K E -> a \in E -> galTrace K E a \in K.
proof: Proof. by move/galois_fixedField => {2}<- /galTrace_fixedField. Qed.
imports: HB(structures) mathcomp(ssreflect ssrbool ssrfun eqtype ssrnat seq div) mathcomp(choice fintype tuple finfun bigop ssralg poly) mathcomp(polydiv finset fingroup morphism quotient perm) mathcomp(action zmodp cyclic matrix mxalgebra vector) mathcomp(falgebra fieldext separable)