A = (-1.3996242341165337, 0.6152041127921344)
M = Point(g)
i = OrthogonalLine(M, g)
A' = Mirror(A, i)
M'_1 = Mirror(M, i)
f' = Ray(M'_1, A')
m = OrthogonalLine(A, i)
G = Intersect(m, f')
B = Point(m)
R = 2.2 (slider from 0.1 to 3, step 0.1)
p = Circle(M, R)
M', E = Intersect(p, g)
L': Distance[A, M'] + Distance[M', B]
L: Distance[A, M] + Distance[M, B]
a = Segment(A, M')
b = Segment(M', B)
d: L' - L
c = Segment(A, M)
n1 = 1
n2 = 1
MM' = Distance(M, M')
e = Segment(M, B)
texte1: "L' - L = " + d
MM = Distance(M, M)
texte2: "MM' = " + MM'
D = Point(i)
k = Circle(D, M)
α = Angle(A, M, D)
β = Angle(D, M, B)
f = Ray(M, A)
h = Ellipse(A, G, M)
M1 = Intersect(h, a)
O2, M2 = Intersect(k, a)
j = Segment(M1, B)
l = Segment(M2, B)
d1: Distance[A, M1] + Distance[M1, B] - L
d2: Distance[A, M2] + Distance[M2, B] - L
n: abs(MM' / d)
texte3: "rapport =" + n
texte4: "L = " + L
L13 = 0
L3 = 0
L1: Distance[A, M1] + Distance[M1, B]
L2: Distance[A, M2] + Distance[M2, B]
texte5: "L'_1 = " + L1 + ""
texte6: "L'_2 = " + L2 + ""
texte1_1: "L'_1 - L = " + d1 + ""
texte1_2: "L'_2 - L = " + d2 + ""
texte7: "L' = " + L'