#!/usr/local/bin/sbcl --script
(print (mapcar (lambda (x) (* x 1)) (list 2 3 5 6)))