H
 i
e
r

z
 i
e
h
e
n

a = 0.9 (slider from 0 to 2, step 0.01)
A = (-3, -2)
B = (3, -2)
C = Point(Circle[B, 2.0])
b = Segment(B, C)
D = Point(Circle[A, 2.0])
c = Segment(A, D)
d = Circle(A, D)
e = Circle(B, C)
C' = Rotate(C, 45.0*°, B)
α = Angle(C, B, C')
D' = Rotate(D, 45.0*°, A)
β = Angle(D, A, D')
E = (-3, 0)
F = (3, 0)
G = Point(Circle[E, 2.0])
f = Segment(E, G)
H = Point(Circle[F, 2.0])
g = Segment(F, H)
h = Circle(E, G)
k = Circle(F, H)
G' = Rotate(G, 45.0*°, E)
γ = Angle(G, E, G')
H' = Rotate(H, 45.0*°, F)
δ = Angle(H, F, H')
Vieleck1, a_1, b_1, c', d' = Polygon(A, B, C', D')
Vieleck2, a_2, e_1, f_1, b_2 = Polygon(A, E, F, B)
Vieleck3, b_3, c'_1, h', f_2 = Polygon(B, C', H', F)
Vieleck4, a_3, d'_1, g', e_2 = Polygon(A, D', G', E)
Vieleck5, d'_2, c'_2, h'_1, g'_1 = Polygon(D', C', H', G')
AA: (x(A), y(A) + a)
BB: (x(B), y(B) + a)
CC: (x(C'), y(C') + a)
DD: (x(D'), y(D') + a)
Vieleck6, aa, bb, cc, dd = Polygon(AA, BB, CC, DD)
Vieleck7, a_4, aa_1, bb_1, b_4 = Polygon(A, AA, BB, B)
Vieleck8, b_5, c'_3, cc_1, bb_2 = Polygon(B, C', CC, BB)
Vieleck9, a_5, d'_3, dd_1, aa_2 = Polygon(A, D', DD, AA)
Vieleck10, d'_4, c'_4, cc_2, dd_2 = Polygon(D', C', CC, DD)
Text1: "" + (30.0 * a) + " m³"