(bind-func analogue_get_mod_matrix
(lambda (inst:i8* src:enum dst:enum)
(let ((krl (cref (cast inst [void]*) effect_kernel [void]*))
(mod_matrix (krl.mod_matrix:|4,|32,SAMPLE||*)))
(if (< dst 32)
(aref (aref-ptr mod_matrix src) dst)
0.0))))