diff options
Diffstat (limited to 'lib/Data/Packed/Internal/Vector.hs')
-rw-r--r-- | lib/Data/Packed/Internal/Vector.hs | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/lib/Data/Packed/Internal/Vector.hs b/lib/Data/Packed/Internal/Vector.hs index 9557206..76bd4d1 100644 --- a/lib/Data/Packed/Internal/Vector.hs +++ b/lib/Data/Packed/Internal/Vector.hs | |||
@@ -103,9 +103,6 @@ at :: Storable a => Vector a -> Int -> a | |||
103 | at v n | n >= 0 && n < dim v = at' v n | 103 | at v n | n >= 0 && n < dim v = at' v n |
104 | | otherwise = error "vector index out of range" | 104 | | otherwise = error "vector index out of range" |
105 | 105 | ||
106 | instance (Show a, Storable a) => (Show (Vector a)) where | ||
107 | show v = (show (dim v))++" |> " ++ show (toList v) | ||
108 | |||
109 | {- | takes a number of consecutive elements from a Vector | 106 | {- | takes a number of consecutive elements from a Vector |
110 | 107 | ||
111 | @> subVector 2 3 (fromList [1..10]) | 108 | @> subVector 2 3 (fromList [1..10]) |