#!/usr/local/bin/sbcl --script



(let ((foo 42))
  (set' foo (1+ 42))
  foo)

(+ 345 654)

 (format t "~{~a~%~a~}" (list 123 456))