Mécanisme A Leviers Articulés De Hart Destiné Au Tracé Des Ellipses

A = Intersect(xAxis, yAxis)
c = Circle(A, 10)
d = Circle(A, 7.071067811865475)
G, Y = Intersect(d, xAxis)
f = Circle(A, 5)
C = Point(c)
a = Segment(A, C)
E = Intersect(f, a, 1)
g = Circle(E, 5)
e = Circle(C, 10)
X, B = Intersect(e, yAxis)
b = Segment(B, C)
k = Circle(G, 7.071067811865475)
H, D = Intersect(g, k)
i = Ray(G, D)
p = Circle(D, 7.071067811865475)
J, F = Intersect(p, i)
h = Segment(B, F)
j = Segment(D, E)
l = Segment(G, F)
I = Point(b)