!7

sS theRiddle = [[

  What is Fibonacci number 1?
  What is Fibonacci number 2?
  What is Fibonacci number 3?
  
]];

sS theFacts = [[
  Fibonacci number n is Fibonacci number n-1 plus Fibonacci number n-2 if n > 2.
  There is no Fibonacci number with a negative index.
  There is no Fibonacci number 0.
  Fibonacci number 1 is 1.
  Fibonacci number 2 is 1.
]];

sS concepts = [[
]];

!include #1007689 // Web v2

static L<Lisp> facts;

p {
  aiEnhancements();
  aiConcepts_noAutoClear();
  //useConceptsDump(concepts);
  set englishToConceptLanguage_useBrackets;
  facts = clParse(printNumberedLines(linesToCL(theFacts)));
  printNumberedLines(facts);
  
  for (Lisp riddle : clParse(linesToCL(theRiddle))) {
    new Web web;
    web.relations(facts);
    if (riddle.is("urfkhwfasdaqqqse", "mrhggsmuykeceghd")) { // What is X? // What is the decimal representation of X?
      S x = str(riddle.get(0));
      L<S> labels = web.findNode(x).labels;
      print("Labels: " + l);
      S s = findInteger(l);
      if (s == null) {
        s = random(listWithout(l, x));
      }
      if (s != null)
        print(">> " + s);
    }
  }
  
  print(aiConceptsMap_cached_autoClearInterval);
}