fixed deriv test

2022-01-08 20:22:06 -05:00 · 2022-01-08 20:22:06 -05:00 · 65aafdd66d
commit 65aafdd66d
parent 020fb01bd5
1 changed files with 2 additions and 1 deletions
--- a/test/propeller/tools/calculus_test.cljc
+++ b/test/propeller/tools/calculus_test.cljc
@ -3,6 +3,7 @@
            [propeller.tools.calculus :as c]))
 (t/deftest deriv_test
  (t/is (letfn [(cubic [x] (let [a (double x)] (* a a a)))]
-         (=  (c/deriv (cubic 2)) 2.0))
+          (< (max (- (c/deriv cubic 2) 12) (- (- (c/deriv cubic 2) 12))) 0.001)
+          )
        )
  )