(defun test-function (name age) 
      (print "name: ") (print name) (print "\n")
      (print "age: ") (print age) (print "\n")
)

(test-function "Matthew" 37)
(test-function "John" 22)
(test-function "Peter" 22)

(defun f (x)
   (set ret (compute x * x + 2))
   (return ret)
)

(defun run_f (x)
   (cond (= x 10) (return))
   (print (f x))
   (print "\n") 
   (run_f (+ x 1))
)

(run_f 0)
