Vmk   xtlang


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

Implementation

;; make a vector from an array of doubles
;; number of doubles is elements
(bind-func Vmk
  (lambda (ptr:double* elements:size_t)
    (let ((v1 (Valloc elements))
    (i:size_t 0))
      (dotimes (i elements)
  (gsl_vector_set v1 i (pref ptr i)))
      v1)))


Back to Index

Similar Entries

  • Vmk3    xtlang
  • Vmk4    xtlang