Permalink
Browse files

Remove overlapping instances

  • Loading branch information...
Shimuuar committed Aug 31, 2012
1 parent b19ab16 commit d310fb47dbcca93f71109fdd75a546edd1949b50
Showing with 0 additions and 13 deletions.
  1. +0 −13 Numeric/BLAS.hs
View
@@ -151,19 +151,6 @@ absIndex v
-----------------------------------------------------------------
--- Scalar x X
-----------------------------------------------------------------
-
-instance (BLAS1 a) => Scale S.Vector a where
- s *. v = eval $ Scale () s (Lit v)
- {-# INLINE (*.) #-}
-instance (BLAS1 a) => Scale V.Vector a where
- s *. v = eval $ Scale () s (Lit v)
- {-# INLINE (*.) #-}
-
-
-
----------------------------------------------------------------
-- Dot product
----------------------------------------------------------------

0 comments on commit d310fb4

Please sign in to comment.