A = (-0.26, -3.1)
B = Point(Circle[A, 2.4])
f = Segment(A, B)
c = Circle(A, 3.2)
g = OrthogonalLine(A, f)
C_1, D = Intersect(c, g)
h = Line(B, g)
i = Line(D, f)
C = Intersect(h, i)
v1, a, b, c_1, d = Polygon(A, B, C, D)
j = Line(A, B)
e = Circle(B, 3.16)
k = Line(D, C)
E, F = Intersect(e, j)
l = OrthogonalLine(F, j)
G = Intersect(l, k)
m = Segment(B, G)
n = Line(C, m)
H = Intersect(l, n)
v2, b_1, g_1, h_1, c_2 = Polygon(B, G, H, C)
u = Vector(A, G)
A' = Translate(A, u)
B' = Translate(B, u)
C' = Translate(C, u)
D' = Translate(D, u)
v1', a', b', c', d' = Polygon(A', B', C', D')
p = OrthogonalLine(C, m)
I = Intersect(p, m)
q = Segment(I, C)
F_1: (m * q)
Text1: "A_{Par}=g·h=m·q=" + (LaTeX[m]) + "·" + (LaTeX[q]) + "=" + (LaTeX[F_1]) + ""
d1, h_2, c_3, g_2 = Polygon(C, G, H)
v = Vector(G, F)
C'_1 = Translate(C, v)
G' = Translate(G, v)
H' = Translate(H, v)
d1', h', c'_1, g' = Polygon(C'_1, G', H')
Text2: "A_Δ=0.5·\overline{BF}·" + (LaTeX[d]) + "=" + (LaTeX[d1]) + ""
F1 = NaN
A_g: (2 * v1) + F_1
Text3: "A_{ges}=2·" + a + "·" + b + "+A_{Par}=2·" + v1 + "+" + F_1 + "=" + A_g + ""