title: Scheme problem with 'let'
body: <p>I am trying to write a scheme program to read in 2 numbers and display their addition, but am having problem with the 'let' expression</p>
  
  <pre><code>(define (add-two)
    (let* ((first ((display "Enter first number:")
                  (read)))
          (second ((display "Enter second number:")
                   (read))))
          (sum (+ first second))
          )
      (display "total is " sum)
      )
  </code></pre>
  
  <p>After reading the first number, the program crashes...and points to the let expression, the compiler reports </p>
  
  <blockquote>
    <p>'procedure application: expected
    procedure, given: #; arguments
    were: 4'</p>
  </blockquote>
  
  <p>I'm not sure how to fix this..What do you think is wrong?</p>
  
  <p>thanks in adv!</p>