!7

p-exp {
  S s = "I did the rgjiogjidres today";
  PTElement tree = ai_parseToTreeWithGuessing(s);
  L<S> unknown = ai_unknownWordsInSentence(s);
  printStruct(+unknown);
  assertTrue(nempty(unknown));
  
  //ai_cullParseTree(tree);
  
  for (S word : unknown) {
    //L<PTElement> e = ai_scanParseTreeForWord_all(tree, word);
    L<PTElement> e = ai_scanParseTreeForWord_all_tighter(tree, word);
    //e = map ai_parseTree_descendToComposite_opt(e);
    //pnl(map toStringWithClass(e));
    L<S> categories = uniquify(notNulls(mapMethod(e, 'category)));
    print("Guessing categories for " + word + ": " + categories);
  }
}