Α = (6.02, -2.3)
Β = (12.08, -2.28)
a_1 = Segment(Α, Β)
b = LineBisector(a_1)
Γ = Point(b)
πολύγ1, β, γ, α = Polygon(Γ, Α, Β)
c = Circle(Α, Distance[Α, Β])
Δ = Intersect(c, b, 1)
Ε = Intersect(a_1, β)
πολύγ2, β_1, ε, δ = Polygon(Ε, Δ, Β)
a = 1 (slider from 1 to 2, step 1)
πολύγ3, β_2, ε_1, γ_1 = Polygon(Ε, Γ, Β)
πολύγ4, δ_1, ε_2, β_3 = Polygon(Ε, Β, Δ)
πολύγ5, β_4, ε_3, γ_2 = Polygon(Ε, Γ, Β)
πολύγ6, δ_2, ε_4, β_5 = Polygon(Ε, Β, Δ)
Ζ = (16.43753521672639, -3.1383890770012104)
Η = (21.85753521672639, -5.698389077001209)
πολύγ7, d, e, f, g, h, Θ, Ι, Κ = Polygon(Ζ, Η, 5)
ΠΑΡΙΣ = Point(πολύγ7)
ΡΙΖΑΣ = Point(πολύγ7)