diff options
author | Elizabeth Hunt <elizabeth.hunt@simponic.xyz> | 2023-10-09 21:37:44 -0600 |
---|---|---|
committer | Elizabeth Hunt <elizabeth.hunt@simponic.xyz> | 2023-10-09 21:37:44 -0600 |
commit | e46e5eee74af75aa1123b2370ff2f4587f4adc2a (patch) | |
tree | ae793dd22176613282e41ce6d15f481c072a8a57 /tests/approx.lisp | |
parent | adda6869cb2a07984b48c39fcd70ee76449c353d (diff) | |
download | cmath-e46e5eee74af75aa1123b2370ff2f4587f4adc2a.tar.gz cmath-e46e5eee74af75aa1123b2370ff2f4587f4adc2a.zip |
flatten directory structure to appease dr koebbe
Diffstat (limited to 'tests/approx.lisp')
-rw-r--r-- | tests/approx.lisp | 36 |
1 files changed, 0 insertions, 36 deletions
diff --git a/tests/approx.lisp b/tests/approx.lisp deleted file mode 100644 index 588b16d..0000000 --- a/tests/approx.lisp +++ /dev/null @@ -1,36 +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 central-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 - (central-derivative-at f x delta) - f-prime-at-x - accepted-delta)))) - -(test fwd-derivative-at - :description "forward 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 - (forward-derivative-at f x delta) - f-prime-at-x - accepted-delta)))) |