stap = 7 (slider from 0 to 7, step 1)
A = (-2, -3)
B = Point(Segment[A, (x(A) + 8, y(A))])
f = Segment(A, B)
veelhoek1, g, h, i, j, k, C, D, E = Polygon(A, B, 5)
l = AngularBisector(B, A, E)
m = AngularBisector(A, B, C)
G = Intersect(l, m)
n = Segment(G, D)
q = Segment(G, C)
s = Segment(G, B)
a = Segment(G, A)
d = Segment(G, E)
c = Circle(G, B)
β = Angle(G, A, B)
γ = Angle(A, B, G)
α = Angle(G, A, E)
δ = Angle(A, G, E)
ε = Angle(B, G, A)
ζ = Angle(G, B, C)
η = Angle(B, G, A)
F = (-5.695757985773938, -4.00165141721929)