gen_sine produces a sine wave from an ftable ft. Note that ft is not a lambda here.
gen_sine
ft
(define (gen_sine ft) (param ft) (rvl "gen_sine"))