diff options
Diffstat (limited to 'src/approx/maceps.lisp')
| -rw-r--r-- | src/approx/maceps.lisp | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/approx/maceps.lisp b/src/approx/maceps.lisp index ad234e8..debaa67 100644 --- a/src/approx/maceps.lisp +++ b/src/approx/maceps.lisp @@ -8,4 +8,5 @@ (setf h (/ h 2) err (abs (- (funcall f (+ a h)) (funcall f a)))) + when (> err 0) collect (list a h err)))) |