M=cA>N

G=cC>K

H=CE<L

N=dB

K=dD

L=dF

A = (-3, 7)
G: (13, y(A))
S: (x(G), y(G) - 1.25)
C: (x(A), y(S) - 0.75)
O: (x(A), y(C) - 0.75)
U: (x(G), y(O) - 0.5)
E: (x(A), y(U) - 0.75)
K: (x(G), y(E))
B = Point(Segment[A, (x(A) + 10, y(A))])
f = Segment(A, B)
D = Point(Segment[C, (x(C) + 10, y(C))])
g = Segment(C, D)
M' = 2 (slider from 1 to 4, step 1)
F = Point(Segment[E, (x(E) + 10, y(E))])
h = Segment(E, F)
H = Point(Segment[G, (x(G) - 10, y(A))])
i = Segment(G, H)
I: (x(G), y(C))
J: (x(I) - ((g * i)) / f, y(I))
j = Segment(I, J)
L = Point(Segment[K, (x(K) - ((h * j)) / g, y(E))])
k = Segment(K, L)
M_0: (x(A), y(A) - 0.75)
N: (x(M_0) + (f * M'), y(M_0))
l = Segment(M_0, N)
P: (x(O) + (g * M'), y(O))
m_{1} = Segment(O, P)
Q: (x(A), y(E) - 0.75)
R: (x(Q) + (h * M'), y(Q))
n = Segment(Q, R)
m' = 3 (slider from 0 to 5, step 1)
T: (x(S) - (i * m'), y(S))
p = Segment(S, T)
V: (x(U) - (j * m'), y(U))
q = Segment(U, V)
W: (x(G), y(Q) - 0.5)
Z: (x(W) - (k * m'), y(W))
r = Segment(W, Z)
A_1 = (-4.02, -1.64)
M_1: (x(M_0) + f, y(M_0))
M_2: (x(M_0) + (2 * f), y(M_0))
M_3: (x(M_0) + (3 * f), y(M_0))
M_4: (x(M_0) + (4 * f), y(M_0))
M_5: (x(M_0) + (5 * f), y(M_0))
S_1: (x(S) - i, y(S))
S_2: (x(S) - (2 * i), y(S))
S_3: (x(S) - (3 * i), y(S))
S_4: (x(S) - (4 * i), y(S))
S_5: (x(S) - (5 * i), y(S))
O_1: (x(O) + g, y(O))
O_2: (x(O) + (2 * g), y(O))
O_3: (x(O) + (3 * g), y(O))
O_4: (x(O) + (4 * g), y(O))
O_5: (x(O) + (5 * g), y(O))
U_1: (x(U) - j, y(U))
U_2: (x(U) - (2 * j), y(U))
U_3: (x(U) - (3 * j), y(U))
U_4: (x(U) - (4 * j), y(U))
U_5: (x(U) - (5 * j), y(U))
Q_1: (x(Q) + h, y(Q))
Q_2: (x(Q) + (2 * h), y(Q))
Q_3: (x(Q) + (3 * h), y(Q))
Q_4: (x(Q) + (4 * h), y(Q))
Q_5: (x(Q) + (5 * h), y(Q))
W_1: (x(W) - k, y(W))
W_2: (x(W) - (2 * k), y(W))
W_3: (x(W) - (3 * k), y(W))
W_4: (x(W) - (4 * k), y(W))
W_5: (x(W) - (5 * k), y(W))
getal1: x(B) - x(A)
getal3: x(D) - x(C)
getal5: x(F) - x(E)
getal2: x(G) - x(H)
getal6: x(K) - x(L)