#### höchster Wert ####
$Hwert[0]=0;
$e=1;
for ($i=0;$i<=$x;$i++)
{
    for ($j=0;$j<=$y;$j++)
    {
    @Hwert[$e]=$LM[$i][$j];
    $e=$e+1;
    }
}

for ($v=0;$v<$#Hwert;$v++)
{
    if ($Hwert[$v] >= $Hwert[$v+1])
    {
    $Hwert[$v+1]=$Hwert[$v]
    }
else{}
}
$Hochw=$Hwert[$#Hwert];