my @AAMatrix = qw( A C D E F G H I K L M N P Q R S T V W Y );

##</code><code>##

my @AAOcc    = map { 0 } 1 .. 20;