vvsum   xtlang


Defined in:  https://github.com/digego/extempore/tree/v0.8.9/libs/core/math.xtm

Implementation

(bind-func vvsum
  (let ((i 0))
    (lambda (v1:double* v2:double* len:i64 result:double*)
      (dotimes (i len)
        (pset! result i (+ (pref v1 i) (pref v2 i))))
      void)))


Back to Index

Similar Entries