diff options
| author | Elizabeth Hunt <elizabeth.hunt@simponic.xyz> | 2023-09-27 10:10:33 -0600 |
|---|---|---|
| committer | Elizabeth Hunt <elizabeth.hunt@simponic.xyz> | 2023-09-27 10:10:33 -0600 |
| commit | b35e3998333e8190bf07ade51dba30773b3a3d0b (patch) | |
| tree | bded796a9cc809073a90b170d420e93f5377f2b7 /src | |
| parent | 4584437d432a0fdd787f376273d948ca3f9fcea0 (diff) | |
| download | cmath-b35e3998333e8190bf07ade51dba30773b3a3d0b.tar.gz cmath-b35e3998333e8190bf07ade51dba30773b3a3d0b.zip | |
fix bug in which err = 0
Diffstat (limited to 'src')
| -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)))) |
