(display (cons 0 (list 1 2 3)))
(newline)