Help for this page
A R N D * A 4 -1 -2 -2 -2 ... 'R' => {'A'=> -1, 'R'=> 5, and so on with all rows
my @letters=qw( A R N D); ... } }