!7

static L<Web> webs;

p {
  webs = allWebsFromCE();
  new L form;
  for (S thing : webs_findNodeAndRelationB(webs, "an email", "has")) {
    S whichIs = first(webs_findNodeAndRelationB(webs, thing, "which is"));
    S renderAs = first(webs_findNodeAndRelationB(webs, whichIs, "render as"));
    S function = first(webs_findNodeAndRelationB(webs, renderAs, "made by function"));
    print(thing + " (" + whichIs + ") -> " + renderAs + " -> " + function);
    if (function != null)
      addAll(form, thing, makeAndCall(function));
  }
  
  form.add(func { infoBox("Hello world!"); false; });
  
  showForm(asObjectArray(form));
}