print "module ${which}_$name(){ ////toplevel\n";
my $cs = $count{$name};
my $total = 0; $total += $_ foreach values %$cs;
+ return unless $total;
my $rowsz = ceil(sqrt($total));
my $nrows = ceil($total / $rowsz);
$total_count += $total;
STDOUT->error and die $!;
__DATA__
-White Green Blue Red Yellow Purple Black Orange
-20+6 15+10 14+8 12+6 13+6 15+8 18+8 20+12
-8+3 10+5 10+5 8+5 6+5
-4+2
+White Green Blue Red Yellow Purple Black Orange WhiteSpare
+20+6 15+10 14+8 12+6 13+6 15+8 18+8 20+12 1+0
+8+3 10+5 10+5 8+5 6+5 1+0
+4+2 1+0
13+5 10+5 10+5 10+5