f(x) = 2.0 * sin(x)
a = 1.9 (slider from -5 to 5, step 0.1)
T: (a, f(a))
t1 = Line(T, Vector[(1.0, f'(a))])
t = Tangent(a, f)