(bind-func init-osc-vars
(lambda ()
(let ((i 0))
(dotimes (i 20)
(pset! osc_xs i 100.0)
(pset! osc_ys i 100.0)
(pset! osc_xxs i 0.0)
(pset! osc_yys i 0.0)
(pset! osc_yys i 0.0)
(pset! osc_vols i 0.0)
(pset! osc_grads i 0.0)
(pset! osc_alive i 0)))))