!7

p-exp {
  S text = mL_raw("Program 1");
  
  new TreeSet<S> facts;
  
  for (S word : words2(text)) {
    LS cats = ai_categoriesForWord(word);
    for (S cat : cats)
      facts.add(quote(word) + " is " + a(cat));
  }
  
  pnl(facts);
}