(bind-func set_noise_amp (lambda (inst:i8* val:float) (let ((note (cref (cast inst [void]*) note_kernel [void]*))) (cset! note noise_amp val float) void)))