!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));
  }
}