Resposta ao exercício 20

Uma vez que não queremos aplicar nenhuma função ao índice do produtório, temos de definir a função identidade.

(defun identidade (x) x)

(defun fact (n)
  (produtorio (function identidade) 1 n))