mapFirstVector f v = mapFirstN (\i -> f (getVector v i)) (lengthVector v)
@inline
-containsVector :: Eq a => a -> Vector a -> Boolean
+containsVector :: a -> Vector a -> Boolean
containsVector x v = foldlN (\result i -> result || (v!i == x)) False (lengthVector v)
@inline