リサージュ曲線

A = Point(yAxis)
c = Circle(A, 1.0)
B = (4, 0)
d = Circle(B, 1.0)
a = 3 (slider from 1 to 10, step 1)
b = 4 (slider from 1 to 10, step 1)
t = 0.25 (slider from 0 to 6.283, step 0.01)
C = (1, 4)
D = (5, 0)
C' = Rotate(C, a * t, A)
D' = Rotate(D, b * t, B)
e = OrthogonalLine(C', xAxis)
f = OrthogonalLine(D', yAxis)
E = Intersect(f, e)
g = Segment(A, C')
h = Segment(B, D')
F: (x(B) + cos(b * t), 0.0)
多角形1, f_1, d', b_1 = Polygon(D', B, F)
α = Angle(C, A, C')
β = Angle(D, B, D')
G: (cos(a * t), 4.0)
多角形2, a_1, c', g_1 = Polygon(C', G, A)