From 5b6de561f131d75049fdb999e98a07939ec2e8e7 Mon Sep 17 00:00:00 2001 From: Alberto Ruiz Date: Sat, 24 May 2014 13:32:58 +0200 Subject: backward compatibility --- packages/base/src/Numeric/Sparse.hs | 6 +----- 1 file changed, 1 insertion(+), 5 deletions(-) (limited to 'packages/base/src/Numeric/Sparse.hs') diff --git a/packages/base/src/Numeric/Sparse.hs b/packages/base/src/Numeric/Sparse.hs index 1957d3a..2df4578 100644 --- a/packages/base/src/Numeric/Sparse.hs +++ b/packages/base/src/Numeric/Sparse.hs @@ -10,7 +10,7 @@ module Numeric.Sparse( smXv )where -import Numeric.Container +import Data.Packed.Numeric import qualified Data.Vector.Storable as V import Data.Function(on) import Control.Arrow((***)) @@ -133,10 +133,6 @@ instance Transposable SMatrix tr (CSC vs rs cs n m) = CSR vs rs cs m n tr (Diag v n m) = Diag v m n -instance Transposable (Matrix Double) - where - tr = trans - instance CGMat SMatrix instance CGMat (Matrix Double) -- cgit v1.2.3