fact: Definition permc g := match g with | Eperm123 => fun c => c | Eperm132 => palette Color0 Color1 Color3 Color2 | Eperm213 => palette Color0 Color2 Color1 Color3 | Eperm231 => palette Color0 Color2 Color3 Color1 | Eperm312 => palette Color0 Color3 Color1 Color2 | Eperm321 => palette Color0 Color3 Color2 Color1 end.
imports: HB(structures) mathcomp(ssreflect ssrfun ssrbool eqtype ssrnat seq choice) mathcomp(fintype)