Lecture 4 - slide 23 : 27
(define-syntax cons-stream (syntax-rules () ((cons-stream x y) (cons x (delay y)))))