From 7e103b8ada6fa1479790eac80eda997f5fdaf33f Mon Sep 17 00:00:00 2001 From: Vivian McPhail Date: Tue, 7 Sep 2010 04:23:19 +0000 Subject: remove v_* functions --- lib/Numeric/Matrix.hs | 15 --------------- 1 file changed, 15 deletions(-) (limited to 'lib/Numeric/Matrix.hs') 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 double' = liftMatrix double' --------------------------------------------------------------- -{- -instance (RealElement e, Complexable Vector e) => Complexable Matrix e where - v_toComplex = uncurry $ liftMatrix2 $ curry toComplex - v_fromComplex z = (reshape c *** reshape c) . fromComplex . flatten $ z - where c = cols z - v_conj = liftMatrix conj - v_complex' = liftMatrix complex' - ---------------------------------------------------------------- - -instance (Precisionable Vector e) => Precisionable Matrix e where - v_single' = liftMatrix single' - v_double' = liftMatrix double' --} ---------------------------------------------------------------- instance (Linear Vector a, Container Matrix a) => Linear Matrix a where scale x = liftMatrix (scale x) -- cgit v1.2.3