(bind-func static line_c
(lambda (x1:SAMPLE y1:SAMPLE x2:SAMPLE y2)
(let* ((zero:SAMPLE 0.0)
(m (if (= (- x2 x1) 0.0)
zero
(/ (- y2 y1) (- x2 x1))))
(c (- y2 (* m x2))))
(lambda (time) (+ (* m time) c)))))