Author: Michèle Sidobre

O = (-1.542825888781883, 2.39830446673087)
R = (0.92, 2.7800000000000002)
c = Circle(O, R)
O' = (2.54, 2.02)
c' = Circle(O', Distance[O, R])
B = Intersect(c, c', 1)
A = Intersect(c, c', 2)
I = Midpoint(O, O')
M = Point(c)
a = Line(M, B)
N = Intersect(c', a, 2)
N' = Mirror(N, I)
poly1, a_1, n, b, n' = Polygon(A, N, B, N')
α = Angle(A, M, B)
β = Angle(A, N', B)
d = Segment(M, A)
e = CircleArc(O, A, B)