Seite 17/5.16

E = (-5, 6)
F = (-8, -7)
G = (6, 8)
Vieleck1, c, a, b = Polygon(E, F, G)
H = (7.2, 4.98)
I = (3, 2)
K = (10, 2)
Vieleck2, f, d, e = Polygon(H, I, K)
u = Vector(K, E)
d1, k, i, h = Polygon(I, H, K)
I' = Translate(I, u)
H' = Translate(H, u)
K' = Translate(K, u)
d1', k', i', h' = Polygon(I', H', K')
α = Angle(I', E, F)
I'' = Rotate(I', 77.01°, E)
H'' = Rotate(H', 77.01°, E)
K'' = Rotate(K', 77.01°, E)
d1'', k'', i'', h'' = Polygon(I'', H'', K'')
Vieleck3, f_1, g, j, e_1, g_1 = Polygon(F, I'', H'', E, G)
l = Line(H'', c)
m = Line(E, l)
n = Line(G, F)
A = Intersect(l, n)
d2, f_2, a_1, e_2 = Polygon(A, E, F)
p = Line(A, b)
q = Line(G, f_2)
B = Intersect(p, q)
v1, a_2, b_1, g_2, e_3 = Polygon(A, B, G, E)
C = Midpoint(E, A)
r = Line(C, a_2)
D = Intersect(q, r)
v2, a_3, c_1, d_1, b_2 = Polygon(A, C, D, B)
s = OrthogonalLine(C, p)
t = OrthogonalLine(D, p)
J = Intersect(p, s)
L = Intersect(p, t)
v3, c_2, j_1, l_1, d_2 = Polygon(C, J, L, D)