Cliquer sur la flèche pour lancer l'animation

O = (0, 0)
I = (1, 0)
c = Circle(O, I)
t = 0.2 (slider from 0 to 2, step 0.1)
A = Rotate(I, 2 * π * t, O)
α = Angle(I, O, A)
a = Segment(O, I)
b = Segment(O, A)
e = Circle(A, 3)
B_1, B = Intersect(e, d)
f = Segment(A, B)
distanceOB = Distance(O, B)
TexteOB: Name[O] + (Name[B]) + " \, = \, " + distanceOB