diff fvector.yeti @ 26:0d03455c105b

Pull out tests into subdir

--- a/fvector.yeti	Thu Dec 20 15:25:46 2012 +0000
+++ b/fvector.yeti	Thu Dec 20 21:56:27 2012 +0000
@@ -33,18 +33,26 @@
 copyOf v is ~double[] -> ~double[] =
     Arrays#copyOf(v, list' v |> length);
 
-range v start len is ~double[] -> number -> number -> ~double[] =
+rangeOf v start len is ~double[] -> number -> number -> ~double[] =
     Arrays#copyOfRange(v, start, start + len);
 
 resizedTo n v is number -> ~double[] -> ~double[] =
     Arrays#copyOf(v, n);
 
+concat v1 v2 is ~double[] -> ~double[] -> ~double[] =
+   (v1len = length' v1;
+    v2len = length' v2;
+    v = resizedTo (v1len + v2len) v1;
+    for [0..v2len-1] do i: v[v1len + i] := v2[i] done;
+    v);
+
 {
 zeros, ones,
 vector,
 length = length',
 list = list',
 equal,
-copyOf, range, resizedTo,
+copyOf, rangeOf, resizedTo,
+concat
 }