Codigo para GNU Common Lisp (gcl) Version(2.4.4) de Linux