(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))))