summaryrefslogtreecommitdiff
path: root/examples/error.hs
diff options
context:
space:
mode:
Diffstat (limited to 'examples/error.hs')
-rw-r--r--examples/error.hs21
1 files changed, 0 insertions, 21 deletions
diff --git a/examples/error.hs b/examples/error.hs
deleted file mode 100644
index 5efae7c..0000000
--- a/examples/error.hs
+++ /dev/null
@@ -1,21 +0,0 @@
1import Numeric.GSL
2import Numeric.GSL.Special
3import Numeric.LinearAlgebra
4import Prelude hiding (catch)
5import Control.Exception
6
7test x = catch
8 (print x)
9 (\e -> putStrLn $ "captured ["++ show (e :: SomeException) ++"]")
10
11main = do
12 setErrorHandlerOff
13
14 test $ log_e (-1)
15 test $ 5 + (fst.exp_e) 1000
16 test $ bessel_zero_Jnu_e (-0.3) 2
17
18 test $ (linearSolve 0 4 :: Matrix Double)
19 test $ (linearSolve 5 (sqrt (-1)) :: Matrix Double)
20
21 putStrLn "Bye" \ No newline at end of file