<br />
<b>Warning</b>:  session_start(): open(/var/lib/php/sessions/sess_oc9i12i1osuc05m78btkd4d8me, 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

cmodule IWantYouToBePrelude > DynPrintLog {
  // the spaces
  
  sS objectiveSpace = 'objective, computerSpace = 'computery, userSpace = 'usery;
  
  // the names
  
  transient S userName = "usery", computerName = "computery";
  
  // the facts
  
  transient Set<S> facts = litciset(
    "Computery is usery's assistant",
    "It is impossible that {Computery is usery's mother}");

  // the rules

  transient WordTokRule rule_iWantYouToBe = wordTokReplacerRule(
    "I want you to be my assistant", "assistant", "I want that {you are my assistant}");
    
  transient WordTokRule rule_useryWants = new WordTokRule("Usery wants that X", "X") {
    // { debug = true; }
    run {
      S x_simplified = simpleSpaces_nTok(getVar("X"));
      if (contains(facts, x_simplified))
        emit("But " + x_simplified + " already");
      else if (contains(facts, "It is impossible that " + curly(x_simplified)))
        emit("No way brother");
      else if (debug) print("Can't decide on: " + x_simplified);
    }
  };
  
  // rules by space
    
  transient MultiMap<S, WordTokRule> rulesForSpace = litmultimap(
    userSpace, ll(rule_iWantYouToBe),
    objectiveSpace, ll(rule_useryWants)
  );
  
  Set<S> rewriteInSpace(S space, S input) {
    ret rewriteInSpace(space, ll(input));
  }
  
  Set<S> rewriteInSpace(S space, Collection<S> inputs) {
    Set<S> out = cloneLinkedCISet(inputs);
    L<WordTokRule> rules = rulesForSpace.get(space);
    for unnull (S input : inputs)
      functionReturningList_transitiveHull_ciSet(func(S s) -> Collection<S> { applyWordTokRules(rules, s) }, input, seen := out);
    ret out;
  }
  
  start-thread {
    for (S input : ll("I want you to be my mother", "I want you to be my assistant")) {
      print_nlBefore(input);
      // first, rewrite in user space
      Set<S> outputs = rewriteInSpace(userSpace, input);
      pnlIndent("User space > ", outputs);
      
      // translate to objective space
      LS outputs2 = ai_spaceToSpace(userSpace, objectiveSpace, outputs, +computerName, +userName);
      pnlIndent("Objective space > ", outputs2);
   
      // rewrite in objective space
      Set<S> outputs3 = rewriteInSpace(objectiveSpace, outputs2);
      pnlIndent("Objective space > ", outputs3);
      
      // translate to computer space
      LS outputs4 = ai_spaceToSpace(objectiveSpace, computerSpace, outputs3, +computerName, +userName);
      pnlIndent("Bot space > ", outputs4);
    }
    
    printDone();
  }
}