number guessing game in lisp using binary search