Commits

Aleksey Khudyakov committed ce2c100

Add mkN for ordinary vectors.

It require explicit type annotations

  • Participants
  • Parent commits 52de681
  • Branches version-0.5

Comments (0)

Files changed (1)

Data/Vector/Fixed/Internal.hs

 mk5 a1 a2 a3 a4 a5 = C.vector $ C.mk5 a1 a2 a3 a4 a5
 {-# INLINE mk5 #-}
 
+mkN :: (Vector v a, n ~ Dim v) => Fun n a (v a)
+mkN = fmap C.vector C.mkN
+{-# INLINE mkN #-}
 
 
 ----------------------------------------------------------------