Rollkurve - Zykloide

Ortslinie von P

x_M = 4.9 (slider from 0 to 10, step 0.01)
A: (x_M, 0)
M: (x_M, 1)
pos = 0.6 (slider from 0 to 10, step 0.1)
P: (x_M + pos * sin(x_M), 1 + pos * cos(x_M))
B: (x_M + sin(x_M), 1 + cos(x_M))
c = Circle(M, B)
d = Circle(M, P)
B' = Rotate(B, 60*°, M)
B'' = Rotate(B', 60*°, M)
B''' = Rotate(B'', 60*°, M)
C = Rotate(B''', 60*°, M)
C' = Rotate(C, 60*°, M)
P' = Rotate(P, 60*°, M)
P'' = Rotate(P', 60*°, M)
P''' = Rotate(P'', 60*°, M)
D = Rotate(P''', 60*°, M)
D' = Rotate(D, 60*°, M)
E = (-1, 0)
F = (8, 0)
a = Line(E, F)
G = Point(a)
P_2: (x(G) + pos * sin(x(G)), 1 + pos * cos(x(G)))
Ortslinie1 = Locus(P_2, G)
b = true
e = Segment(M, P)