Rename iterate -> iterateN
authorRoman Leshchinskiy <rl@cse.unsw.edu.au>
Tue, 31 May 2011 21:02:06 +0000 (21:02 +0000)
committerRoman Leshchinskiy <rl@cse.unsw.edu.au>
Tue, 31 May 2011 21:02:06 +0000 (21:02 +0000)
Data/Vector.hs
Data/Vector/Fusion/Stream.hs
Data/Vector/Fusion/Stream/Monadic.hs
Data/Vector/Generic.hs
Data/Vector/Primitive.hs
Data/Vector/Storable.hs
Data/Vector/Unboxed.hs

index 7951df9..821e953 100644 (file)
@@ -46,7 +46,7 @@ module Data.Vector (
   -- * Construction
 
   -- ** Initialisation
-  empty, singleton, replicate, generate, iterate,
+  empty, singleton, replicate, generate, iterateN,
 
   -- ** Monadic initialisation
   replicateM, generateM, create,
@@ -168,7 +168,7 @@ import Prelude hiding ( length, null,
                         filter, takeWhile, dropWhile, span, break,
                         elem, notElem,
                         foldl, foldl1, foldr, foldr1,
-                        all, any, and, or, sum, product, minimum, maximum, iterate,
+                        all, any, and, or, sum, product, minimum, maximum,
                         scanl, scanl1, scanr, scanr1,
                         enumFromTo, enumFromThenTo,
                         mapM, mapM_, sequence, sequence_ )
@@ -460,9 +460,9 @@ generate :: Int -> (Int -> a) -> Vector a
 generate = G.generate
 
 -- | /O(n)/ Apply function n times to value. Zeroth element is original value.
-iterate :: Int -> (a -> a) -> a -> Vector a
-{-# INLINE iterate #-}
-iterate = G.iterate
+iterateN :: Int -> (a -> a) -> a -> Vector a
+{-# INLINE iterateN #-}
+iterateN = G.iterateN
 
 -- Unfolding
 -- ---------
index cd8187c..52998d1 100644 (file)
@@ -55,7 +55,7 @@ module Data.Vector.Fusion.Stream (
   and, or,
 
   -- * Unfolding
-  unfoldr, unfoldrN, iterate,
+  unfoldr, unfoldrN, iterateN,
 
   -- * Scans
   prescanl, prescanl',
@@ -90,7 +90,6 @@ import Prelude hiding ( length, null,
                         elem, notElem,
                         foldl, foldl1, foldr, foldr1,
                         and, or,
-                        iterate,
                         scanl, scanl1,
                         enumFromTo, enumFromThenTo,
                         mapM, mapM_ )
@@ -420,9 +419,9 @@ unfoldrN :: Int -> (s -> Maybe (a, s)) -> s -> Stream a
 unfoldrN = M.unfoldrN
 
 -- | Apply function n-1 times to value. Zeroth element is original value.
-iterate :: Int -> (a -> a) -> a -> Stream a
-{-# INLINE iterate #-}
-iterate = M.iterate
+iterateN :: Int -> (a -> a) -> a -> Stream a
+{-# INLINE iterateN #-}
+iterateN = M.iterateN
 
 -- Scans
 -- -----
index 7e26a1a..55cd2d7 100644 (file)
@@ -56,7 +56,7 @@ module Data.Vector.Fusion.Stream.Monadic (
   -- * Unfolding
   unfoldr, unfoldrM,
   unfoldrN, unfoldrNM,
-  iterate, iterateM,
+  iterateN, iterateNM,
 
   -- * Scans
   prescanl, prescanlM, prescanl', prescanlM',
@@ -87,7 +87,6 @@ import Prelude hiding ( length, null,
                         elem, notElem,
                         foldl, foldl1, foldr, foldr1,
                         and, or,
-                        iterate,
                         scanl, scanl1,
                         enumFromTo, enumFromThenTo )
 
@@ -996,9 +995,9 @@ unfoldrNM n f s = Stream step (s,n) (Max (delay_inline max n 0))
                              ) (f s)
 
 -- | Apply monadic function n times to value. Zeroth element is original value.
-iterateM :: Monad m => Int -> (a -> m a) -> a -> Stream m a
-{-# INLINE_STREAM iterateM #-}
-iterateM n f x0 = Stream step (x0,n) (Exact (delay_inline max n 0))
+iterateNM :: Monad m => Int -> (a -> m a) -> a -> Stream m a
+{-# INLINE_STREAM iterateNM #-}
+iterateNM n f x0 = Stream step (x0,n) (Exact (delay_inline max n 0))
   where
     {-# INLINE_INNER step #-}
     step (x,i) | i <= 0    = return Done
@@ -1007,9 +1006,9 @@ iterateM n f x0 = Stream step (x0,n) (Exact (delay_inline max n 0))
                                 return $ Yield a (a,i-1)
 
 -- | Apply function n times to value. Zeroth element is original value.
-iterate :: Monad m => Int -> (a -> a) -> a -> Stream m a
-{-# INLINE_STREAM iterate #-}
-iterate n f x0 = iterateM n (return . f) x0
+iterateN :: Monad m => Int -> (a -> a) -> a -> Stream m a
+{-# INLINE_STREAM iterateN #-}
+iterateN n f x0 = iterateNM n (return . f) x0
 
 -- Scans
 -- -----
index daf27ae..fd97d42 100644 (file)
@@ -36,7 +36,7 @@ module Data.Vector.Generic (
   -- * Construction
 
   -- ** Initialisation
-  empty, singleton, replicate, generate, iterate,
+  empty, singleton, replicate, generate, iterateN,
 
   -- ** Monadic initialisation
   replicateM, generateM, create,
@@ -183,7 +183,7 @@ import Prelude hiding ( length, null,
                         filter, takeWhile, dropWhile, span, break,
                         elem, notElem,
                         foldl, foldl1, foldr, foldr1,
-                        all, any, and, or, sum, product, maximum, minimum, iterate,
+                        all, any, and, or, sum, product, maximum, minimum,
                         scanl, scanl1, scanr, scanr1,
                         enumFromTo, enumFromThenTo,
                         mapM, mapM_, sequence, sequence_ )
@@ -516,9 +516,9 @@ generate :: Vector v a => Int -> (Int -> a) -> v a
 generate n f = unstream (Stream.generate n f)
 
 -- | /O(n)/ Apply function n times to value. Zeroth element is original value.
-iterate :: Vector v a => Int -> (a -> a) -> a -> v a
-{-# INLINE iterate #-}
-iterate n f x = unstream (Stream.iterate n f x)
+iterateN :: Vector v a => Int -> (a -> a) -> a -> v a
+{-# INLINE iterateN #-}
+iterateN n f x = unstream (Stream.iterateN n f x)
 
 -- Unfolding
 -- ---------
index 3195097..022cec6 100644 (file)
@@ -39,7 +39,7 @@ module Data.Vector.Primitive (
   -- * Construction
 
   -- ** Initialisation
-  empty, singleton, replicate, generate, iterate,
+  empty, singleton, replicate, generate, iterateN,
 
   -- ** Monadic initialisation
   replicateM, generateM, create,
@@ -152,7 +152,7 @@ import Prelude hiding ( length, null,
                         filter, takeWhile, dropWhile, span, break,
                         elem, notElem,
                         foldl, foldl1, foldr, foldr1,
-                        all, any, sum, product, minimum, maximum, iterate,
+                        all, any, sum, product, minimum, maximum,
                         scanl, scanl1, scanr, scanr1,
                         enumFromTo, enumFromThenTo,
                         mapM, mapM_ )
@@ -455,9 +455,9 @@ generate :: Prim a => Int -> (Int -> a) -> Vector a
 generate = G.generate
 
 -- | /O(n)/ Apply function n times to value. Zeroth element is original value.
-iterate :: Prim a => Int -> (a -> a) -> a -> Vector a
-{-# INLINE iterate #-}
-iterate = G.iterate
+iterateN :: Prim a => Int -> (a -> a) -> a -> Vector a
+{-# INLINE iterateN #-}
+iterateN = G.iterateN
 
 -- Unfolding
 -- ---------
index 19f8fb8..0b8d0cb 100644 (file)
@@ -36,7 +36,7 @@ module Data.Vector.Storable (
   -- * Construction
 
   -- ** Initialisation
-  empty, singleton, replicate, generate, iterate,
+  empty, singleton, replicate, generate, iterateN,
 
   -- ** Monadic initialisation
   replicateM, generateM, create,
@@ -155,7 +155,7 @@ import Prelude hiding ( length, null,
                         filter, takeWhile, dropWhile, span, break,
                         elem, notElem,
                         foldl, foldl1, foldr, foldr1,
-                        all, any, and, or, sum, product, minimum, maximum, iterate,
+                        all, any, and, or, sum, product, minimum, maximum,
                         scanl, scanl1, scanr, scanr1,
                         enumFromTo, enumFromThenTo,
                         mapM, mapM_ )
@@ -464,9 +464,9 @@ generate :: Storable a => Int -> (Int -> a) -> Vector a
 generate = G.generate
 
 -- | /O(n)/ Apply function n times to value. Zeroth element is original value.
-iterate :: Storable a => Int -> (a -> a) -> a -> Vector a
-{-# INLINE iterate #-}
-iterate = G.iterate
+iterateN :: Storable a => Int -> (a -> a) -> a -> Vector a
+{-# INLINE iterateN #-}
+iterateN = G.iterateN
 
 -- Unfolding
 -- ---------
index b9f89bd..aca9109 100644 (file)
@@ -59,7 +59,7 @@ module Data.Vector.Unboxed (
   -- * Construction
 
   -- ** Initialisation
-  empty, singleton, replicate, generate, iterate,
+  empty, singleton, replicate, generate, iterateN,
 
   -- ** Monadic initialisation
   replicateM, generateM, create,
@@ -177,7 +177,7 @@ import Prelude hiding ( length, null,
                         filter, takeWhile, dropWhile, span, break,
                         elem, notElem,
                         foldl, foldl1, foldr, foldr1,
-                        all, any, and, or, sum, product, minimum, maximum, iterate,
+                        all, any, and, or, sum, product, minimum, maximum,
                         scanl, scanl1, scanr, scanr1,
                         enumFromTo, enumFromThenTo,
                         mapM, mapM_ )
@@ -434,9 +434,9 @@ generate :: Unbox a => Int -> (Int -> a) -> Vector a
 generate = G.generate
 
 -- | /O(n)/ Apply function n times to value. Zeroth element is original value.
-iterate :: Unbox a => Int -> (a -> a) -> a -> Vector a
-{-# INLINE iterate #-}
-iterate = G.iterate
+iterateN :: Unbox a => Int -> (a -> a) -> a -> Vector a
+{-# INLINE iterateN #-}
+iterateN = G.iterateN
 
 -- Unfolding
 -- ---------