my_sqrt.lisp