(bind-func static get_lfo_type
(lambda (inst:i8* lfo_num:i32)
(let ((krl (if (< lfo_num 4)
(cref (cast inst [void]*) effect_kernel [void]*)
(cref (cast inst [void]*) note_kernel [void]*)))
(lfo_types (cref krl lfo_types |4,i32|*)))
(aref lfo_types (% lfo_num 4)))))