m = 1 (slider from -5 to 5, step 1)
n = 5 (slider from 0 to 10, step 1)
liste1 = Sequence(n)
A1 = Element(liste1, 1)
A2 = Element(liste1, 2)
A3 = Element(liste1, 3)
A4 = Element(liste1, 4)
A5 = Element(liste1, 5)
A6 = Element(liste1, 6)
A7 = Element(liste1, 7)
A8 = Element(liste1, 8)
A9 = Element(liste1, 9)
A10 = Element(liste1, 10)
B2: m * A2
B3: m * A3
B4: m * A4
B5: m * A5
B6: m * A6
B7: m * A7
B8: m * A8
B9: m * A9
B10: m * A10
B1: m * A1
A: (A1, B1)
B: (A2, B2)
C: (A3, B3)
D: (A4, B4)
E: (A5, B5)
F: (A6, B6)
G: (A7, B7)
H: (A8, B8)
I: (A9, B9)
J: (A10, B10)
liste2: {A, B, C, D, E, F, G, H, I, J}
a = OrthogonalLine(A, yAxis)
b = OrthogonalLine(B, xAxis)
K = Intersect(a, b)
u = Vector(A, K)
v = Vector(K, B)
d = OrthogonalLine(B, yAxis)
e = OrthogonalLine(C, xAxis)
f = OrthogonalLine(C, yAxis)
g = OrthogonalLine(D, yAxis)
h = OrthogonalLine(E, yAxis)
i = OrthogonalLine(F, yAxis)
j = OrthogonalLine(G, yAxis)
k = OrthogonalLine(H, yAxis)
l = OrthogonalLine(I, yAxis)
p = OrthogonalLine(J, yAxis)
q = OrthogonalLine(D, xAxis)
r = OrthogonalLine(E, xAxis)
s = OrthogonalLine(F, xAxis)
t = OrthogonalLine(G, xAxis)
a_1 = OrthogonalLine(H, xAxis)
b_1 = OrthogonalLine(I, xAxis)
c_1 = OrthogonalLine(J, xAxis)
L = Intersect(d, e)
M = Intersect(f, q)
N = Intersect(g, r)
O = Intersect(h, s)
P = Intersect(i, t)
Q = Intersect(j, a_1)
R = Intersect(k, b_1)
S = Intersect(l, c_1)
w = Vector(B, L)
z = Vector(L, C)
u_1 = Vector(C, M)
v_1 = Vector(M, D)
w_1 = Vector(D, N)
z_1 = Vector(N, E)
d_1 = Vector(E, O)
e_1 = Vector(O, F)
f_1 = Vector(F, P)
g_1 = Vector(P, G)
h_1 = Vector(G, Q)
i_1 = Vector(Q, H)
j_1 = Vector(H, R)
k_1 = Vector(R, I)
l_1 = Vector(I, S)
m_1 = Vector(S, J)