Mécanisme à leviers articulés à un élément animé d'un mouvement rectiligne progressif

A = Intersect(xAxis, yAxis)
c = Circle(A, 8)
B = Intersect(c, yAxis, 1)
d = Circle(A, 11.8)
e = Circle(A, 5.3)
C = Intersect(e, xAxis, 2)
f = Circle(C, 5.3)
D = Point(f)
g = Circle(D, 3.4)
E = Intersect(d, g, 1)
F = Intersect(d, g, 2)
a = Segment(A, C)
b = Segment(A, B)
h = Segment(C, D)
i = Segment(A, E)
j = Segment(E, D)
k = Segment(D, F)
l = Segment(A, F)
p = Circle(F, 3.4)
q = Circle(E, 3.4)
G = Intersect(p, q, 2)
m = Segment(E, G)
n = Segment(G, F)
r = Circle(E, 8)
s = Circle(G, 8)
t = Circle(B, 11.8)
H = Intersect(r, t, 1)
a_1 = Segment(E, H)
c_1 = Circle(H, 3.4)
I = Intersect(s, c_1, 1)
b_1 = Segment(G, I)
d_1 = Segment(I, H)
e_1 = Segment(H, B)