Napisałem skrypt lecz nie działa. Licze na pomoc w odnalezieniu przyczyny i likwidacji usterki

function nwd(){ foreach($array as $key => $val) { $tab1[$key] = $k[0]; $tab2[$key] = $k[1]; } $n=0; $h=0; for($i=0;$i<=999;$i++){ while($tab1[$i]!=$tab2[$i]){ if($tab1[$i]>$tab2[$i]) $tab1[$i]=$tab1[$i]-$tab2[$i]; else $tab2[$i]=$tab2[$i]-$tab1[$i]; } $NWD = $tab1[$i]; if($NWD==1){ $n++; } else $h++; } }