!7

p-exp {
  PTElement input = ai_parseToCulledTree("What is this thing you have");
  PTElement pat = ai_parseToCulledTree("What is X");
  
  matchTrees(input, pat);
}

svoid matchTrees(PTElement pat, PTElement input) {
  if (pat == null || input == null) ret;
  if (pat instanceof ChooseCategory && input instanceof ChooseCategory) {
    print("Categories: " + collect(pat.children, 'category) + " vs " + collect(input.children, 'category));
  }
  print("Non-matching classes: " + className(pat) + " vs " + className(input));
}