add algo practice with lisp