From 3aa140213de434ab6ee6736142fd54c967f34ee9 Mon Sep 17 00:00:00 2001
From: Alberto Ruiz <aruiz@um.es>
Date: Fri, 10 Apr 2015 10:00:43 +0200
Subject: fix tests

---
 packages/tests/src/Numeric/LinearAlgebra/Tests/Properties.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'packages/tests/src/Numeric/LinearAlgebra/Tests')

diff --git a/packages/tests/src/Numeric/LinearAlgebra/Tests/Properties.hs b/packages/tests/src/Numeric/LinearAlgebra/Tests/Properties.hs
index d9645c3..941f747 100644
--- a/packages/tests/src/Numeric/LinearAlgebra/Tests/Properties.hs
+++ b/packages/tests/src/Numeric/LinearAlgebra/Tests/Properties.hs
@@ -1,6 +1,6 @@
 {-# LANGUAGE CPP, FlexibleContexts #-}
 {-# OPTIONS_GHC -fno-warn-unused-imports #-}
-{-# LANGUAGE GADTs #-}
+{-# LANGUAGE TypeFamilies #-}
 
 -----------------------------------------------------------------------------
 {- |
@@ -272,5 +272,5 @@ linearSolveProp2 f (a,x) = not wc `trivial` (not wc || a <> f a b |~| b)
           b = a <> x
           wc = rank a == q
 
-subProp m = m == (tr . fromColumns . toRows) m
+subProp m = m == (conj . tr . fromColumns . toRows) m
 
-- 
cgit v1.2.3