A1 = 1
A2 = 2
A3: 2 * A2 - A1
A4: 2 * A3 - A2
A5: 2 * A4 - A3
A6: 2 * A5 - A4
A7: 2 * A6 - A5
A8: 2 * A7 - A6
A9: 2 * A8 - A7
A10: 2 * A9 - A8
A11: 2 * A10 - A9
A12: 2 * A11 - A10
A13: 2 * A12 - A11
A14: 2 * A13 - A12
A15: 2 * A14 - A13
A16: 2 * A15 - A14
B1 = 1
B2 = 2
B3: 2 * B2 - B1
B4: 2 * B3 - B2
B5: 2 * B4 - B3
B6: 2 * B5 - B4
B7: 2 * B6 - B5
B8: 2 * B7 - B6
B9: 2 * B8 - B7
B10: 2 * B9 - B8
B11: 2 * B10 - B9
B12: 2 * B11 - B10
B13: 2 * B12 - B11
r = 3 (slider from 0.1 to 10, step 0.1)
O = (8.06, 2.7)
c = Circle(O, r)
B = (-0.82, -0.4)
C = (3.76, 4.06)
D = (5.5, -2.02)
polígono1 = Polygon({B, C, D})
P = PointIn(polígono1)
polígono1' = Mirror(polígono1, c)
P' = Mirror(P, c)
d = Circle(O, r^(2) / abs(P - O))
a = Ray(O, P')