!7

concept Drawing {
  S globalID = aGlobalID();
  S name;
  S calStructure;
  
  CirclesAndLines cal() { ret (CirclesAndLines) unstructure(calStructure); }
}

p {
  Concepts concepts = new Concepts(#1007609).load();
  L<Drawing> drawings = list(concepts, Drawing);
  print("Have " + n(drawings, "drawing") + ".");
  Drawing d = getConcept(concepts, Drawing, 38);
  Web web = calToWeb(d.cal());
  /*print("Relations: " + struct(map(f systemHashCode, values(web.relations))));
  printStruct(web);
  printStruct("Non-relation-nodes", map(f systemHashCode, web_nonRelationNodes(web)));*/
  printWeb(web);
}