r

A = Point(xAxis)
B = Point(xAxis)
AB = Segment(A, B)
M = Midpoint(A, B)
e = Semicircle(A, B)
R = Point(AB)
r = AffineRatio(B, R, A)
g = Circle(B, R)
h = Circle(A, AB / r^(2))
C_0 = Intersect(g, h, 2)
C = (-0.02728890099344201, 3.2317506984890527)
i = Segment(A, C)
j = Segment(C, B)
B' = Mirror(B, A)
A' = Rotate(A, (-(70°)), B)
c = CircleArc(B, A', A)
B'_{1} = Rotate(B, 90°, M)
f = Ray(M, B'_{1})
M' = Rotate(B, 90°, A)
l = Ray(A, M')
B'_{2} = Rotate(B, 100°, A)
d = CircleArc(A, B, B'_{2})
J = Rotate(B, 60°, A)
k = CircleArc(B, J, A)
t1, a, j_1, m = Polygon(J, M, A)
texte1: "r = " + r + ""