!7

concept DWeb {
  S globalID;
  S webStruct;
}

p {
  dbIndexing(DWeb, 'globalID);
  print("n=" + countConcepts(DWeb));
  for (Web web : allIndexedWebs())
    cset(uniq(DWeb, globalID := web.globalID), webStruct := struct(web));
  print("n=" + countConcepts(DWeb));
  if (noConsole()) cleanKillVM_noTimeOut();
}