summaryrefslogtreecommitdiff
path: root/lib/Numeric/Matrix.hs
diff options
context:
space:
mode:
Diffstat (limited to 'lib/Numeric/Matrix.hs')
-rw-r--r--lib/Numeric/Matrix.hs15
1 files changed, 0 insertions, 15 deletions
diff --git a/lib/Numeric/Matrix.hs b/lib/Numeric/Matrix.hs
index 73515c1..fa3f94a 100644
--- a/lib/Numeric/Matrix.hs
+++ b/lib/Numeric/Matrix.hs
@@ -88,21 +88,6 @@ instance NumericContainer Matrix where
88 double' = liftMatrix double' 88 double' = liftMatrix double'
89 89
90--------------------------------------------------------------- 90---------------------------------------------------------------
91{-
92instance (RealElement e, Complexable Vector e) => Complexable Matrix e where
93 v_toComplex = uncurry $ liftMatrix2 $ curry toComplex
94 v_fromComplex z = (reshape c *** reshape c) . fromComplex . flatten $ z
95 where c = cols z
96 v_conj = liftMatrix conj
97 v_complex' = liftMatrix complex'
98
99---------------------------------------------------------------
100
101instance (Precisionable Vector e) => Precisionable Matrix e where
102 v_single' = liftMatrix single'
103 v_double' = liftMatrix double'
104-}
105---------------------------------------------------------------
106 91
107instance (Linear Vector a, Container Matrix a) => Linear Matrix a where 92instance (Linear Vector a, Container Matrix a) => Linear Matrix a where
108 scale x = liftMatrix (scale x) 93 scale x = liftMatrix (scale x)