0

0.1

0.2

0.3

0.4

0.5

0.6

0.7

0.8

0.9

1

1.1

1.2

1.3

1.4

1.5

1.6

1.7

1.8

1.9

2

2.1

2.2

2.3

2.4

2.5

2.6

2.7

2.8

2.9

3

3.1

3.2

3.3

3.4

3.5

3.6

3.7

3.8

3.9

4

4.1

4.2

4.3

4.4

4.5

4.6

4.7

4.8

4.9

5

5.1

5.2

5.3

5.4

5.5

5.6

5.7

5.8

5.9

6

6.1

6.2

2π

π/2 

π/3

π/4

π/5

π/6

π

3π/2

A = (2.08, -1.96)
c1 = Circle(A, 6.0)
B: A + (4.48, 0.0)
c2 = Circle(A, B)
C = Point(c2)
α = Angle(B, A, C)
g = 0.08 (slider from -5 to 5, step 0.1)
d = 0.17 (slider from -5 to 5, step 0.1)
a = -0.17 (slider from -5 to 5, step 0.1)
b = Segment(A + (6.0; 0.0 * ° + α), A + (6.0; 180.0 * ° + α))
f = Segment(A + (4.48; 197.18873 * ° + α), A + (4.48; 342.81127 * ° + α))
h = Segment(Midpoint[b], Midpoint[f])
lista1 = Sequence(Segment[A + (6.0; s + α), A + (5.88; s + α)], s, 0.0, 6.28319, 0.01)
lista2 = Sequence(Segment[A + (6.0; s + α), A + (5.64; s + α)], s, 0.0, 6.28319, 0.05)
lista3 = Sequence(Segment[A + (6.0; s + α), A + (5.4; s + α)], s, 0.0, 6.28319, 0.1)
A01: A + (5.0 - a; 0.1 + α) - (d, g)
A00: A + (5.0 - a; 0.0 + α) - (d, g)
A02: A + (5.0 - a; 0.2 + α) - (d, g)
A03: A + (5.0 - a; 0.3 + α) - (d, g)
A04: A + (5.0 - a; 0.4 + α) - (d, g)
A05: A + (5.0 - a; 0.5 + α) - (d, g)
A06: A + (5.0 - a; 0.6 + α) - (d, g)
A07: A + (5.0 - a; 0.7 + α) - (d, g)
A08: A + (5.0 - a; 0.8 + α) - (d, g)
A09: A + (5.0 - a; 0.9 + α) - (d, g)
A10: A + (5.0 - a; 1.0 + α) - (d, g)
A11: A + (5.0 - a; 1.1 + α) - (d, g)
A12: A + (5.0 - a; 1.2 + α) - (d, g)
A13: A + (5.0 - a; 1.3 + α) - (d, g)
A14: A + (5.0 - a; 1.4 + α) - (d, g)
A15: A + (5.0 - a; 1.5 + α) - (d, g)
A16: A + (5.0 - a; 1.6 + α) - (d, g)
A17: A + (5.0 - a; 1.7 + α) - (d, g)
A18: A + (5.0 - a; 1.8 + α) - (d, g)
A19: A + (5.0 - a; 1.9 + α) - (d, g)
A20: A + (5.0 - a; 2.0 + α) - (d, g)
A21: A + (5.0 - a; 2.1 + α) - (d, g)
A22: A + (5.0 - a; 2.2 + α) - (d, g)
A23: A + (5.0 - a; 2.3 + α) - (d, g)
A24: A + (5.0 - a; 2.4 + α) - (d, g)
A25: A + (5.0 - a; 2.5 + α) - (d, g)
A26: A + (5.0 - a; 2.6 + α) - (d, g)
A27: A + (5.0 - a; 2.7 + α) - (d, g)
A28: A + (5.0 - a; 2.8 + α) - (d, g)
A29: A + (5.0 - a; 2.9 + α) - (d, g)
A30: A + (5.0 - a; 3.0 + α) - (d, g)
A31: A + (5.0 - a; 3.1 + α) - (d, g)
A32: A + (5.0 - a; 3.2 + α) - (d, g)
A33: A + (5.0 - a; 3.3 + α) - (d, g)
A34: A + (5.0 - a; 3.4 + α) - (d, g)
A35: A + (5.0 - a; 3.5 + α) - (d, g)
A36: A + (5.0 - a; 3.6 + α) - (d, g)
A37: A + (5.0 - a; 3.7 + α) - (d, g)
A38: A + (5.0 - a; 3.8 + α) - (d, g)
A39: A + (5.0 - a; 3.9 + α) - (d, g)
A40: A + (5.0 - a; 4.0 + α) - (d, g)
A41: A + (5.0 - a; 4.1 + α) - (d, g)
A42: A + (5.0 - a; 4.2 + α) - (d, g)
A43: A + (5.0 - a; 4.3 + α) - (d, g)
A44: A + (5.0 - a; 4.4 + α) - (d, g)
A45: A + (5.0 - a; 4.5 + α) - (d, g)
A46: A + (5.0 - a; 4.6 + α) - (d, g)
A47: A + (5.0 - a; 4.7 + α) - (d, g)
A48: A + (5.0 - a; 4.8 + α) - (d, g)
A49: A + (5.0 - a; 4.9 + α) - (d, g)
A50: A + (5.0 - a; 5.0 + α) - (d, g)
A51: A + (5.0 - a; 5.1 + α) - (d, g)
A52: A + (5.0 - a; 5.2 + α) - (d, g)
A53: A + (5.0 - a; 5.3 + α) - (d, g)
A54: A + (5.0 - a; 5.4 + α) - (d, g)
A55: A + (5.0 - a; 5.5 + α) - (d, g)
A56: A + (5.0 - a; 5.6 + α) - (d, g)
A57: A + (5.0 - a; 5.7 + α) - (d, g)
A58: A + (5.0 - a; 5.8 + α) - (d, g)
A59: A + (5.0 - a; 5.9 + α) - (d, g)
A60: A + (5.0 - a; 6.0 + α) - (d, g)
A61: A + (5.0 - a; 6.1 + α) - (d, g)
A62: A + (5.0 - a; 6.2 + α) - (d, g)
lista5 = Sequence(Segment[A + (6.0; s + α), A + (5.4; s + α)], s, 1.0, 6.0, 1.0)
lista4 = Sequence(Segment[A + (6.0; 3.141592653589793 / s + α), A + (4.48; 3.141592653589793 / s + α)], s, 3.0, 6.0, 1.0)
c = Segment(A + (6.0; 270.0 * ° + α), A + (4.48; 270.0 * ° + α))
e = Segment(A + (6.0; 90.0 * ° + α), A + (4.48; 90.0 * ° + α))
i = Segment(A + (4.48; 0.0 * ° + α), A + (4.48; 180.0 * ° + α))
P4: A + (5.0 - a - 3.0 * d; 3.141592653589793 / 3.0 + α + 0.05) - (d, g)
P5: A + (5.0 - a - 3.0 * d; 3.141592653589793 / 2.0 + α + 0.05) - (d, g)
P3: A + (5.0 - a - 3.0 * d; 3.141592653589793 / 4.0 + α + 0.05) - (d, g)
P2: A + (5.0 - a - 3.0 * d; 3.141592653589793 / 5.0 + α + 0.05) - (d, g)
P1: A + (5.0 - a - 3.0 * d; 3.141592653589793 / 6.0 + α + 0.05) - (d, g)
P7: A + (5.0 - a - 3.0 * d; 3.0 * 3.141592653589793 / 2.0 + α + 0.05) - (d, g)
P6: A + (5.0 - a - 3.0 * d; 3.141592653589793 + α + 0.05) - (d, g)
P8: A + (5.0 - a - 2.5 * d; 2.0 * 3.141592653589793 + α - 0.05) - (d, g)
D = (2.08, -1.96)
E = (8.96, -0.02)
polígono1, j, k, l, F = Polygon(D, E, 3.0)