!7

sclass MatchInput > DynPrintLogWithInput {
  start { dm_useLocallyCopiedMechLists(); }
  
  void update(S s) {
    print("\n> " + s);
    L<S> pats = mL("English sentence patterns");
    L<S> tok = printStruct(javaTokWithAngleBracketsC(s));
    PlanInMotion<S> plan = new(pats);
    L<Pair<S, L<PairS>>> results = new L; // pattern + match
    for (S pat : plan.master()) {
      L<S> tokPat = javaTokWithAngleBracketsC(pat);
      L<PairS> match = uniquify(dropTwinPairsIC(zipTwoListsToPairs_ifSameLength(tokPat, tok)));
      if (match != null)
        addPair(results, pat, antiFilter parsing_checkMatchPairUsingMechList(match));
    }
    
    for (Pair<S, L<PairS>> p : sortedByComparator(results, (Comparator<Pair<S, L<PairS>>>) (Comparator) lengthOfPairBListComparator()))
      print("  Result: Choose pattern " + quote(p.a) + " for input "  + quote(s) + " if match: " + p.b);
  }
}