!7

sclass Node {
  S id, name;
  *() {} *(S *id, S *name) {}
}

sS meID = 'liahcrxesjjuwuur;
sS functionsCollectionID = 'dudnfsbhcgoeudhs;
static new L<Node> functions;

p {
  functions = persistentList("Functions");
  showCAL(diagram(), 600, 400);
}

static CirclesAndLines diagram() {
  new CirclesAndLines cal;
  cal.circle("Me\n\n" + meID, halfSizeImage(quickVisualize("Voice assistant")), 0.2, 0.2);
  int size = l(functions)*20+4;
  Circle f = cal.circle(whiteImage(size, size), 0.8, 0.6, n(functions, "function") + "\n(Collection)\n\n" + functionsCollectionID);
  for (Node n : functions) {
    Circle fn = cal.circle(whiteImage(20, 20), random(0.5)+0.5, random(0.5)+0.5, n.name);
    cal.arrow(f, "contains", fn);
  }
  ret cal;
}

static int happiness() { ret l(functions); }