proposition: Lemma subnormal_sub G H : H <|<| G -> H \subset G.
proof: Proof. by case/andP. Qed.
imports: mathcomp(ssreflect ssrbool ssrfun eqtype ssrnat seq path) mathcomp(fintype bigop finset fingroup morphism) mathcomp(automorphism quotient action commutator center)