diff options
Diffstat (limited to 'cl/tests/approx.lisp')
-rw-r--r-- | cl/tests/approx.lisp | 24 |
1 files changed, 0 insertions, 24 deletions
diff --git a/cl/tests/approx.lisp b/cl/tests/approx.lisp deleted file mode 100644 index 2fd8124..0000000 --- a/cl/tests/approx.lisp +++ /dev/null @@ -1,24 +0,0 @@ -(defpackage lizfcm/tests.approx - (:use :cl - :fiveam - :lizfcm.approx - :lizfcm.utils - :lizfcm/tests) - (:export :approx-suite)) -(in-package :lizfcm/tests.approx) - -(def-suite approx-suite - :in lizfcm-test-suite) -(in-suite approx-suite) - -(test derivative-at - :description "derivative at is within bounds" - (let ((f (lambda (x) (* x x))) - (x 2) - (accepted-delta 0.02) - (f-prime-at-x 4) - (delta 0.01)) - (is (within-range-p - (derivative-at f x delta) - f-prime-at-x - accepted-delta)))) |