repeat : (n : Nat) -> a -> Vect n a