<?php

require_once "../../phplib/util.php";
ini_set('max_execution_time', '3600');
ini_set("memory_limit", "512000000");
$knownBadLexems = array(30181 => "marghiol", 36123 => "orb", 45412 => "roib", 45561 => "rotocol", 45569 => "rotogol", 34515 => "neșters", 34102 => "neîntors", 15616 => "oare", 13173 => "cumătră", 3064 => "argăseală", 3284 => "aromeală", 30143 => "mardeală", 30182 => "marghioleală", 37613 => "paraponiseală", 37711 => "pardoseală", 36970 => "palavrageală", 18650 => "fâșâialășâia", 32004 => "mițuialățuia", 32715 => "moțăiala", 33 => "aberoscop", 11790 => "convector", 39093 => "piciorong", 58272 => "al", 58283 => "ăst", 58284 => "ăsta", 9529 => "cinevași", 9530 => "cinevașilea", 58293 => "câtelea", 58304 => "dumneata", 58310 => "ist", 58311 => "ista", 27125 => "istalalt", 58312 => "istalalt", 58315 => "însuși", 58338 => "totul", 58342 => "un");
$models = Model::loadAll();
$tempModel = Model::loadTemporary();
foreach ($models as $model) {
    if ($model->modelType != 'MF' && $model->modelType != 'VT' && $model->id != $tempModel->id && $model->id == 130) {
        print "Testing model " . $model->getName() . " (id = " . $model->id . ")\n";
        $lexems = Lexem::loadByModelId($model->id);
        $transfMap = array();
        foreach ($lexems as $lexem) {
            if (array_key_exists($lexem->id, $knownBadLexems)) {
                print "  Skipping known bad lexem " . $lexem->id . " (" . $lexem->unaccented . ")\n";
                continue;
            }
            if (!$lexem->isLoc) {
                continue;
            }
            $wls = WordList::loadByLexemId($lexem->id);
            $ignore = false;
            for ($i = 0; $i < count($wls) && !$ignore; $i++) {
                $ignore = ord($wls[$i]->form) == 0 || text_contains($wls[$i]->form, "'");
            }
            if ($ignore) {
                print "  Ignoring lexem " . $lexem->id . " (" . $lexem->unaccented . "): paradigm contains accents or null characters\n";
            }
            if (!$ignore) {
                if (!count($transfMap)) {