G = (-12, -4)
F = (-4, -4)
u = Vector(F, G)
B = (1, 0)
B' = Translate(B, u)
A = (-2, 0)
f = Line(A, B)
h = OrthogonalLine(B, f)
C = Point(f)
C' = Translate(C, u)
g = OrthogonalLine(C, f)
D = Point(g)
i = OrthogonalLine(D, g)
E = Intersect(h, i)
v1, b, c, d, e = Polygon(B, C, D, E)
p = Line(D, d)
J = Point(p)
v = Vector(B, B')
w = Vector(C, C')
d1, l, m, n = Polygon(C', J, B')
Text1: "A_{Rechteck} = " + (LaTeX[v1]) + " cm²"
Text2: "A_{Dreieck} = " + d1 + " cm²"
q = OrthogonalLine(J, p)
j = OrthogonalLine(J, f)
H = Intersect(j, f)
k = Segment(J, H)