!7

cmodule IWantYouToBe > DynAttractorBot {
  // the facts
  
  transient Set<S> facts = tlft_ciSet([[
    Computery is usery's assistant
    It is impossible that {Computery is usery's mother}
  ]]);

  // rules by space
    
  transient MultiMap<S, WordTokRule> rulesForSpace = litmultimap(
    MultiSpaceReasoning1.userSpace, ll(rule_iWantYouToBeMy_1()),
    MultiSpaceReasoning1.objectiveSpace, ll(rule_useryWants_1(facts))
  );
  
  class Bot > AttractorBot {
    *() {
      addStandardAttractor(new DefaultAttractor {
        run {
          new MultiSpaceReasoning1 mr;
          mr.addRules(rulesForSpace);
    
          say(getVars(extFilterByFlag answer(mr.reason_inputToAnswer(input))));
        }
      });
    }
  }
 
  AttractorBot makeBot() { ret new Bot; }
}