#!/usr/local/bin/sbcl --script (apply #’list 1 2 3 ‘(4))