/tmp/peaucellier

O = Intersect(xAxis, yAxis)
Z = Point(yAxis)
E_1 = Rotate(O, -60.5°, Z)
E_2 = Rotate(O, 60.5°, Z)
k_5 = CircleArc(Z, E_2, E_1)
k_4 = Circle(O, 3)
A = Point(k_5)
k_3 = Circle(A, 2)
a = Segment(Z, A)
C_2 = Intersect(k_4, k_3, 2)
b_2 = Segment(O, C_2)
c_2 = Segment(A, C_2)
C_1 = Intersect(k_4, k_3, 1)
b_1 = Segment(O, C_1)
c_1 = Segment(A, C_1)
k_1 = Circle(C_1, 2)
k_2 = Circle(C_2, 2)
B = Intersect(k_1, k_2, 2)
c_4 = Segment(B, C_2)
c_3 = Segment(B, C_1)