(bind-func static hpfbq_mc_c
(lambda (channels:i64)
(let ((lines:[SAMPLE,SAMPLE,SAMPLE,SAMPLE]** (alloc channels))
(i:i64 0))
(dotimes (i channels) (pset! lines i (hpfbq_c)))
(lambda (chan:i64 x freq res)
(let ((f (pref lines chan)))
(f x freq res))))))