Déplacer le point B avec ce curseur

k = 0.49 (slider from 0.1 to 0.99, step 0.01)
D = Point(xAxis)
A = Intersect(xAxis, yAxis)
B_1 = Point(yAxis)
C: (x(D), 6)
poly1, a, b, c, d = Polygon(A, B_1, C, D)
E = Point(a)
e = Segment(A, E)
B: (0, k)
f = Segment(A, B)
F = (-5.071329858668519, 1.0006791464425993)
g = Segment(F, B)
h = Line(F, B)
M = Intersect(h, xAxis)
i = Segment(B, M)
t: (0.6 * Distance[A, B])
T: 1.8 / (0.6 - t)
texte2: "HM ≅ " + T + " m"
texte1: "AB ≅ " + t + " m"