#!/usr/local/bin/sbcl --script (print '(list (list 2 3) (list 4 5)))