<br />
<b>Warning</b>:  session_start(): open(/var/lib/php/sessions/sess_vn7nofcn79mt99btaplidmgii1, O_RDWR) failed: No space left on device (28) in <b>/var/www/tb-usercake/models/config.php</b> on line <b>51</b><br />
<br />
<b>Warning</b>:  session_start(): Failed to read session data: files (path: /var/lib/php/sessions) in <b>/var/www/tb-usercake/models/config.php</b> on line <b>51</b><br />
!7

sS inputDiagrams = [[
  CirclesAndLines(circles=[Circle(text="A [Anything]", x=d("0.32"), y=d("0.55")), Circle(text="B [Anything]", x=d("0.68"), y=d("0.55"))], lines=[Arrow(a=t5, b=t26, text="is"), Arrow(a=t26, b=t5, text="then: is?")], title="A B B A")
  CirclesAndLines(circles=[Circle(quickvis="Philosophy", text="Philosophy", x=d("0.27"), y=d("0.47")), Circle(quickvis="Asking questions", text="Asking questions", x=d("0.75"), y=d("0.47"))], lines=[Arrow(a=t5, b=t30, text="is")], title="Philosophy")
]];

static Web inputWeb, resultWeb;

p-subst {
  cal_lineLength(50);
  L<Web> webs = websFromCALStructures_vis(inputDiagrams);
  
  Web web = first(webs); // Instruction
  
  Web patternWeb, Map<WebNode> patternMap = unpair cloneWebWithMap(web);
  web_dropRelationsStartingWith(patternWeb, "Then:");
  
  Web thenWeb, Map<WebNode> thenMap = unpair cloneWebWithMap(web);
  web_unpackRelationsStartingWith(thenWeb, "Then:");
  inputWeb = last(webs);
  
  Map<WebNode> match = web_matchAllPerms(patternWeb, inputWeb);
  
  // Clone inputWeb to get resultWeb
  Web resultWeb, Map<WebNode> resultMap = unpair cloneWebWithMap(inputWeb);
  main.resultWeb = resultWeb;
  
  if (match != null) {
    // Then add relations from thenWeb
    for (WebRelation rel : web_relationObjects(thenWeb)) {
      WebNode a = mapGet(resultMap, mapGet(match, mapGet(patternMap, reverseLookup(thenMap, rel.a)));
      WebNode b = mapGet(resultMap, mapGet(match, mapGet(patternMap, reverseLookup(thenMap, rel.b)));
      if (a != null && b != null) {
        print("Adding labels " + rel.labels + " to: " + a + " - " + b);
        WebRelation rel2 = resultWeb.getRelation(a, b);
        web_addLabelsFromNodeToNode(rel, rel2);
      }
    }
  }
  
  think();
  
  final CirclesAndLines cal = webToCAL(inputWeb);
  cal.onRenameCircle = r { inputWeb = calToWeb(cal); think() };

  setFrameWidth(700, showTabbedWebs(
    "Instruction", web, "If", patternWeb, "Then", thenWeb,
    "Input", /*inputWeb,*/ calAutoLayout2(cal, cal.makeCanvas()),
    "Result", resultWeb != null ? resultWeb : jlabel("Sorry"),
    "Computer's Question", second(jFullCenterTextPane(answer))));
}

svoid think {
  WebRelation rel = web_findDoubleRelation(resultWeb, "Is", "Is?");
  S answer = "?";
  if (rel != null) {
    S a = web_text(rel.a), b = web_text(rel.b);
    answer = firstToUpper(a) + " may be " + firstToLower(b) + ".\n\n"
      + "But is " + firstToLower(b) + " " + firstToLower(a) + "?";
  }
  
  // TODO: update tab
}