Vmk4   xtlang


Defined in:  https://github.com/digego/extempore/tree/v0.8.9/libs/contrib/gsl.xtm

Implementation

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


Back to Index