proposition: Lemma sgval_sub A : sgval @* A \subset G.
proof: Proof. by apply/subsetP=> x; case/imsetP=> u _ ->; apply: subgP. Qed.
imports: mathcomp(ssreflect ssrbool ssrfun eqtype ssrnat seq choice) mathcomp(fintype finfun bigop finset fingroup)