!7

//import static x30_pkg.x30_util.getOpt_cache;
//import static x30_pkg.x30_util.getOpt_cached;

module AnalyzeAppliedRules > DynSingleFunctionWithPrintLog {
  void doIt {
    L concepts = cloneList((L) dm_requireAndCall("#1021413/AppliedRules", 'concepts));
    print("Got " + n2(concepts, "concept"));
    for (O c : concepts) pcall {
      S judgement = getString judgement(c);
      S struct = getString matchedRuleStruct(c);
      O data = safeUnstruct(struct); // RuleEngine2_MatchedRule
      print(judgement + " : " + shorten(40, struct));
      Map varMap = cast getOpt_cached(data, 'map);
      //print("  Cached: " + getOpt_cache.get(_getClass(data)));
      //print("  fieldValues:" + keys(data/DynamicObject.fieldValues));
      print("  Var-Map: " + map);
    }
  }
}