1 ! Copyright (C) 2010 John Benediktsson.
2 ! See http://factorcode.org/license.txt for BSD license
4 USING: kernel math math.approx math.constants
5 math.floating-point sequences tools.test ;
7 { { 3 3 13/4 16/5 19/6 22/7 } }
10 { 1/2 1/4 1/8 1/16 1/32 1/64 }
11 [ approximate ] with map
14 { { -3 -3 -13/4 -16/5 -19/6 -22/7 } }
17 { 1/2 1/4 1/8 1/16 1/32 1/64 }
18 [ approximate ] with map