math.functions: adding another test for roots.

2012-04-19 13:34:42 -07:00 · 2012-04-19 13:34:42 -07:00 · 7a15418cf4
parent adc7b22997
commit 7a15418cf4
1 changed files with 2 additions and 0 deletions
--- a/basis/math/functions/functions-tests.factor
+++ b/basis/math/functions/functions-tests.factor
@ -238,3 +238,5 @@ CONSTANT: log10-factorial-1000 0x1.40f3593ed6f8ep11
        C{ -0.7211247851537049 -1.249024766483406 }
    } [ .01 ~ ] 2map
 ] unit-test
+
+{ t } [ 3 15 roots [ 15 ^ 3 .01 ~ ] all? ] unit-test