!7

cprint {

  start-thread {

    dm_useLocalMechListCopies();

    S s = "if a snippet contains token X, it also contains token Y";

    LS tok = javaTok(s);

    L<ParsedWithTokens<S>> pronouns = pwt_allPronouns(tok);

    print("Pronouns", pronouns);

    for (ParsedWithTokens<S> p : pronouns) p.replaceTokens("bla");

    print(join(tok));

    //print(first(ai_pronounResolvedToNLA(s)));

    //ret ai_parseIfThen(s);

    new RecordCalls rec;

    for (PairS p : getVars(ai_findNounPlusVar(s)))

      rec.get("addEntity", joinPairWithSpace(p));

    for (DeterminerPlusNoun x : getVars(ai_findSimplestNounPhrases(s)))

      rec.get("addEntity", x.render());

    print(rec);

    LS entities = secondOfListsWhereFirstEqic("addEntity", rec.calls);

    VarMaker entityNameMaker = entityNameMaker(s);

    SS map = freshVarsMap(entities, entityNameMaker);

    print(s = replacePhrases(s, map));

    print(ai_parseIfThen(s));

  }

}