longueur de la courroie

longueur de la courroie

a = 0.6 (slider from -5 to 5)
b = 1.45 (slider from -5 to 5)
c = 4.85 (slider from -5 to 5)
A = (7.016363636363642, -0.567272727272726)
B = Point(Circle[A, c])
f = Segment(A, B)
d = Circle(A, a)
e = Circle(B, b)
C = Point(d)
g = Line(A, C)
h = Line(B, g)
D = Intersect(e, h, 2)
i = Line(C, D)
j = Line(A, B)
E = Intersect(i, j)
F = Midpoint(E, A)
k = Circle(F, E)
G = Intersect(d, k, 2)
H = Intersect(d, k, 1)
G' = Dilate(G, b / a, E)
H' = Dilate(H, b / a, E)
l = Segment(G, G')
m = Segment(H, H')
I = Intersect(d, j, 1)
J = Intersect(e, j, 2)
p = CircumcircleArc(G, I, H)
q = CircumcircleArc(G', J, H')
n: p + q + l + m
ChampTexte1 = Textfield(n)
texte1: "" + n + ""