f(x) = sin(x)
A = Point(f)
tA = Tangent(A, f)
ejY: x = 0
ejX: y = 0
vel: 1
g(x) = sin(x + x(A))
B: (0, y(A))
tB = Tangent(B, g)
animación = false
a: 40
l1 = Sequence(Segment[(k + pi / 2, (-a)), (k + pi / 2, a)], k, (-10 * pi), (10 * pi), pi)
c: y^(2) - x^(2) = 1
A0: (x(Corner[2, 1]), f(x(Corner[2, 1])))
reinicio = true