Code examples from functional programming languages.

Scheme from Abelson and Sussman (1996):

(define (factorial n)
  (if (= n 1)
      1
      (* n (factorial (- n 1)))))