svoid gazelle_addRulesFromConcepts(Concepts concepts) {
  L<Concept> toMerge = list(concepts, "Rule");
  for (Concept c : toMerge) {
    S ruleID = getString globalID(c);
    if (empty(ruleID))
      continue with print("No rule ID!?");
    PairS p = dm_textAndCommentForRule(ruleID);
    S text = getString text(c);
    S comments = getString comments(c);
    if (p == null) {
      print("Rule " + ruleID + ": importing");
      dm_call(dm_gazelle_rulesModule(), 'uniqConcept, globalID := ruleID, +text, +comment);
    } else {
      if (neq(text, p.a) || neq(comments, p.b))
        print("Rule " + ruleID + ": should update");
      else
        print("Rule " + ruleID + ": same");
    }
  }
}