Definition to_g := TotalAction act_g_1 act_g_morph.Definition col0 (sc : col_cubes) : colors := sc F0.Definition col1 (sc : col_cubes) : colors := sc F1.Definition col2 (sc : col_cubes) : colors := sc F2.Definition col3 (sc : col_cubes) : colors := sc F3.Definition col4 (sc : col_cubes) : colors := sc F4.Definition col5 (sc : col_cubes) : colors := sc F5.Notation infE := (sameP afix1P eqP).

Lemma burnside_app_iso3 : (cube_coloring_number24 * 24 = n ^ 6 + 6 * n ^ 3 + 3 * n ^ 4 + 8 * (n ^ 2) + 6 * n ^ 3)%N.