my $prob_es = ( keys %$hash_es ) / 6939873;
my $prob_en = ( keys %$hash_en ) / 6939873;