MODULE Main;
IMPORT B;
BEGIN
  EVAL B.Search ("");
END Main.