CL-USER> ((lambda (size) (write (list 'my 'program 'size 'is size)))
          (program-size '(lambda (size) (write (list 'my 'program 'size 'is size)))))
(MY PROGRAM SIZE IS 13)