summaryrefslogtreecommitdiff
path: root/examples
diff options
context:
space:
mode:
authorAlberto Ruiz <aruiz@um.es>2007-09-14 11:06:57 +0000
committerAlberto Ruiz <aruiz@um.es>2007-09-14 11:06:57 +0000
commit9e2f7fb0ca902665b430a96f77959522976a97f9 (patch)
treec2f258fe28df79a645f3908655b46fbaf89ecf16 /examples
parent620d5008ea9a931a91907cd0c902bb64f005121f (diff)
code refactoring
Diffstat (limited to 'examples')
-rw-r--r--examples/oldtests.hs6
-rw-r--r--examples/tests.hs2
2 files changed, 2 insertions, 6 deletions
diff --git a/examples/oldtests.hs b/examples/oldtests.hs
index 5b0e9b4..b01675f 100644
--- a/examples/oldtests.hs
+++ b/examples/oldtests.hs
@@ -1,9 +1,5 @@
1import Test.HUnit 1import Test.HUnit
2 2import GSLHaskell
3import GSL
4import GSL.Special hiding (exp)
5import GSL.Matrix
6import LinearAlgebra.Linear
7import System.Random(randomRs,mkStdGen) 3import System.Random(randomRs,mkStdGen)
8 4
9realMatrix = fromLists :: [[Double]] -> Matrix Double 5realMatrix = fromLists :: [[Double]] -> Matrix Double
diff --git a/examples/tests.hs b/examples/tests.hs
index 0d8361e..0a09ced 100644
--- a/examples/tests.hs
+++ b/examples/tests.hs
@@ -23,7 +23,7 @@ import Complex
23import LinearAlgebra.Algorithms 23import LinearAlgebra.Algorithms
24import LinearAlgebra.Linear 24import LinearAlgebra.Linear
25import GSL.Matrix 25import GSL.Matrix
26import GSL.Compat hiding ((<>),constant) 26import GSLHaskell hiding ((<>),constant)
27 27
28dist :: (Normed t, Num t) => t -> t -> Double 28dist :: (Normed t, Num t) => t -> t -> Double
29dist a b = norm (a-b) 29dist a b = norm (a-b)