1 files changed, 3 insertions, 2 deletions

diff --git a/examples/oldtests.hs b/examples/oldtests.hs
index f60f4e2..7d4701c 100644
--- a/examples/oldtests.hs
+++ b/examples/oldtests.hs
@@ -1,5 +1,6 @@
 import Test.HUnit
-import GSLHaskell
+import LinearAlgebra
+import GSL hiding (exp)
 import System.Random(randomRs,mkStdGen)
 
 realMatrix = fromLists :: [[Double]] -> Matrix Double
@@ -8,7 +9,7 @@ realVector = fromList ::  [Double] -> Vector Double
 
 
 infixl 2 =~=
-a =~= b = pnorm 1 (flatten (a - b)) < 1E-6
+a =~= b = pnorm PNorm1 (flatten (a - b)) < 1E-6
 
 randomMatrix seed (n,m) = reshape m $ realVector $ take (n*m) $ randomRs (-100,100) $ mkStdGen seed