Quader - Senkrechte Kanten
Author: Kristina Emmerling

A = (3.1027531299637903, -0.9599999999999999)
B = (9.624026978364396, -0.9908301877488305)
a = Segment(A, B)
b = OrthogonalLine(A, a)
c = OrthogonalLine(B, a)
F = Point(c)
d = OrthogonalLine(F, c)
E = Intersect(b, d)
e = Segment(B, F)
f = Segment(F, E)
g = Segment(E, A)
C = (11.50393581231123, -0.07674607582972724)
h = Segment(B, C)
i = Line(F, h)
j = Line(E, i)
k = Line(C, e)
G = Intersect(i, k)
l = Line(G, f)
H = Intersect(j, l)
m = Segment(C, G)
n = Segment(G, F)
p = Segment(H, G)
q = Segment(E, H)
s = Line(H, e)
r = Line(H, g)
t = Line(C, f)
D = Intersect(r, t)
a_1 = Segment(A, D)
b_1 = Segment(D, C)
c_1 = Segment(D, H)
I = (3.104710104677207, 1.3030035270670324)
J = (9.624026978364396, 1.2857566570308228)