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 ;
9 [ { 3 3 13/4 16/5 19/6 22/7 } ]
12 { 1/2 1/4 1/8 1/16 1/32 1/64 }
13 [ approximate ] with map
16 [ { -3 -3 -13/4 -16/5 -19/6 -22/7 } ]
19 { 1/2 1/4 1/8 1/16 1/32 1/64 }
20 [ approximate ] with map