X-Git-Url: http://gitweb.michael.orlitzky.com/?a=blobdiff_plain;f=src%2FExamples.hs;h=b7983904e8d5f2352cf69bd55a38bf38b5304026;hb=883ce9d78072c492000de94478189095032b6615;hp=03db51cef123cb908948cac1e45b55dac30e63c4;hpb=3e25ac7f9fffaabdc5e62f4b973f3d38be60cf4d;p=spline3.git

diff --git a/src/Examples.hs b/src/Examples.hs
index 03db51c..b798390 100644
--- a/src/Examples.hs
+++ b/src/Examples.hs
@@ -16,7 +16,14 @@ trilinear = [ [ [ 1, 2, 3 ],
                 [ 1, 8, 15 ]]]
 
 
--- | Values of the function f(x,y,z) = 1 + x + xy + xyz taken at nine
+-- | Values of the function f(x,y,z) = 1 + x + xy + xyz taken at 5^3
+--   points (hi, hj, jk) with h = 0.5. We should be able to reproduce
+--   this from splines based on the 3x3x3 trilinear.
+trilinear_zoom_2 :: [[[Double]]]
+trilinear_zoom_2 = [[[1, 3/2, 2, 5/2, 3], [1, 7/4, 5/2, 13/4, 4], [1, 2, 3, 4, 5], [1, 9/4, 7/2, 19/4, 6], [1, 5/2, 4, 11/2, 7]], [[1, 3/2, 2, 5/2, 3], [1, 15/8, 11/4, 29/8, 9/2], [1, 9/4, 7/2, 19/4, 6], [1, 21/8, 17/4, 47/8, 15/2], [1, 3, 5, 7, 9]], [[1, 3/2, 2, 5/2, 3], [1, 2, 3, 4, 5], [1, 5/2, 4, 11/2, 7], [1, 3, 5, 7, 9], [1, 7/2, 6, 17/2, 11]], [[1, 3/2, 2, 5/2, 3], [1, 17/8, 13/4, 35/8, 11/2], [1, 11/4, 9/2, 25/4, 8], [1, 27/8, 23/4, 65/8, 21/2], [1, 4, 7, 10, 13]], [[1, 3/2, 2, 5/2, 3], [1, 9/4, 7/2, 19/4, 6], [1, 3, 5, 7, 9], [1, 15/4, 13/2, 37/4, 12], [1, 9/2, 8, 23/2, 15]]]
+
+
+-- | Values of the function f(x,y,z) = 1 + x + xy + xyz taken at nine^3
 --   points (hi, hj, jk) with h = 0.5. We should be able to reproduce
 --   this from splines based on the 3x3x3 trilinear.
 trilinear9x9x9 :: [[[Double]]]