Codigo para GNU Common Lisp (gcl 2.4.0) de linux