;; high mid (the works with both parametricEQ and busEQ)
(bind-func set_peq_hmid
(lambda (peq:i8* cutoff:float gain:float Q:float)
(cset! (cast peq [void]*) hmidG gain float)
(cset! (cast peq [void]*) hmidF cutoff float)
(cset! (cast peq [void]*) hmidQ Q float)))