Erst konstruiert man zur Strecke AB die
Diagonalenlänge AE.
Dann konstruiert man mit |AB|=a und |AE|=d
das reguläre Fünfeck.

 |AD| = \frac{ a }{2 } * \sqrt{ 5 } 

A = (-0.06, -4.28)
B = (4.5600000000000005, -4.28)
a = Segment(A, B)
C = Midpoint(a)
b = OrthogonalLine(B, a)
c = Circle(B, C)
D = Intersect(c, b, 2)
d = Ray(A, D)
e = Circle(D, B)
E = Intersect(e, d, 2)
f = Segment(A, E)
F = (-6.48, -4.36)
G = Point(Circle[F, a])
g = Segment(F, G)
h = Circle(G, a)
k = Circle(F, f)
H = Intersect(h, k, 2)
p = Circle(H, G)
I = Intersect(k, p, 1)
q = Circle(I, H)
r = Circle(F, G)
J = Intersect(q, r, 2)
poly1, f_1, g_1, h_1, i, j = Polygon(F, G, H, I, J)