Elongation angulaire (x10 rad)

Temps (s)

Action !

1

2

3

4

5

6

7

t = 0 (slider from 0 to 6, step 0.1)
α: 3.62 * t
a: 2.09 * sin(α)
M: (t, a)
A = Point(xAxis)
b = OrthogonalLine(A, xAxis)
B = Point(b)
d = Circle(B, 3.0)
γ: a / 10.0
β: γ
E: (-1.0 * 4.0 + 3.0 * cos(γ - 3.141592653589793 / 2.0), 3.0 + 3.0 * sin(γ - 3.141592653589793 / 2.0))
c = Segment(B, E)