Help for this page

Select Code to Download

Select or download this

#maximum of below foreach#
            
 foreach my $yy ( keys %{$trans->{$state}} ) 

 {  $trans->{$state}->{$yy}  *  viterbi($yy, $r) ;  }