#!/openlisp/uxlisp -shell ()