;; low shelf (the works with both parametricEQ and busEQ)
(bind-func set_peq_lshelf
(lambda (peq:i8* cutoff:float gain:float Q:float)
(cset! (cast peq [void]*) lshelfG gain float)
(cset! (cast peq [void]*) lshelfF cutoff float)
(cset! (cast peq [void]*) lshelfQ Q float)))