From 0bdc40ca822e1b80089080da3fe03d0e31e7d927 Mon Sep 17 00:00:00 2001 From: Alberto Ruiz Date: Wed, 1 Jul 2015 08:46:05 +0200 Subject: minor fix --- packages/base/src/Internal/Matrix.hs | 1 - 1 file changed, 1 deletion(-) (limited to 'packages/base/src/Internal/Matrix.hs') diff --git a/packages/base/src/Internal/Matrix.hs b/packages/base/src/Internal/Matrix.hs index 5163421..a7fcb47 100644 --- a/packages/base/src/Internal/Matrix.hs +++ b/packages/base/src/Internal/Matrix.hs @@ -128,7 +128,6 @@ amat f x = inlinePerformIO (unsafeWith (xdat x) (return . f r c sr sc)) instance Storable t => TransArray (Matrix t) where - type Elem (Matrix t) = t type TransRaw (Matrix t) b = CInt -> CInt -> Ptr t -> b type Trans (Matrix t) b = CInt -> CInt -> CInt -> CInt -> Ptr t -> b apply = amat -- cgit v1.2.3