Solution to the Best Change problem in Lisp