Costruzione di un triangolo isoscele dati base e lato

Muovi gli slider 
per cambiare 
base e lato

Occorre che la base sia minore del doppio del lato

b = 1.9 (slider from 0 to 5, step 0.1)
l = 2.8 (slider from 0 to 5, step 0.1)
testo5: "2l=" + (2 * l)
A = (-0.4, 1.92)
B = Point(Circle[A, b])
base = Segment(A, B)
c = Circle(A, l)
d = Circle(B, l)
C = Intersect(c, d, 1)
a = Segment(C, A)
lato = Segment(B, C)
testo4: "base=" + b