Merge pull request #490 from hidewrong/master

chore: remove repetitive words

Author: lehins

vector/src/Data/Vector.hs

@@ -998,7 +998,7 @@ accumulate :: (a -> b -> a)  -- ^ accumulating function @f@
 accumulate = G.accumulate
 
 -- | /O(m+min(n1,n2))/ For each index @i@ from the index vector and the
--- corresponding value @b@ from the the value vector,
+-- corresponding value @b@ from the value vector,
 -- replace the element of the initial vector at
 -- position @i@ by @f a b@.
 --

vector/src/Data/Vector/Generic.hs

@@ -926,7 +926,7 @@ accumulate :: (Vector v a, Vector v (Int, b))
 accumulate f v us = accum_stream f v (stream us)
 
 -- | /O(m+min(n1,n2))/ For each index @i@ from the index vector and the
--- corresponding value @b@ from the the value vector,
+-- corresponding value @b@ from the value vector,
 -- replace the element of the initial vector at
 -- position @i@ by @f a b@.
 --

vector/src/Data/Vector/Primitive.hs

@@ -802,7 +802,7 @@ accum :: Prim a
 accum = G.accum
 
 -- | /O(m+min(n1,n2))/ For each index @i@ from the index vector and the
--- corresponding value @b@ from the the value vector,
+-- corresponding value @b@ from the value vector,
 -- replace the element of the initial vector at
 -- position @i@ by @f a b@.
 --

vector/src/Data/Vector/Storable.hs

@@ -813,7 +813,7 @@ accum :: Storable a
 accum = G.accum
 
 -- | /O(m+min(n1,n2))/ For each index @i@ from the index vector and the
--- corresponding value @b@ from the the value vector,
+-- corresponding value @b@ from the value vector,
 -- replace the element of the initial vector at
 -- position @i@ by @f a b@.
 --

vector/src/Data/Vector/Strict.hs

@@ -1052,7 +1052,7 @@ accumulate :: (a -> b -> a)  -- ^ accumulating function @f@
 accumulate = G.accumulate
 
 -- | /O(m+min(n1,n2))/ For each index @i@ from the index vector and the
--- corresponding value @b@ from the the value vector,
+-- corresponding value @b@ from the value vector,
 -- replace the element of the initial vector at
 -- position @i@ by @f a b@.
 --

vector/src/Data/Vector/Unboxed.hs

@@ -808,7 +808,7 @@ accumulate :: (Unbox a, Unbox b)
 accumulate = G.accumulate
 
 -- | /O(m+min(n1,n2))/ For each index @i@ from the index vector and the
--- corresponding value @b@ from the the value vector,
+-- corresponding value @b@ from the value vector,
 -- replace the element of the initial vector at
 -- position @i@ by @f a b@.
 --