Modifier la valeur de a avec le curseur

A = Intersect(xAxis, yAxis)
B = Point(xAxis)
C = (6, 3)
D: A + Vector[B, C]
e = Segment(A, B)
b = Segment(B, C)
c = Segment(C, D)
d = Segment(D, A)
a = 0.8 (slider from -3 to 5, step 0.1)
u: a * Vector[A, D]
M = Translate(A, u)
v = Vector(A, M)
w: 1.0 / a * Vector[A, B]
N = Translate(A, w)
z = Vector(A, N)
f = Line(B, M)
g = Line(D, N)
E = Midpoint(M, N)
P = Mirror(A, E)
h = Segment(M, N)
i = Segment(P, A)
j = Segment(N, P)
k = Segment(M, P)
l = Line(P, C)