Thalès vectoriel
Author: B. Sicard
Date: 16/10/2007

La multiplication par un réel est distributive sur la somme vectorielle.
Varier le réel a > 0 en bogeant le curseur.

a = -1.9 (slider from -3 to 3, step 0.1)
A = (4, 0)
B = (6.3, -0.13333333333333333)
u = Vector(A, B)
v: a Vector[A, B]
D = Translate(A, v)
w = Vector(A, D)
C = (8.6, 1.7333333333333334)
z = Vector(A, C)
b = Vector(B, C)
c: a Vector[B, C]
E = Translate(D, c)
d = Vector(D, E)
e = Vector(A, E)