(bind-func Vmk3 (lambda (a b c) (let ((v1 (Valloc 3))) (gsl_vector_set v1 0 a) (gsl_vector_set v1 1 b) (gsl_vector_set v1 2 c) v1)))