InfinitivePast StemPresent Stemwrong stem\n"; while ($row=mysql_fetch_assoc($r)) { $i++; print "$row[inf]$row[past]$row[present]"; $presStem = PresentStem($row['inf']); if ($presStem!=$row['present']) { print $presStem; $counter++; } else print " "; print "\n"; } print ""; print "

Wrongly formed stems: $counter of $i"; $counter = 0; $i = 0; print "

Exceptions in Persian script

"; $r = mysql_query("SELECT * FROM pvc_verbs"); print "\n"; while ($row=mysql_fetch_assoc($r)) { $i++; print "\n"; } print "
InfinitivePresent Stemwrong stemTranslation
$row[pers_inf]$row[pers_presstem]"; $presStem = PresentStem($row['pers_inf']); if ($presStem!=$row['pers_presstem']) { print $presStem; $counter++; } else print " "; print "".($row['translation']?$row['translation']:" ")."
"; print "

Wrongly formed stems: $counter of $i"; $counter = 0; $i = 0; $isPersScript = false; print "

Exceptions in transliteration

"; $r = mysql_query("SELECT * FROM pvc_verbs"); print "\n"; while ($row=mysql_fetch_assoc($r)) { $i++; print "\n"; } print "
InfinitivePresent Stemwrong stemTranslation
$row[trans_inf]$row[trans_presstem]"; $presStem = PresentStem($row['trans_inf']); if ($presStem!=$row['trans_presstem']) { print $presStem; $counter++; } else print " "; print "".($row['translation']?$row['translation']:" ")."
"; print "

Wrongly formed stems: $counter of $i"; ?>