X-Git-Url: http://gitweb.michael.orlitzky.com/?a=blobdiff_plain;f=src%2FMain.hs;h=c4204c821f4f534f1df7c72784b155dbd7072f83;hb=f6d0c289ad3397cf392976c24f3afdb17da5d377;hp=a2d6b1ffb2411eb37ca02c1a2fc0fb719236c711;hpb=ec2c118022bc46a191ebc323f6be17d4f017fcfb;p=spline3.git diff --git a/src/Main.hs b/src/Main.hs index a2d6b1f..c4204c8 100644 --- a/src/Main.hs +++ b/src/Main.hs @@ -24,32 +24,4 @@ where -- poly = polynomial target_tetrahedron main :: IO () -main = do - putStrLn "Hello, World." - -- print $ find_point_value (0,0,0) - -- print $ find_point_value (1,0,0) - -- print $ find_point_value (2,0,0) - -- print $ find_point_value (0,1,0) - -- print $ find_point_value (1,1,0) - -- print $ find_point_value (2,1,0) - -- print $ find_point_value (0,2,0) - -- print $ find_point_value (1,2,0) - -- print $ find_point_value (2,2,0) - -- print $ find_point_value (0,0,1) - -- print $ find_point_value (1,0,1) - -- print $ find_point_value (2,0,1) - -- print $ find_point_value (0,1,1) - -- print $ find_point_value (1,1,1) - -- print $ find_point_value (2,1,1) - -- print $ find_point_value (0,2,1) - -- print $ find_point_value (1,2,1) - -- print $ find_point_value (2,2,1) - -- print $ find_point_value (0,0,2) - -- print $ find_point_value (1,0,2) - -- print $ find_point_value (2,0,2) - -- print $ find_point_value (0,1,2) - -- print $ find_point_value (1,1,2) - -- print $ find_point_value (2,1,2) - -- print $ find_point_value (0,2,2) - -- print $ find_point_value (1,2,2) - -- print $ find_point_value (2,2,2) +main = putStrLn "Hello, World."