my @inst = ( 'GGTGTGCC', 
             'GCTGTGGG', 
             'GGTGGGCC' );


##</code><code>##

T => 0 0 1 0 0.666666666666667 0 0 0 
C => 0 0.333333333333333 0 0 0 0 0.666666666666667 0.666666666666667
G => 1 0.666666666666667 0 1 0.333333333333333 1 0.333333333333333 0.333333333333333

##</code><code>##

A => 0 0 0 0 0 0 0 0