;;; fact.mhtml: -*- Meta-HTML -*-  DESCRIPTIVE TEXT.

;;;  Copyright (c) 1996 Brian J. Fox
;;;  Author: Brian J. Fox (bfox@ai.mit.edu) Sat May 18 09:47:59 1996.
<defun fact x>
  <if <lt x 2> 1
    <mul x <fact <sub x 1>>>>
</defun>
