Select Code to Download

my @aa= qw(A R N D C Q E G H I L K M F P S T W Y V);
my $aa= join("\t", @aa);

$ph++= 0.01;

$ph+= 0.01;