Resposta ao exercício 25

(defun maximo-func (func a b)
  (acumulatorio (function max)
                func
                (funcall func a)
                a
                (function (lambda (x) (+ x 0.01)))
                b))

Matematicamente, o maximo de ocorre quando a derivada da função se anula, i.e., quando . O valor máximo será então de . Testando, temos:

> (maximo-func (function (lambda (x) (- x (quadrado x))))
               0 2)
0.25