svoid test_parentConcepts() {
  new Concepts cc;
  new Concepts parent;
  cc.parent = parent;
  cc.idCounter = 1000;
  Concept a = cnew(parent, Concept);
  Concept b = cnew(cc, Concept);
  assertEqualsVerbose(1L, a.id);
  assertEqualsVerbose(1001L, b.id);
  assertEqualsVerbose(2, countConceptsCI(cc, Concept));
  assertEqualsVerbose(1, countConceptsCI(parent, Concept));
  assertEqualsVerbose(litset(a), asSet(list(parent, Concept)));
  assertEqualsVerbose(litset(a, b), asSet(list(cc, Concept)));
}