A = (4.88, 6.82)
C = (8.88, 6.82)
c_2 = Circle(A, 4.0)
d_2 = Circle(C, 4.0)
D, B = Intersect(c_2, d_2)
Vieleck1, a, b, c, d = Polygon(A, B, C, D)
α = Angle(B, A, D)
β = Angle(C, B, A)
γ = Angle(D, C, B)
δ = Angle(A, D, C)
TextVieleck1: "Fläche " + (Name[A]) + (Name[B]) + (Name[C]) + (Name[D]) + " = " + Vieleck1
E = Point(a)
e = OrthogonalLine(E, c)
F = Intersect(c, e)
h_a = Segment(E, F)
ε = Angle(B, E, F)
f = Distance(c, h_a)
g = Distance(a, b)