;;;; .title SchemeDoc Demo ;;;; .author Kurt Normark ;;;; .affiliation Aalborg University, Denmark ;;;; This is a brief example of a Scheme program with multi-semicolon SchemeDoc comments. ;;;; We have used this example in the paper "Scheme Documentation tools". Here the example ;;;; is used to illustrate the use of different CSS stylesheets.
;;; Factorials. ;;; .section-id fac-stuff ;;; This section demonstrates a plain and well-known function, namely the factorial function.

(define (fac n) (if (= n 0) 1 (* n (fac (- n 1)))))
;;; List selection functions. ;;; .section-id list-stuff ;;; This section demonstrates two aliased functions.

(define head car)
(define tail cdr)