(bind-func vvmul (let ((i 0)) (lambda (v1:float* v2:float* len:i64 v3:float*) (dotimes (i len) (pset! v3 i (* (pref v1 i) (pref v2 i)))) void)))