-- Hoogle documentation, generated by Haddock -- See Hoogle, http://www.haskell.org/hoogle/ -- | Generic vectors with statically known size. -- -- Generic library for vectors with statically known size. Implementation -- is based on -- http://unlines.wordpress.com/2010/11/15/generics-for-small-fixed-size-vectors/ -- Same functions could be used to work with both ADT based vector like -- --
-- data Vec3 a = a a a ---- -- Tuples are vectors too: -- --
-- >>> sum (1,2,3) -- 6 ---- -- Vectors which are represented internally by arrays are provided by -- library. Both boxed and unboxed arrays are supported. -- -- Library is structured as follows: -- --
-- forall b. Fn n a b -> b ~ ContVecn n a --applyFunM :: (Arity n, Monad m) => (forall k. t (S k) -> m (a, t k)) -> t n -> m (ContVec n a, t Z) -- | Arity of function. arity :: Arity n => n -> Int -- | Reverse order of parameters. reverseF :: Arity n => Fun n a b -> Fun n a b -- | Uncurry n first parameters of n-ary function uncurryMany :: Arity n => Fun (Add n k) a b -> Fun n a (Fun k a b) -- | Worker function for gunfold gunfoldF :: (Arity n, Data a) => (forall b x. Data b => c (b -> x) -> c x) -> T_gunfold c r a n -> c r -- | Apply all parameters to the function. apply :: Arity n => (forall k. t (S k) -> (a, t k)) -> t n -> ContVec n a -- | Apply all parameters to the function using monadic actions. applyM :: (Monad m, Arity n) => (forall k. t (S k) -> m (a, t k)) -> t n -> m (ContVec n a) -- | Prepend ignored parameter to function constFun :: Fun n a b -> Fun (S n) a b -- | Curry first parameter of n-ary function curryFirst :: Fun (S n) a b -> a -> Fun n a b -- | Uncurry first parameter of n-ary function uncurryFirst :: (a -> Fun n a b) -> Fun (S n) a b -- | Curry last parameter of n-ary function curryLast :: Arity n => Fun (S n) a b -> Fun n a (a -> b) -- | Curry n first parameters of n-ary function curryMany :: forall n k a b. Arity n => Fun (Add n k) a b -> Fun n a (Fun k a b) -- | Apply last parameter to function. Unlike apFun we need to -- traverse all parameters but last hence Arity constraint. apLast :: Arity n => Fun (S n) a b -> a -> Fun n a b -- | Move function parameter to the result of N-ary function. shuffleFun :: Arity n => (b -> Fun n a r) -> Fun n a (b -> r) -- | Recursive step for the function withFun :: (Fun n a b -> Fun n a b) -> Fun (S n) a b -> Fun (S n) a b -- | Size of vector expressed as type-level natural. -- | Type class for vectors with fixed length. Instance should provide two -- functions: one to create vector and another for vector deconstruction. -- They must obey following law: -- --
-- inspect v construct = v --class Arity (Dim v) => Vector v a where basicIndex v i = index i (cvec v) -- | N-ary function for creation of vectors. construct :: Vector v a => Fun (Dim v) a (v a) -- | Deconstruction of vector. inspect :: Vector v a => v a -> Fun (Dim v) a b -> b -- | Optional more efficient implementation of indexing. Shouldn't be used -- directly, use ! instead. basicIndex :: Vector v a => v a -> Int -> a -- | Vector parametrized by length. In ideal world it should be: -- --
-- forall n. (Arity n, Vector (v n) a, Dim (v n) ~ n) => VectorN v a ---- -- Alas polymorphic constraints aren't allowed in haskell. class (Vector (v n) a, Dim (v n) ~ n) => VectorN v n a -- | Length of vector. Function doesn't evaluate its argument. length :: forall v a. Arity (Dim v) => v a -> Int -- | Type class for indexing of vector when index value is known at compile -- time. class Index k n getF :: Index k n => k -> Fun n a a putF :: Index k n => k -> a -> Fun n a r -> Fun n a r lensF :: (Index k n, Functor f) => k -> (a -> f a) -> Fun n a r -> Fun n a (f r) -- | Vector represented as continuation. Alternative wording: it's Church -- encoded N-element vector. newtype ContVec n a ContVec :: (forall r. Fun n a r -> r) -> ContVec n a -- | Convert regular vector to continuation based one. cvec :: (Vector v a, Dim v ~ n) => v a -> ContVec n a -- | Convert list to continuation-based vector. Will throw error if list is -- shorter than resulting vector. fromList :: Arity n => [a] -> ContVec n a -- | Same as fromList bu throws error is list doesn't have same -- length as vector. fromList' :: forall n a. Arity n => [a] -> ContVec n a -- | Convert list to continuation-based vector. Will fail with -- Nothing if list doesn't have right length. fromListM :: forall n a. Arity n => [a] -> Maybe (ContVec n a) -- | Convert vector to the list toList :: (Arity n) => ContVec n a -> [a] -- | Execute monadic action for every element of vector. Synonym for -- pure. replicate :: (Arity n) => a -> ContVec n a -- | Execute monadic action for every element of vector. replicateM :: (Arity n, Monad m) => m a -> m (ContVec n a) -- | Generate vector from function which maps element's index to its value. generate :: (Arity n) => (Int -> a) -> ContVec n a -- | Generate vector from monadic function which maps element's index to -- its value. generateM :: (Monad m, Arity n) => (Int -> m a) -> m (ContVec n a) -- | Unfold vector. unfoldr :: Arity n => (b -> (a, b)) -> b -> ContVec n a -- | Unit vector along Nth axis. basis :: (Num a, Arity n) => Int -> ContVec n a -- | Create empty vector. empty :: ContVec Z a -- | O(1) Prepend element to vector cons :: a -> ContVec n a -> ContVec (S n) a -- | Prepend single element vector to another vector. consV :: ContVec (S Z) a -> ContVec n a -> ContVec (S n) a -- | O(1) Append element to vector snoc :: Arity n => a -> ContVec n a -> ContVec (S n) a -- | Concatenate vector concat :: (Arity n, Arity k, Arity (Add n k)) => ContVec n a -> ContVec k a -> ContVec (Add n k) a mk1 :: a -> ContVec N1 a mk2 :: a -> a -> ContVec N2 a mk3 :: a -> a -> a -> ContVec N3 a mk4 :: a -> a -> a -> a -> ContVec N4 a mk5 :: a -> a -> a -> a -> a -> ContVec N5 a -- | Map over vector. Synonym for fmap map :: (Arity n) => (a -> b) -> ContVec n a -> ContVec n b -- | Apply function to every element of the vector and its index. imap :: (Arity n) => (Int -> a -> b) -> ContVec n a -> ContVec n b -- | Monadic map over vector. mapM :: (Arity n, Monad m) => (a -> m b) -> ContVec n a -> m (ContVec n b) -- | Apply monadic function to every element of the vector and its index. imapM :: (Arity n, Monad m) => (Int -> a -> m b) -> ContVec n a -> m (ContVec n b) -- | Apply monadic action to each element of vector and ignore result. mapM_ :: (Arity n, Monad m) => (a -> m b) -> ContVec n a -> m () -- | Apply monadic action to each element of vector and its index and -- ignore result. imapM_ :: (Arity n, Monad m) => (Int -> a -> m b) -> ContVec n a -> m () -- | Left scan over vector scanl :: (Arity n) => (b -> a -> b) -> b -> ContVec n a -> ContVec (S n) b -- | Left scan over vector scanl1 :: (Arity n) => (a -> a -> a) -> ContVec n a -> ContVec n a -- | Evaluate every action in the vector from left to right. sequence :: (Arity n, Monad m) => ContVec n (m a) -> m (ContVec n a) -- | Evaluate every action in the vector from left to right and ignore -- result. sequence_ :: (Arity n, Monad m) => ContVec n (m a) -> m () -- | The dual of sequenceA distribute :: (Functor f, Arity n) => f (ContVec n a) -> ContVec n (f a) collect :: (Functor f, Arity n) => (a -> ContVec n b) -> f a -> ContVec n (f b) -- | The dual of sequence distributeM :: (Monad m, Arity n) => m (ContVec n a) -> ContVec n (m a) collectM :: (Monad m, Arity n) => (a -> ContVec n b) -> m a -> ContVec n (m b) -- | O(1) Tail of vector. tail :: ContVec (S n) a -> ContVec n a -- | Reverse order of elements in the vector reverse :: Arity n => ContVec n a -> ContVec n a -- | Zip two vector together using function. zipWith :: (Arity n) => (a -> b -> c) -> ContVec n a -> ContVec n b -> ContVec n c -- | Zip three vectors together zipWith3 :: (Arity n) => (a -> b -> c -> d) -> ContVec n a -> ContVec n b -> ContVec n c -> ContVec n d -- | Zip two vector together using function which takes element index as -- well. izipWith :: (Arity n) => (Int -> a -> b -> c) -> ContVec n a -> ContVec n b -> ContVec n c -- | Zip three vectors together izipWith3 :: (Arity n) => (Int -> a -> b -> c -> d) -> ContVec n a -> ContVec n b -> ContVec n c -> ContVec n d -- | Zip two vector together using monadic function. zipWithM :: (Arity n, Monad m) => (a -> b -> m c) -> ContVec n a -> ContVec n b -> m (ContVec n c) zipWithM_ :: (Arity n, Monad m) => (a -> b -> m c) -> ContVec n a -> ContVec n b -> m () -- | Zip two vector together using monadic function which takes element -- index as well.. izipWithM :: (Arity n, Monad m) => (Int -> a -> b -> m c) -> ContVec n a -> ContVec n b -> m (ContVec n c) izipWithM_ :: (Arity n, Monad m) => (Int -> a -> b -> m c) -> ContVec n a -> ContVec n b -> m () -- | Run continuation vector. It's same as inspect but with -- arguments flipped. runContVec :: Fun n a r -> ContVec n a -> r -- | Finalizer function for getting head of the vector. head :: Arity (S n) => ContVec (S n) a -> a -- | O(n) Get value at specified index. index :: Arity n => Int -> ContVec n a -> a -- | Twan van Laarhoven lens for continuation based vector element :: (Arity n, Functor f) => Int -> (a -> f a) -> ContVec n a -> f (ContVec n a) -- | Twan van Laarhoven's lens for element of vector with statically known -- index. elementTy :: (Arity n, Index k n, Functor f) => k -> (a -> f a) -> ContVec n a -> f (ContVec n a) -- | Convert continuation to the vector. vector :: (Vector v a, Dim v ~ n) => ContVec n a -> v a -- | Left fold over continuation vector. foldl :: Arity n => (b -> a -> b) -> b -> ContVec n a -> b -- | Left fold. foldl1 :: (Arity (S n)) => (a -> a -> a) -> ContVec (S n) a -> a -- | Right fold over continuation vector foldr :: Arity n => (a -> b -> b) -> b -> ContVec n a -> b -- | Left fold over continuation vector. ifoldl :: Arity n => (b -> Int -> a -> b) -> b -> ContVec n a -> b -- | Right fold over continuation vector ifoldr :: Arity n => (Int -> a -> b -> b) -> b -> ContVec n a -> b -- | Monadic left fold over continuation vector. foldM :: (Arity n, Monad m) => (b -> a -> m b) -> b -> ContVec n a -> m b -- | Monadic left fold over continuation vector. ifoldM :: (Arity n, Monad m) => (b -> Int -> a -> m b) -> b -> ContVec n a -> m b -- | Sum all elements in the vector. sum :: (Num a, Arity n) => ContVec n a -> a -- | Minimal element of vector. minimum :: (Ord a, Arity (S n)) => ContVec (S n) a -> a -- | Maximal element of vector. maximum :: (Ord a, Arity (S n)) => ContVec (S n) a -> a -- | Conjunction of elements of a vector. and :: Arity n => ContVec n Bool -> Bool -- | Disjunction of all elements of a vector. or :: Arity n => ContVec n Bool -> Bool -- | Determines whether all elements of vector satisfy predicate. all :: Arity n => (a -> Bool) -> ContVec n a -> Bool -- | Determines whether any of element of vector satisfy predicate. any :: Arity n => (a -> Bool) -> ContVec n a -> Bool -- | The find function takes a predicate and a vector and returns -- the leftmost element of the vector matching the predicate, or -- Nothing if there is no such element. find :: Arity n => (a -> Bool) -> ContVec n a -> Maybe a -- | Generic gfoldl which could work with any vector. gfoldl :: forall c v a. (Vector v a, Data a) => (forall x y. Data x => c (x -> y) -> x -> c y) -> (forall x. x -> c x) -> v a -> c (v a) -- | Generic gunfoldl which could work with any vector. Since vector -- can only have one constructor argument for constructor is ignored. gunfold :: forall con c v a. (Vector v a, Data a) => (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> con -> c (v a) instance Data.Vector.Fixed.Cont.NatIso Data.Vector.Fixed.Cont.Z 0 instance (Data.Vector.Fixed.Cont.NatIso k (n GHC.TypeLits.- 1), Data.Vector.Fixed.Cont.ToPeano (n GHC.TypeLits.- 1) ~ k, Data.Vector.Fixed.Cont.ToPeano n ~ Data.Vector.Fixed.Cont.S k, n ~ (1 GHC.TypeLits.+ (n GHC.TypeLits.- 1))) => Data.Vector.Fixed.Cont.NatIso (Data.Vector.Fixed.Cont.S k) n instance Data.Vector.Fixed.Cont.Arity n => GHC.Base.Functor (Data.Vector.Fixed.Cont.Fun n a) instance Data.Vector.Fixed.Cont.Arity n => GHC.Base.Applicative (Data.Vector.Fixed.Cont.Fun n a) instance Data.Vector.Fixed.Cont.Arity n => GHC.Base.Monad (Data.Vector.Fixed.Cont.Fun n a) instance Data.Vector.Fixed.Cont.Arity Data.Vector.Fixed.Cont.Z instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Cont.Arity (Data.Vector.Fixed.Cont.S n) instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Cont.Index Data.Vector.Fixed.Cont.Z (Data.Vector.Fixed.Cont.S n) instance Data.Vector.Fixed.Cont.Index k n => Data.Vector.Fixed.Cont.Index (Data.Vector.Fixed.Cont.S k) (Data.Vector.Fixed.Cont.S n) instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Cont.Vector (Data.Vector.Fixed.Cont.ContVec n) a instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Cont.VectorN Data.Vector.Fixed.Cont.ContVec n a instance Data.Vector.Fixed.Cont.Arity n => GHC.Base.Functor (Data.Vector.Fixed.Cont.ContVec n) instance Data.Vector.Fixed.Cont.Arity n => GHC.Base.Applicative (Data.Vector.Fixed.Cont.ContVec n) instance Data.Vector.Fixed.Cont.Arity n => Data.Foldable.Foldable (Data.Vector.Fixed.Cont.ContVec n) instance Data.Vector.Fixed.Cont.Arity n => Data.Traversable.Traversable (Data.Vector.Fixed.Cont.ContVec n) instance GHC.Float.RealFloat a => Data.Vector.Fixed.Cont.Vector Data.Complex.Complex a instance b ~ a => Data.Vector.Fixed.Cont.Vector ((,) b) a instance (b ~ a, c ~ a) => Data.Vector.Fixed.Cont.Vector ((,,) b c) a instance (b ~ a, c ~ a, d ~ a) => Data.Vector.Fixed.Cont.Vector ((,,,) b c d) a instance (b ~ a, c ~ a, d ~ a, e ~ a) => Data.Vector.Fixed.Cont.Vector ((,,,,) b c d e) a instance (b ~ a, c ~ a, d ~ a, e ~ a, f ~ a) => Data.Vector.Fixed.Cont.Vector ((,,,,,) b c d e f) a instance (b ~ a, c ~ a, d ~ a, e ~ a, f ~ a, g ~ a) => Data.Vector.Fixed.Cont.Vector ((,,,,,,) b c d e f g) a instance Data.Vector.Fixed.Cont.Vector Data.Proxy.Proxy a -- | More generic version of function from Data.Vector.Fixed module. -- They do not require that all vector have same type, only same length. -- All such functions have suffix G. module Data.Vector.Fixed.Generic -- | Map over vector mapG :: (Vector v a, Vector w b, Dim v ~ Dim w) => (a -> b) -> v a -> w b -- | Apply function to every element of the vector and its index. imapG :: (Vector v a, Vector w b, Dim v ~ Dim w) => (Int -> a -> b) -> v a -> w b -- | Monadic map over vector. mapMG :: (Vector v a, Vector w b, Dim w ~ Dim v, Monad m) => (a -> m b) -> v a -> m (w b) -- | Monadic map over vector. imapMG :: (Vector v a, Vector w b, Dim w ~ Dim v, Monad m) => (Int -> a -> m b) -> v a -> m (w b) -- | Zip two vector together using function. zipWithG :: (Vector v a, Vector w b, Vector u c, Dim v ~ Dim u, Dim v ~ Dim w) => (a -> b -> c) -> v a -> w b -> u c -- | Zip two vector together using function which takes element index as -- well. izipWithG :: (Vector v a, Vector w b, Vector u c, Dim v ~ Dim u, Dim v ~ Dim w) => (Int -> a -> b -> c) -> v a -> w b -> u c -- | Zip two vector together using monadic function. zipWithMG :: (Vector v a, Vector w b, Vector u c, Dim v ~ Dim u, Dim v ~ Dim w, Monad m) => (a -> b -> m c) -> v a -> w b -> m (u c) -- | Zip two vector together using monadic function which takes element -- index as well.. izipWithMG :: (Vector v a, Vector w b, Vector u c, Dim v ~ Dim u, Dim v ~ Dim w, Monad m) => (Int -> a -> b -> m c) -> v a -> w b -> m (u c) -- | Type classes for vectors which are implemented on top of the arrays -- and support in-place mutation. API is similar to one used in the -- vector package. module Data.Vector.Fixed.Mutable -- | Type class for handling n-ary functions. class Arity n -- | Arity of function. arity :: Arity n => n -> Int -- | Arity of function. arity :: Arity n => n -> Int -- | Mutable counterpart of fixed-length vector. -- | Dimension for mutable vector. -- | Type class for mutable vectors. class (Arity (DimM v)) => MVector v a -- | Checks whether vectors' buffers overlaps overlaps :: MVector v a => v s a -> v s a -> Bool -- | Copy vector. The two vectors may not overlap. Since vectors' length is -- encoded in the type there is no need in runtime checks. copy :: (MVector v a, PrimMonad m) => v (PrimState m) a -> v (PrimState m) a -> m () -- | Copy vector. The two vectors may overlap. Since vectors' length is -- encoded in the type there is no need in runtime checks. move :: (MVector v a, PrimMonad m) => v (PrimState m) a -> v (PrimState m) a -> m () -- | Allocate new vector new :: (MVector v a, PrimMonad m) => m (v (PrimState m) a) -- | Read value at index without bound checks. unsafeRead :: (MVector v a, PrimMonad m) => v (PrimState m) a -> Int -> m a -- | Write value at index without bound checks. unsafeWrite :: (MVector v a, PrimMonad m) => v (PrimState m) a -> Int -> a -> m () -- | Length of mutable vector. Function doesn't evaluate its argument. lengthM :: forall v s a. (Arity (DimM v)) => v s a -> Int -- | Read value at index with bound checks. read :: (PrimMonad m, MVector v a) => v (PrimState m) a -> Int -> m a -- | Write value at index with bound checks. write :: (PrimMonad m, MVector v a) => v (PrimState m) a -> Int -> a -> m () -- | Create copy of vector. clone :: (PrimMonad m, MVector v a) => v (PrimState m) a -> m (v (PrimState m) a) -- | Type class for immutable vectors class (Dim v ~ DimM (Mutable v), MVector (Mutable v) a) => IVector v a -- | Convert vector to immutable state. Mutable vector must not be modified -- afterwards. unsafeFreeze :: (IVector v a, PrimMonad m) => Mutable v (PrimState m) a -> m (v a) -- | Convert immutable vector to mutable. Immutable vector must not be used -- afterwards. unsafeThaw :: (IVector v a, PrimMonad m) => v a -> m (Mutable v (PrimState m) a) -- | Get element at specified index without bounds check. unsafeIndex :: IVector v a => v a -> Int -> a index :: IVector v a => v a -> Int -> a -- | Length of immutable vector. Function doesn't evaluate its argument. lengthI :: IVector v a => v a -> Int -- | Safely convert mutable vector to immutable. freeze :: (PrimMonad m, IVector v a) => Mutable v (PrimState m) a -> m (v a) -- | Safely convert immutable vector to mutable. thaw :: (PrimMonad m, IVector v a) => v a -> m (Mutable v (PrimState m) a) -- | Generic construct implementation for array-based vectors. constructVec :: forall v a. (Arity (Dim v), IVector v a) => Fun (Dim v) a (v a) -- | Generic inspect implementation for array-based vectors. inspectVec :: forall v a b. (Arity (Dim v), IVector v a) => v a -> Fun (Dim v) a b -> b -- | Generic API for vectors with fixed length. -- -- For encoding of vector size library uses Peano naturals defined in the -- library. At come point in the future it would make sense to switch to -- new GHC type level numerals. -- --
-- >>> map (== 1) ((1,2) :: (Int,Int)) -- -- <interactive>:3:1: -- Couldn't match type `Int' with `Bool' -- In the expression: F.map (== 1) ((1, 2) :: (Int, Int)) -- In an equation for `it': it = map (== 1) ((1, 2) :: (Int, Int)) ---- -- To make it work we need to change vector type as well. Functions from -- module Data.Vector.Fixed.Generic provide this functionality. -- --
-- >>> map (== 1) ((1,2) :: (Int,Int)) :: (Bool,Bool) -- (True,False) --module Data.Vector.Fixed -- | Size of vector expressed as type-level natural. -- | Type level zero data Z -- | Successor of n data S n type N1 = S Z type N2 = S N1 type N3 = S N2 type N4 = S N3 type N5 = S N4 type N6 = S N5 -- | Type class for vectors with fixed length. Instance should provide two -- functions: one to create vector and another for vector deconstruction. -- They must obey following law: -- --
-- inspect v construct = v --class Arity (Dim v) => Vector v a where basicIndex v i = index i (cvec v) -- | N-ary function for creation of vectors. construct :: Vector v a => Fun (Dim v) a (v a) -- | Deconstruction of vector. inspect :: Vector v a => v a -> Fun (Dim v) a b -> b -- | Optional more efficient implementation of indexing. Shouldn't be used -- directly, use ! instead. basicIndex :: Vector v a => v a -> Int -> a -- | Vector parametrized by length. In ideal world it should be: -- --
-- forall n. (Arity n, Vector (v n) a, Dim (v n) ~ n) => VectorN v a ---- -- Alas polymorphic constraints aren't allowed in haskell. class (Vector (v n) a, Dim (v n) ~ n) => VectorN v n a -- | Type class for handling n-ary functions. class Arity n -- | Newtype wrapper which is used to make Fn injective. It's also a -- reader monad. newtype Fun n a b Fun :: Fn n a b -> Fun n a b [unFun] :: Fun n a b -> Fn n a b -- | Length of vector. Function doesn't evaluate its argument. length :: forall v a. Arity (Dim v) => v a -> Int mk0 :: (Vector v a, Dim v ~ Z) => v a mk1 :: (Vector v a, Dim v ~ N1) => a -> v a mk2 :: (Vector v a, Dim v ~ N2) => a -> a -> v a mk3 :: (Vector v a, Dim v ~ N3) => a -> a -> a -> v a mk4 :: (Vector v a, Dim v ~ N4) => a -> a -> a -> a -> v a mk5 :: (Vector v a, Dim v ~ N5) => a -> a -> a -> a -> a -> v a -- | Vector represented as continuation. Alternative wording: it's Church -- encoded N-element vector. data ContVec n a -- | Create empty vector. empty :: ContVec Z a -- | Convert continuation to the vector. vector :: (Vector v a, Dim v ~ n) => ContVec n a -> v a -- | Cons value to continuation based vector. (<|) :: a -> ContVec n a -> ContVec (S n) a infixr 1 <| -- | Type class for variadic vector constructors. class Make n a r -- | Variadic vector constructor. Resulting vector should be converted from -- ContVec using vector function. For example: -- --
-- >>> vector $ mkN 'a' 'b' 'c' :: (Char,Char,Char)
-- ('a','b','c')
--
mkN :: Make (S Z) a r => a -> r
-- | Replicate value n times.
--
-- Examples:
--
-- -- >>> import Data.Vector.Fixed.Boxed (Vec2) -- -- >>> replicate 1 :: Vec2 Int -- fromList [1,1] ---- --
-- >>> replicate 2 :: (Double,Double,Double) -- (2.0,2.0,2.0) ---- --
-- >>> import Data.Vector.Fixed.Boxed (Vec4) -- -- >>> replicate "foo" :: Vec4 String -- fromList ["foo","foo","foo","foo"] --replicate :: Vector v a => a -> v a -- | Execute monadic action for every element of vector. -- -- Examples: -- --
-- >>> import Data.Vector.Fixed.Boxed (Vec2,Vec3) -- -- >>> replicateM (Just 3) :: Maybe (Vec3 Int) -- Just fromList [3,3,3] -- -- >>> replicateM (putStrLn "Hi!") :: IO (Vec2 ()) -- Hi! -- Hi! -- fromList [(),()] --replicateM :: (Vector v a, Monad m) => m a -> m (v a) -- | Generate vector from function which maps element's index to its value. -- -- Examples: -- --
-- >>> import Data.Vector.Fixed.Unboxed (Vec4) -- -- >>> generate (^2) :: Vec4 Int -- fromList [0,1,4,9] --generate :: (Vector v a) => (Int -> a) -> v a -- | Generate vector from monadic function which maps element's index to -- its value. generateM :: (Monad m, Vector v a) => (Int -> m a) -> m (v a) -- | Unfold vector. unfoldr :: (Vector v a) => (b -> (a, b)) -> b -> v a -- | Unit vector along Nth axis. If index is larger than vector dimensions -- returns zero vector. -- -- Examples: -- --
-- >>> import Data.Vector.Fixed.Boxed (Vec3) -- -- >>> basis 0 :: Vec3 Int -- fromList [1,0,0] -- -- >>> basis 1 :: Vec3 Int -- fromList [0,1,0] -- -- >>> basis 3 :: Vec3 Int -- fromList [0,0,0] --basis :: (Vector v a, Num a) => Int -> v a -- | First element of vector. -- -- Examples: -- --
-- >>> import Data.Vector.Fixed.Boxed (Vec3) -- -- >>> let x = mk3 1 2 3 :: Vec3 Int -- -- >>> head x -- 1 --head :: (Vector v a, Dim v ~ S n) => v a -> a -- | Tail of vector. -- -- Examples: -- --
-- >>> import Data.Complex -- -- >>> tail (1,2,3) :: Complex Double -- 2.0 :+ 3.0 --tail :: (Vector v a, Vector w a, Dim v ~ S (Dim w)) => v a -> w a -- | Cons element to the vector cons :: (Vector v a, Vector w a, S (Dim v) ~ Dim w) => a -> v a -> w a -- | Append element to the vector snoc :: (Vector v a, Vector w a, S (Dim v) ~ Dim w) => a -> v a -> w a concat :: (Vector v a, Vector u a, Vector w a, (Add (Dim v) (Dim u)) ~ Dim w) => v a -> u a -> w a -- | Reverse order of elements in the vector reverse :: Vector v a => v a -> v a -- | Type class for indexing of vector when index value is known at compile -- time. class Index k n -- | Retrieve vector's element at index. Generic implementation is -- O(n) but more efficient one is used when possible. (!) :: (Vector v a) => v a -> Int -> a -- | Get element from vector at statically known index index :: (Vector v a, Index k (Dim v)) => v a -> k -> a -- | Set n'th element in the vector set :: (Vector v a, Index k (Dim v)) => k -> a -> v a -> v a -- | Twan van Laarhoven's lens for element of vector element :: (Vector v a, Functor f) => Int -> (a -> f a) -> (v a -> f (v a)) -- | Twan van Laarhoven's lens for element of vector with statically known -- index. elementTy :: (Vector v a, Index k (Dim v), Functor f) => k -> (a -> f a) -> (v a -> f (v a)) -- | Test two vectors for equality. -- -- Examples: -- --
-- >>> import Data.Vector.Fixed.Boxed (Vec2) -- -- >>> let v0 = basis 0 :: Vec2 Int -- -- >>> let v1 = basis 1 :: Vec2 Int -- -- >>> v0 `eq` v0 -- True -- -- >>> v0 `eq` v1 -- False --eq :: (Vector v a, Eq a) => v a -> v a -> Bool -- | Lexicographic ordering of two vectors. ord :: (Vector v a, Ord a) => v a -> v a -> Ordering -- | Map over vector map :: (Vector v a, Vector v b) => (a -> b) -> v a -> v b -- | Monadic map over vector. mapM :: (Vector v a, Vector v b, Monad m) => (a -> m b) -> v a -> m (v b) -- | Apply monadic action to each element of vector and ignore result. mapM_ :: (Vector v a, Monad m) => (a -> m b) -> v a -> m () -- | Apply function to every element of the vector and its index. imap :: (Vector v a, Vector v b) => (Int -> a -> b) -> v a -> v b -- | Apply monadic function to every element of the vector and its index. imapM :: (Vector v a, Vector v b, Monad m) => (Int -> a -> m b) -> v a -> m (v b) -- | Apply monadic function to every element of the vector and its index -- and discard result. imapM_ :: (Vector v a, Monad m) => (Int -> a -> m b) -> v a -> m () -- | Left scan over vector scanl :: (Vector v a, Vector w b, Dim w ~ S (Dim v)) => (b -> a -> b) -> b -> v a -> w b -- | Left scan over vector scanl1 :: (Vector v a) => (a -> a -> a) -> v a -> v a -- | Evaluate every action in the vector from left to right. sequence :: (Vector v a, Vector v (m a), Monad m) => v (m a) -> m (v a) -- | Evaluate every action in the vector from left to right and ignore -- result sequence_ :: (Vector v (m a), Monad m) => v (m a) -> m () -- | Analog of sequenceA from Traversable. sequenceA :: (Vector v a, Vector v (f a), Applicative f) => v (f a) -> f (v a) -- | Analog of traverse from Traversable. traverse :: (Vector v a, Vector v b, Applicative f) => (a -> f b) -> v a -> f (v b) distribute :: (Vector v a, Vector v (f a), Functor f) => f (v a) -> v (f a) collect :: (Vector v a, Vector v b, Vector v (f b), Functor f) => (a -> v b) -> f a -> v (f b) distributeM :: (Vector v a, Vector v (m a), Monad m) => m (v a) -> v (m a) collectM :: (Vector v a, Vector v b, Vector v (m b), Monad m) => (a -> v b) -> m a -> v (m b) -- | Left fold over vector foldl :: Vector v a => (b -> a -> b) -> b -> v a -> b -- | Right fold over vector foldr :: Vector v a => (a -> b -> b) -> b -> v a -> b -- | Left fold over vector foldl1 :: (Vector v a, Dim v ~ S n) => (a -> a -> a) -> v a -> a -- | Combine the elements of a structure using a monoid. Similar to -- fold fold :: (Vector v m, Monoid m) => v m -> m -- | Map each element of the structure to a monoid, and combine the -- results. Similar to foldMap foldMap :: (Vector v a, Monoid m) => (a -> m) -> v a -> m -- | Left fold over vector. Function is applied to each element and its -- index. ifoldl :: Vector v a => (b -> Int -> a -> b) -> b -> v a -> b -- | Right fold over vector ifoldr :: Vector v a => (Int -> a -> b -> b) -> b -> v a -> b -- | Monadic fold over vector. foldM :: (Vector v a, Monad m) => (b -> a -> m b) -> b -> v a -> m b -- | Left monadic fold over vector. Function is applied to each element and -- its index. ifoldM :: (Vector v a, Monad m) => (b -> Int -> a -> m b) -> b -> v a -> m b -- | Sum all elements in the vector. sum :: (Vector v a, Num a) => v a -> a -- | Maximal element of vector. -- -- Examples: -- --
-- >>> import Data.Vector.Fixed.Boxed (Vec3) -- -- >>> let x = mk3 1 2 3 :: Vec3 Int -- -- >>> maximum x -- 3 --maximum :: (Vector v a, Dim v ~ S n, Ord a) => v a -> a -- | Minimal element of vector. -- -- Examples: -- --
-- >>> import Data.Vector.Fixed.Boxed (Vec3) -- -- >>> let x = mk3 1 2 3 :: Vec3 Int -- -- >>> minimum x -- 1 --minimum :: (Vector v a, Dim v ~ S n, Ord a) => v a -> a -- | Conjunction of all elements of a vector. and :: (Vector v Bool) => v Bool -> Bool -- | Disjunction of all elements of a vector. or :: (Vector v Bool) => v Bool -> Bool -- | Determines whether all elements of vector satisfy predicate. all :: (Vector v a) => (a -> Bool) -> v a -> Bool -- | Determines whether any of element of vector satisfy predicate. any :: (Vector v a) => (a -> Bool) -> v a -> Bool -- | The find function takes a predicate and a vector and returns -- the leftmost element of the vector matching the predicate, or -- Nothing if there is no such element. find :: (Vector v a) => (a -> Bool) -> v a -> Maybe a -- | Zip two vector together using function. -- -- Examples: -- --
-- >>> import Data.Vector.Fixed.Boxed (Vec3) -- -- >>> let b0 = basis 0 :: Vec3 Int -- -- >>> let b1 = basis 1 :: Vec3 Int -- -- >>> let b2 = basis 2 :: Vec3 Int -- -- >>> let vplus x y = zipWith (+) x y -- -- >>> vplus b0 b1 -- fromList [1,1,0] -- -- >>> vplus b0 b2 -- fromList [1,0,1] -- -- >>> vplus b1 b2 -- fromList [0,1,1] --zipWith :: (Vector v a, Vector v b, Vector v c) => (a -> b -> c) -> v a -> v b -> v c -- | Zip three vector together zipWith3 :: (Vector v a, Vector v b, Vector v c, Vector v d) => (a -> b -> c -> d) -> v a -> v b -> v c -> v d -- | Zip two vector together using monadic function. zipWithM :: (Vector v a, Vector v b, Vector v c, Monad m) => (a -> b -> m c) -> v a -> v b -> m (v c) -- | Zip two vector elementwise using monadic function and discard result zipWithM_ :: (Vector v a, Vector v b, Monad m) => (a -> b -> m c) -> v a -> v b -> m () -- | Zip two vector together using function which takes element index as -- well. izipWith :: (Vector v a, Vector v b, Vector v c) => (Int -> a -> b -> c) -> v a -> v b -> v c -- | Zip three vector together izipWith3 :: (Vector v a, Vector v b, Vector v c, Vector v d) => (Int -> a -> b -> c -> d) -> v a -> v b -> v c -> v d -- | Zip two vector together using monadic function which takes element -- index as well.. izipWithM :: (Vector v a, Vector v b, Vector v c, Monad m) => (Int -> a -> b -> m c) -> v a -> v b -> m (v c) -- | Zip two vector elementwise using monadic function and discard result izipWithM_ :: (Vector v a, Vector v b, Vector v c, Monad m, Vector v (m c)) => (Int -> a -> b -> m c) -> v a -> v b -> m () -- | Default implementation of alignment for Storable type -- class for fixed vectors. defaultAlignemnt :: forall a v. Storable a => v a -> Int -- | Default implementation of sizeOf for Storable type class -- for fixed vectors defaultSizeOf :: forall a v. (Storable a, Vector v a) => v a -> Int -- | Default implementation of peek for Storable type class -- for fixed vector defaultPeek :: (Storable a, Vector v a) => Ptr (v a) -> IO (v a) -- | Default implementation of poke for Storable type class -- for fixed vector defaultPoke :: (Storable a, Vector v a) => Ptr (v a) -> v a -> IO () -- | Convert between different vector types convert :: (Vector v a, Vector w a, Dim v ~ Dim w) => v a -> w a -- | Convert vector to the list toList :: (Vector v a) => v a -> [a] -- | Create vector form list. Will throw error if list is shorter than -- resulting vector. fromList :: (Vector v a) => [a] -> v a -- | Create vector form list. Will throw error if list has different length -- from resulting vector. fromList' :: (Vector v a) => [a] -> v a -- | Create vector form list. Will return Nothing if list has -- different length from resulting vector. fromListM :: (Vector v a) => [a] -> Maybe (v a) -- | Create vector from Foldable data type. Will return -- Nothing if data type different number of elements that -- resulting vector. fromFoldable :: (Vector v a, Foldable f) => f a -> Maybe (v a) -- | Vector based on the lists. Not very useful by itself but is necessary -- for implementation. data VecList n a [Nil] :: VecList Z a [Cons] :: a -> VecList n a -> VecList (S n) a -- | Single-element tuple. newtype Only a Only :: a -> Only a -- | Empty tuple. data Empty a Empty :: Empty a type Tuple2 a = (a, a) type Tuple3 a = (a, a, a) type Tuple4 a = (a, a, a, a) type Tuple5 a = (a, a, a, a, a) instance Data.Data.Data a => Data.Data.Data (Data.Vector.Fixed.Empty a) instance Data.Data.Data a => Data.Data.Data (Data.Vector.Fixed.Only a) instance GHC.Classes.Ord a => GHC.Classes.Ord (Data.Vector.Fixed.Only a) instance GHC.Classes.Eq a => GHC.Classes.Eq (Data.Vector.Fixed.Only a) instance GHC.Show.Show a => GHC.Show.Show (Data.Vector.Fixed.Only a) instance (Data.Vector.Fixed.Cont.Arity n, Control.DeepSeq.NFData a) => Control.DeepSeq.NFData (Data.Vector.Fixed.VecList n a) instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Cont.Vector (Data.Vector.Fixed.VecList n) a instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Cont.VectorN Data.Vector.Fixed.VecList n a instance (GHC.Show.Show a, Data.Vector.Fixed.Cont.Arity n) => GHC.Show.Show (Data.Vector.Fixed.VecList n a) instance (GHC.Classes.Eq a, Data.Vector.Fixed.Cont.Arity n) => GHC.Classes.Eq (Data.Vector.Fixed.VecList n a) instance (GHC.Classes.Ord a, Data.Vector.Fixed.Cont.Arity n) => GHC.Classes.Ord (Data.Vector.Fixed.VecList n a) instance Data.Vector.Fixed.Cont.Arity n => GHC.Base.Functor (Data.Vector.Fixed.VecList n) instance Data.Vector.Fixed.Cont.Arity n => GHC.Base.Applicative (Data.Vector.Fixed.VecList n) instance Data.Vector.Fixed.Cont.Arity n => Data.Foldable.Foldable (Data.Vector.Fixed.VecList n) instance Data.Vector.Fixed.Cont.Arity n => Data.Traversable.Traversable (Data.Vector.Fixed.VecList n) instance (Data.Vector.Fixed.Cont.Arity n, GHC.Base.Monoid a) => GHC.Base.Monoid (Data.Vector.Fixed.VecList n a) instance (Foreign.Storable.Storable a, Data.Vector.Fixed.Cont.Arity n) => Foreign.Storable.Storable (Data.Vector.Fixed.VecList n a) instance GHC.Base.Functor Data.Vector.Fixed.Only instance Data.Foldable.Foldable Data.Vector.Fixed.Only instance Data.Traversable.Traversable Data.Vector.Fixed.Only instance GHC.Base.Monoid a => GHC.Base.Monoid (Data.Vector.Fixed.Only a) instance Control.DeepSeq.NFData a => Control.DeepSeq.NFData (Data.Vector.Fixed.Only a) instance Data.Vector.Fixed.Cont.Vector Data.Vector.Fixed.Only a instance Foreign.Storable.Storable a => Foreign.Storable.Storable (Data.Vector.Fixed.Only a) instance GHC.Base.Functor Data.Vector.Fixed.Empty instance Data.Foldable.Foldable Data.Vector.Fixed.Empty instance Data.Traversable.Traversable Data.Vector.Fixed.Empty instance Control.DeepSeq.NFData (Data.Vector.Fixed.Empty a) instance Data.Vector.Fixed.Cont.Vector Data.Vector.Fixed.Empty a -- | Vector which could hold any value. module Data.Vector.Fixed.Boxed -- | Vector with fixed length which can hold any value. data Vec n a type Vec1 = Vec (S Z) type Vec2 = Vec (S (S Z)) type Vec3 = Vec (S (S (S Z))) type Vec4 = Vec (S (S (S (S Z)))) type Vec5 = Vec (S (S (S (S (S Z))))) -- | Mutable unboxed vector with fixed length data MVec n s a instance (Data.Typeable.Internal.Typeable n, Data.Vector.Fixed.Cont.Arity n, Data.Data.Data a) => Data.Data.Data (Data.Vector.Fixed.Boxed.Vec n a) instance (Foreign.Storable.Storable a, Data.Vector.Fixed.Cont.Arity n) => Foreign.Storable.Storable (Data.Vector.Fixed.Boxed.Vec n a) instance (Data.Vector.Fixed.Cont.Arity n, GHC.Show.Show a) => GHC.Show.Show (Data.Vector.Fixed.Boxed.Vec n a) instance (Data.Vector.Fixed.Cont.Arity n, Control.DeepSeq.NFData a) => Control.DeepSeq.NFData (Data.Vector.Fixed.Boxed.Vec n a) instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Mutable.MVector (Data.Vector.Fixed.Boxed.MVec n) a instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Mutable.IVector (Data.Vector.Fixed.Boxed.Vec n) a instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Cont.Vector (Data.Vector.Fixed.Boxed.Vec n) a instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Cont.VectorN Data.Vector.Fixed.Boxed.Vec n a instance (Data.Vector.Fixed.Cont.Arity n, GHC.Classes.Eq a) => GHC.Classes.Eq (Data.Vector.Fixed.Boxed.Vec n a) instance (Data.Vector.Fixed.Cont.Arity n, GHC.Classes.Ord a) => GHC.Classes.Ord (Data.Vector.Fixed.Boxed.Vec n a) instance (Data.Vector.Fixed.Cont.Arity n, GHC.Base.Monoid a) => GHC.Base.Monoid (Data.Vector.Fixed.Boxed.Vec n a) instance Data.Vector.Fixed.Cont.Arity n => GHC.Base.Functor (Data.Vector.Fixed.Boxed.Vec n) instance Data.Vector.Fixed.Cont.Arity n => GHC.Base.Applicative (Data.Vector.Fixed.Boxed.Vec n) instance Data.Vector.Fixed.Cont.Arity n => Data.Foldable.Foldable (Data.Vector.Fixed.Boxed.Vec n) instance Data.Vector.Fixed.Cont.Arity n => Data.Traversable.Traversable (Data.Vector.Fixed.Boxed.Vec n) -- | Wrapper function for working with monomorphic vectors. Standard API -- require vector to be parametric in their element type making it -- impossible to work with vectors like -- --
-- data Vec3 = Vec3 Double Double Double ---- -- This module provides newtype wrapper which allows use of functions -- from Data.Vector.Fixed with such data types and function which -- works with such vectors. -- -- Functions have same meaning as ones from Data.Vector.Fixed and -- documented there. module Data.Vector.Fixed.Monomorphic -- | Dimensions of monomorphic vector. -- | Type level zero data Z -- | Successor of n data S n type N1 = S Z type N2 = S N1 type N3 = S N2 type N4 = S N3 type N5 = S N4 type N6 = S N5 -- | Counterpart of Vector type class for monomorphic vectors. class Arity (DimMono v) => VectorMono v where type VectorElm v :: * basicIndex v i = Mono v ! i where { type family VectorElm v :: *; } -- | Construct vector construct :: VectorMono v => Fun (DimMono v) (VectorElm v) v -- | Inspect vector inspect :: VectorMono v => v -> Fun (DimMono v) (VectorElm v) r -> r -- | Optional more efficient implementation of indexing basicIndex :: VectorMono v => v -> Int -> VectorElm v -- | Type class for handling n-ary functions. class Arity n -- | Newtype wrapper which is used to make Fn injective. It's also a -- reader monad. newtype Fun n a b Fun :: Fn n a b -> Fun n a b [unFun] :: Fun n a b -> Fn n a b -- | Length of vector length :: Arity (DimMono v) => v -> Int mk1 :: (VectorMono v, VectorElm v ~ a, DimMono v ~ N1) => a -> v mk2 :: (VectorMono v, VectorElm v ~ a, DimMono v ~ N2) => a -> a -> v mk3 :: (VectorMono v, VectorElm v ~ a, DimMono v ~ N3) => a -> a -> a -> v mk4 :: (VectorMono v, VectorElm v ~ a, DimMono v ~ N4) => a -> a -> a -> a -> v mk5 :: (VectorMono v, VectorElm v ~ a, DimMono v ~ N5) => a -> a -> a -> a -> a -> v replicate :: (VectorMono v, VectorElm v ~ a) => a -> v replicateM :: (VectorMono v, VectorElm v ~ a, Monad m) => m a -> m v generate :: (VectorMono v, VectorElm v ~ a) => (Int -> a) -> v generateM :: (Monad m, VectorMono v, VectorElm v ~ a) => (Int -> m a) -> m v unfoldr :: (VectorMono v, VectorElm v ~ a) => (b -> (a, b)) -> b -> v basis :: (VectorMono v, VectorElm v ~ a, Num a) => Int -> v head :: (VectorMono v, VectorElm v ~ a, DimMono v ~ S n) => v -> a tail :: (VectorMono v, VectorElm v ~ a, VectorMono w, VectorElm w ~ a, DimMono v ~ S (DimMono w)) => v -> w reverse :: (VectorMono v) => v -> v (!) :: (VectorMono v, VectorElm v ~ a) => v -> Int -> a eq :: (VectorMono v, VectorElm v ~ a, Eq a) => v -> v -> Bool map :: (VectorMono v, VectorElm v ~ a) => (a -> a) -> v -> v mapM :: (VectorMono v, VectorElm v ~ a, Monad m) => (a -> m a) -> v -> m v mapM_ :: (VectorMono v, VectorElm v ~ a, Monad m) => (a -> m b) -> v -> m () imap :: (VectorMono v, VectorElm v ~ a) => (Int -> a -> a) -> v -> v imapM :: (VectorMono v, VectorElm v ~ a, Monad m) => (Int -> a -> m a) -> v -> m v imapM_ :: (VectorMono v, VectorElm v ~ a, Monad m) => (Int -> a -> m b) -> v -> m () foldl :: (VectorMono v, VectorElm v ~ a) => (b -> a -> b) -> b -> v -> b foldr :: (VectorMono v, VectorElm v ~ a) => (a -> b -> b) -> b -> v -> b foldl1 :: (VectorMono v, VectorElm v ~ a, DimMono v ~ S n) => (a -> a -> a) -> v -> a ifoldl :: (VectorMono v, VectorElm v ~ a) => (b -> Int -> a -> b) -> b -> v -> b ifoldr :: (VectorMono v, VectorElm v ~ a) => (Int -> a -> b -> b) -> b -> v -> b fold :: (VectorMono v, Monoid (VectorElm v)) => v -> VectorElm v foldMap :: (VectorMono v, Monoid m) => (VectorElm v -> m) -> v -> m foldM :: (VectorMono v, VectorElm v ~ a, Monad m) => (b -> a -> m b) -> b -> v -> m b ifoldM :: (VectorMono v, VectorElm v ~ a, Monad m) => (b -> Int -> a -> m b) -> b -> v -> m b sum :: (VectorMono v, VectorElm v ~ a, Num a) => v -> a maximum :: (VectorMono v, VectorElm v ~ a, DimMono v ~ S n, Ord a) => v -> a minimum :: (VectorMono v, VectorElm v ~ a, DimMono v ~ S n, Ord a) => v -> a and :: (VectorMono v, VectorElm v ~ Bool) => v -> Bool or :: (VectorMono v, VectorElm v ~ Bool) => v -> Bool all :: (VectorMono v, VectorElm v ~ a) => (a -> Bool) -> v -> Bool any :: (VectorMono v, VectorElm v ~ a) => (a -> Bool) -> v -> Bool find :: (VectorMono v, VectorElm v ~ a) => (a -> Bool) -> v -> Maybe a zipWith :: (VectorMono v, VectorElm v ~ a) => (a -> a -> a) -> v -> v -> v zipWithM :: (VectorMono v, VectorElm v ~ a, Monad m) => (a -> a -> m a) -> v -> v -> m v izipWith :: (VectorMono v, VectorElm v ~ a) => (Int -> a -> a -> a) -> v -> v -> v izipWithM :: (VectorMono v, VectorElm v ~ a, Monad m) => (Int -> a -> a -> m a) -> v -> v -> m v convert :: (VectorMono v, VectorMono w, VectorElm v ~ VectorElm w, DimMono v ~ DimMono w) => v -> w toList :: (VectorMono v, VectorElm v ~ a) => v -> [a] fromList :: (VectorMono v, VectorElm v ~ a) => [a] -> v instance (Data.Vector.Fixed.Monomorphic.VectorMono v, a ~ Data.Vector.Fixed.Monomorphic.VectorElm v, Data.Vector.Fixed.Cont.Arity (Data.Vector.Fixed.Monomorphic.DimMono v)) => Data.Vector.Fixed.Cont.Vector (Data.Vector.Fixed.Monomorphic.Mono v) a -- | Unboxed vectors with fixed length. Vectors from -- Data.Vector.Fixed.Unboxed provide more flexibility at no -- performeance cost. module Data.Vector.Fixed.Primitive -- | Unboxed vector with fixed length data Vec n a type Vec1 = Vec (S Z) type Vec2 = Vec (S (S Z)) type Vec3 = Vec (S (S (S Z))) type Vec4 = Vec (S (S (S (S Z)))) type Vec5 = Vec (S (S (S (S (S Z))))) -- | Mutable unboxed vector with fixed length data MVec n s a -- | Class of types supporting primitive array operations class Prim a instance (Data.Vector.Fixed.Cont.Arity n, Data.Primitive.Types.Prim a, GHC.Show.Show a) => GHC.Show.Show (Data.Vector.Fixed.Primitive.Vec n a) instance (Data.Vector.Fixed.Cont.Arity n, Data.Primitive.Types.Prim a, Control.DeepSeq.NFData a) => Control.DeepSeq.NFData (Data.Vector.Fixed.Primitive.Vec n a) instance (Data.Vector.Fixed.Cont.Arity n, Data.Primitive.Types.Prim a) => Data.Vector.Fixed.Mutable.MVector (Data.Vector.Fixed.Primitive.MVec n) a instance (Data.Vector.Fixed.Cont.Arity n, Data.Primitive.Types.Prim a) => Data.Vector.Fixed.Mutable.IVector (Data.Vector.Fixed.Primitive.Vec n) a instance (Data.Vector.Fixed.Cont.Arity n, Data.Primitive.Types.Prim a) => Data.Vector.Fixed.Cont.Vector (Data.Vector.Fixed.Primitive.Vec n) a instance (Data.Vector.Fixed.Cont.Arity n, Data.Primitive.Types.Prim a) => Data.Vector.Fixed.Cont.VectorN Data.Vector.Fixed.Primitive.Vec n a instance (Data.Vector.Fixed.Cont.Arity n, Data.Primitive.Types.Prim a, GHC.Classes.Eq a) => GHC.Classes.Eq (Data.Vector.Fixed.Primitive.Vec n a) instance (Data.Vector.Fixed.Cont.Arity n, Data.Primitive.Types.Prim a, GHC.Classes.Ord a) => GHC.Classes.Ord (Data.Vector.Fixed.Primitive.Vec n a) instance (Data.Vector.Fixed.Cont.Arity n, Data.Primitive.Types.Prim a, GHC.Base.Monoid a) => GHC.Base.Monoid (Data.Vector.Fixed.Primitive.Vec n a) instance (Data.Typeable.Internal.Typeable n, Data.Vector.Fixed.Cont.Arity n, Data.Primitive.Types.Prim a, Data.Data.Data a) => Data.Data.Data (Data.Vector.Fixed.Primitive.Vec n a) instance (Foreign.Storable.Storable a, Data.Primitive.Types.Prim a, Data.Vector.Fixed.Cont.Arity n) => Foreign.Storable.Storable (Data.Vector.Fixed.Primitive.Vec n a) -- | Storable-based unboxed vectors. module Data.Vector.Fixed.Storable -- | Storable-based vector with fixed length data Vec n a type Vec1 = Vec (S Z) type Vec2 = Vec (S (S Z)) type Vec3 = Vec (S (S (S Z))) type Vec4 = Vec (S (S (S (S Z)))) type Vec5 = Vec (S (S (S (S (S Z))))) -- | Construct vector from foreign pointer. unsafeFromForeignPtr :: ForeignPtr a -> Vec n a -- | Get underlying pointer. Data may not be modified through pointer. unsafeToForeignPtr :: Vec n a -> ForeignPtr a unsafeWith :: (Ptr a -> IO b) -> Vec n a -> IO b -- | Storable-based mutable vector with fixed length newtype MVec n s a MVec :: (ForeignPtr a) -> MVec n s a -- | The member functions of this class facilitate writing values of -- primitive types to raw memory (which may have been allocated with the -- above mentioned routines) and reading values from blocks of raw -- memory. The class, furthermore, includes support for computing the -- storage requirements and alignment restrictions of storable types. -- -- Memory addresses are represented as values of type Ptr -- a, for some a which is an instance of class -- Storable. The type argument to Ptr helps provide some -- valuable type safety in FFI code (you can't mix pointers of different -- types without an explicit cast), while helping the Haskell type system -- figure out which marshalling method is needed for a given pointer. -- -- All marshalling between Haskell and a foreign language ultimately -- boils down to translating Haskell data structures into the binary -- representation of a corresponding data structure of the foreign -- language and vice versa. To code this marshalling in Haskell, it is -- necessary to manipulate primitive data types stored in unstructured -- memory blocks. The class Storable facilitates this manipulation -- on all types for which it is instantiated, which are the standard -- basic types of Haskell, the fixed size Int types -- (Int8, Int16, Int32, Int64), the fixed -- size Word types (Word8, Word16, Word32, -- Word64), StablePtr, all types from -- Foreign.C.Types, as well as Ptr. class Storable a instance (Data.Vector.Fixed.Cont.Arity n, Foreign.Storable.Storable a, GHC.Show.Show a) => GHC.Show.Show (Data.Vector.Fixed.Storable.Vec n a) instance (Data.Vector.Fixed.Cont.Arity n, Foreign.Storable.Storable a, Control.DeepSeq.NFData a) => Control.DeepSeq.NFData (Data.Vector.Fixed.Storable.Vec n a) instance (Data.Vector.Fixed.Cont.Arity n, Foreign.Storable.Storable a) => Data.Vector.Fixed.Mutable.MVector (Data.Vector.Fixed.Storable.MVec n) a instance (Data.Vector.Fixed.Cont.Arity n, Foreign.Storable.Storable a) => Data.Vector.Fixed.Mutable.IVector (Data.Vector.Fixed.Storable.Vec n) a instance (Data.Vector.Fixed.Cont.Arity n, Foreign.Storable.Storable a) => Data.Vector.Fixed.Cont.Vector (Data.Vector.Fixed.Storable.Vec n) a instance (Data.Vector.Fixed.Cont.Arity n, Foreign.Storable.Storable a) => Data.Vector.Fixed.Cont.VectorN Data.Vector.Fixed.Storable.Vec n a instance (Data.Vector.Fixed.Cont.Arity n, Foreign.Storable.Storable a, GHC.Classes.Eq a) => GHC.Classes.Eq (Data.Vector.Fixed.Storable.Vec n a) instance (Data.Vector.Fixed.Cont.Arity n, Foreign.Storable.Storable a, GHC.Classes.Ord a) => GHC.Classes.Ord (Data.Vector.Fixed.Storable.Vec n a) instance (Data.Vector.Fixed.Cont.Arity n, Foreign.Storable.Storable a, GHC.Base.Monoid a) => GHC.Base.Monoid (Data.Vector.Fixed.Storable.Vec n a) instance (Data.Vector.Fixed.Cont.Arity n, Foreign.Storable.Storable a) => Foreign.Storable.Storable (Data.Vector.Fixed.Storable.Vec n a) instance (Data.Typeable.Internal.Typeable n, Data.Vector.Fixed.Cont.Arity n, Foreign.Storable.Storable a, Data.Data.Data a) => Data.Data.Data (Data.Vector.Fixed.Storable.Vec n a) -- | Unboxed vectors with fixed length. module Data.Vector.Fixed.Unboxed type Vec1 = Vec (S Z) type Vec2 = Vec (S (S Z)) type Vec3 = Vec (S (S (S Z))) type Vec4 = Vec (S (S (S (S Z)))) type Vec5 = Vec (S (S (S (S (S Z))))) class (Arity n, IVector (Vec n) a, MVector (MVec n) a) => Unbox n a instance (Data.Vector.Fixed.Cont.Arity n, GHC.Show.Show a, Data.Vector.Fixed.Unboxed.Unbox n a) => GHC.Show.Show (Data.Vector.Fixed.Unboxed.Vec n a) instance (Data.Vector.Fixed.Cont.Arity n, Data.Vector.Fixed.Unboxed.Unbox n a, Control.DeepSeq.NFData a) => Control.DeepSeq.NFData (Data.Vector.Fixed.Unboxed.Vec n a) instance Data.Vector.Fixed.Unboxed.Unbox n a => Data.Vector.Fixed.Cont.Vector (Data.Vector.Fixed.Unboxed.Vec n) a instance Data.Vector.Fixed.Unboxed.Unbox n a => Data.Vector.Fixed.Cont.VectorN Data.Vector.Fixed.Unboxed.Vec n a instance (Data.Vector.Fixed.Unboxed.Unbox n a, GHC.Classes.Eq a) => GHC.Classes.Eq (Data.Vector.Fixed.Unboxed.Vec n a) instance (Data.Vector.Fixed.Unboxed.Unbox n a, GHC.Classes.Ord a) => GHC.Classes.Ord (Data.Vector.Fixed.Unboxed.Vec n a) instance (Data.Vector.Fixed.Unboxed.Unbox n a, GHC.Base.Monoid a) => GHC.Base.Monoid (Data.Vector.Fixed.Unboxed.Vec n a) instance (Data.Typeable.Internal.Typeable n, Data.Vector.Fixed.Unboxed.Unbox n a, Data.Data.Data a) => Data.Data.Data (Data.Vector.Fixed.Unboxed.Vec n a) instance (Foreign.Storable.Storable a, Data.Vector.Fixed.Unboxed.Unbox n a) => Foreign.Storable.Storable (Data.Vector.Fixed.Unboxed.Vec n a) instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Unboxed.Unbox n () instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Mutable.MVector (Data.Vector.Fixed.Unboxed.MVec n) () instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Mutable.IVector (Data.Vector.Fixed.Unboxed.Vec n) () instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Unboxed.Unbox n GHC.Types.Bool instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Mutable.MVector (Data.Vector.Fixed.Unboxed.MVec n) GHC.Types.Bool instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Mutable.IVector (Data.Vector.Fixed.Unboxed.Vec n) GHC.Types.Bool instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Unboxed.Unbox n GHC.Types.Int instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Mutable.MVector (Data.Vector.Fixed.Unboxed.MVec n) GHC.Types.Int instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Mutable.IVector (Data.Vector.Fixed.Unboxed.Vec n) GHC.Types.Int instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Unboxed.Unbox n GHC.Int.Int8 instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Mutable.MVector (Data.Vector.Fixed.Unboxed.MVec n) GHC.Int.Int8 instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Mutable.IVector (Data.Vector.Fixed.Unboxed.Vec n) GHC.Int.Int8 instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Unboxed.Unbox n GHC.Int.Int16 instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Mutable.MVector (Data.Vector.Fixed.Unboxed.MVec n) GHC.Int.Int16 instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Mutable.IVector (Data.Vector.Fixed.Unboxed.Vec n) GHC.Int.Int16 instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Unboxed.Unbox n GHC.Int.Int32 instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Mutable.MVector (Data.Vector.Fixed.Unboxed.MVec n) GHC.Int.Int32 instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Mutable.IVector (Data.Vector.Fixed.Unboxed.Vec n) GHC.Int.Int32 instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Unboxed.Unbox n GHC.Int.Int64 instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Mutable.MVector (Data.Vector.Fixed.Unboxed.MVec n) GHC.Int.Int64 instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Mutable.IVector (Data.Vector.Fixed.Unboxed.Vec n) GHC.Int.Int64 instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Unboxed.Unbox n GHC.Types.Word instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Mutable.MVector (Data.Vector.Fixed.Unboxed.MVec n) GHC.Types.Word instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Mutable.IVector (Data.Vector.Fixed.Unboxed.Vec n) GHC.Types.Word instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Unboxed.Unbox n GHC.Word.Word8 instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Mutable.MVector (Data.Vector.Fixed.Unboxed.MVec n) GHC.Word.Word8 instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Mutable.IVector (Data.Vector.Fixed.Unboxed.Vec n) GHC.Word.Word8 instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Unboxed.Unbox n GHC.Word.Word16 instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Mutable.MVector (Data.Vector.Fixed.Unboxed.MVec n) GHC.Word.Word16 instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Mutable.IVector (Data.Vector.Fixed.Unboxed.Vec n) GHC.Word.Word16 instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Unboxed.Unbox n GHC.Word.Word32 instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Mutable.MVector (Data.Vector.Fixed.Unboxed.MVec n) GHC.Word.Word32 instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Mutable.IVector (Data.Vector.Fixed.Unboxed.Vec n) GHC.Word.Word32 instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Unboxed.Unbox n GHC.Word.Word64 instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Mutable.MVector (Data.Vector.Fixed.Unboxed.MVec n) GHC.Word.Word64 instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Mutable.IVector (Data.Vector.Fixed.Unboxed.Vec n) GHC.Word.Word64 instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Unboxed.Unbox n GHC.Types.Char instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Mutable.MVector (Data.Vector.Fixed.Unboxed.MVec n) GHC.Types.Char instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Mutable.IVector (Data.Vector.Fixed.Unboxed.Vec n) GHC.Types.Char instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Unboxed.Unbox n GHC.Types.Float instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Mutable.MVector (Data.Vector.Fixed.Unboxed.MVec n) GHC.Types.Float instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Mutable.IVector (Data.Vector.Fixed.Unboxed.Vec n) GHC.Types.Float instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Unboxed.Unbox n GHC.Types.Double instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Mutable.MVector (Data.Vector.Fixed.Unboxed.MVec n) GHC.Types.Double instance Data.Vector.Fixed.Cont.Arity n => Data.Vector.Fixed.Mutable.IVector (Data.Vector.Fixed.Unboxed.Vec n) GHC.Types.Double instance Data.Vector.Fixed.Unboxed.Unbox n a => Data.Vector.Fixed.Unboxed.Unbox n (Data.Complex.Complex a) instance (Data.Vector.Fixed.Cont.Arity n, Data.Vector.Fixed.Mutable.MVector (Data.Vector.Fixed.Unboxed.MVec n) a) => Data.Vector.Fixed.Mutable.MVector (Data.Vector.Fixed.Unboxed.MVec n) (Data.Complex.Complex a) instance (Data.Vector.Fixed.Cont.Arity n, Data.Vector.Fixed.Mutable.IVector (Data.Vector.Fixed.Unboxed.Vec n) a) => Data.Vector.Fixed.Mutable.IVector (Data.Vector.Fixed.Unboxed.Vec n) (Data.Complex.Complex a) instance (Data.Vector.Fixed.Unboxed.Unbox n a, Data.Vector.Fixed.Unboxed.Unbox n b) => Data.Vector.Fixed.Unboxed.Unbox n (a, b) instance (Data.Vector.Fixed.Cont.Arity n, Data.Vector.Fixed.Mutable.MVector (Data.Vector.Fixed.Unboxed.MVec n) a, Data.Vector.Fixed.Mutable.MVector (Data.Vector.Fixed.Unboxed.MVec n) b) => Data.Vector.Fixed.Mutable.MVector (Data.Vector.Fixed.Unboxed.MVec n) (a, b) instance (Data.Vector.Fixed.Cont.Arity n, Data.Vector.Fixed.Mutable.IVector (Data.Vector.Fixed.Unboxed.Vec n) a, Data.Vector.Fixed.Mutable.IVector (Data.Vector.Fixed.Unboxed.Vec n) b) => Data.Vector.Fixed.Mutable.IVector (Data.Vector.Fixed.Unboxed.Vec n) (a, b) instance (Data.Vector.Fixed.Unboxed.Unbox n a, Data.Vector.Fixed.Unboxed.Unbox n b, Data.Vector.Fixed.Unboxed.Unbox n c) => Data.Vector.Fixed.Unboxed.Unbox n (a, b, c) instance (Data.Vector.Fixed.Cont.Arity n, Data.Vector.Fixed.Mutable.MVector (Data.Vector.Fixed.Unboxed.MVec n) a, Data.Vector.Fixed.Mutable.MVector (Data.Vector.Fixed.Unboxed.MVec n) b, Data.Vector.Fixed.Mutable.MVector (Data.Vector.Fixed.Unboxed.MVec n) c) => Data.Vector.Fixed.Mutable.MVector (Data.Vector.Fixed.Unboxed.MVec n) (a, b, c) instance (Data.Vector.Fixed.Cont.Arity n, Data.Vector.Fixed.Cont.Vector (Data.Vector.Fixed.Unboxed.Vec n) a, Data.Vector.Fixed.Cont.Vector (Data.Vector.Fixed.Unboxed.Vec n) b, Data.Vector.Fixed.Cont.Vector (Data.Vector.Fixed.Unboxed.Vec n) c, Data.Vector.Fixed.Mutable.IVector (Data.Vector.Fixed.Unboxed.Vec n) a, Data.Vector.Fixed.Mutable.IVector (Data.Vector.Fixed.Unboxed.Vec n) b, Data.Vector.Fixed.Mutable.IVector (Data.Vector.Fixed.Unboxed.Vec n) c) => Data.Vector.Fixed.Mutable.IVector (Data.Vector.Fixed.Unboxed.Vec n) (a, b, c)