002.scm

;;; chicken scheme
;;; 002
;;; how to create local variables
;;; how to use them in functions
;;; how to return a value from a function
 
(define number1 5)
(define number2 10)
 
(define add
  (lambda (a b)
    (let ((res 0))
      (set! res (+ a b))
      res))) ;;; this line sets the returns value of our add function
 
(display "number1 + number2 = ")
(display (add number1 number2))
(newline)