Afficher la droite (DN)

Chap 13 - Exercice 120

A = (0, 0)
B = (4, 0)
poly1, a_1, b, c, d, C, D = Polygon(A, B, 4.0)
a = -2.2 (slider from -4 to 4, step 0.1)
M: A + a * Vector[A, B]
N: C + 1.0 / a * Vector[C, B]
u = Vector(A, M)
v = Vector(C, N)
e = Line(D, N)
f = false