(define (process items)
  (fold-left + 0 items))

(let ((a 1)
      (b 2))
  (+ a b))

(display "first"
         "second")