factor/extra/math/numerical-integration/numerical-integration-tests...

10 lines
379 B
Factor
Raw Normal View History

2007-09-20 18:09:08 -04:00
USING: kernel math.numerical-integration ;
IN: temporary
[ 50 ] [ 0 10 [ ] integrate-simpson ] unit-test
[ 1000/3 ] [ 0 10 [ sq ] integrate-simpson ] unit-test
[ t ] [ 0 pi 2 / [ sin ] integrate-simpson 1 .000000001 ~abs ] unit-test
[ t ] [ 0 pi [ sin ] integrate-simpson 2 .00000001 ~abs ] unit-test
[ t ] [ 0 pi 2 * [ sin ] integrate-simpson 0 .00000000001 ~abs ] unit-test