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