Definition to := TotalAction act_f_1 act_f_morph.Definition coin0 (sc : col_squares) : colors := sc c0.Definition coin1 (sc : col_squares) : colors := sc c1.Definition coin2 (sc : col_squares) : colors := sc c2.Definition coin3 (sc : col_squares) : colors := sc c3.

Lemma burnside_app_iso : (square_coloring_number8 * 8 = n ^ 4 + 2 * n ^ 3 + 3 * n ^ 2 + 2 * n)%N.