let
gsl_vector_alloc = foreign
"gsl_vector_alloc"
(size_t @-> returning (ptr vec_struct))