!7

p {
  ai_alternativeSmartBot();
  ai_useThoughtSpaces(true);
  
  ActualThoughtSpace myTS = new ActualThoughtSpace(currentThoughtSpace());
  thoughtSpace(myTS);
  
  myTS.blockedA = litciset("Haskell");
  assertContainsIC(print(ai_texts("Java", "is", "$X")), "a programming language");

  bench 10000 {
    myTS.blockedA.add("Java");
    assertDoesntContainIC(ai_texts("Java", "is", "$X"), "a programming language");
    
    myTS.blockedA.remove("Java");
    assertContainsIC(ai_texts("Java", "is", "$X"), "a programming language");
  }

  print("OK");
}