proposition: Lemma codeszP c : val c \is a code.
proof: Proof. Proof using. by case: c => c /= /andP[]. Qed.
imports: HB(structures) mathcomp(all_ssreflect) mathcomp(fingroup perm morphism presentation) mathcomp(ssralg poly ssrint) permcomp tools permuted combclass congr