Ühe liuguriga väntmehhanism

A = Intersect(xAxis, yAxis)
c = Circle(A, 4)
B = Point(c)
f = Segment(A, B)
d = Circle(B, 15)
C, D = Intersect(d, xAxis)
g = Segment(B, D)
e = Circle(D, 2)
E = Point(e)
F = Point(e)
h = OrthogonalLine(D, xAxis)
E' = Mirror(E, h)
F' = Mirror(F, h)
i = Segment(E, E')
j = Segment(F, F')
k = Segment(E, F)
l = Segment(E', F')
q1, e_1, e', f', f_1 = Polygon(E, E', F', F)