Utiliser les curseurs 
pour déplacer 
les polygones de couleur.

T = (17.133333333333333, -2.100000000000002)
O_1 = (11.833333333333334, -3.1)
c = Circle(O_1, T)
B = Point(c)
a = Line(O_1, B)
C = Intersect(c, a, 2)
I = Midpoint(B, C)
d = Segment(B, C)
q_1 = OrthogonalLine(I, d)
H = Intersect(c, q_1, 2)
r_1 = CircleArc(I, H, C)
A = Point(r_1)
b = Segment(A, B)
e = Segment(C, A)
f = OrthogonalLine(A, b)
g = OrthogonalLine(B, b)
h = Circle(B, A)
G = Intersect(h, g, 2)
i = OrthogonalLine(G, g)
F = Intersect(f, i)
j = Segment(A, F)
k = Segment(G, F)
l = Segment(G, B)
m = OrthogonalLine(C, e)
n_2 = OrthogonalLine(A, e)
p = Circle(C, A)
D = Intersect(p, m, 2)
q_2 = OrthogonalLine(D, m)
E = Intersect(n_2, q_2)
r = Segment(C, D)
s_2 = Segment(D, E)
t_2 = Segment(E, A)
a_1 = OrthogonalLine(C, d)
b_1 = OrthogonalLine(B, d)
c_1 = Circle(C, B)
R = Intersect(c_1, a_1, 1)
d_1 = OrthogonalLine(R, a_1)
Q = Intersect(b_1, d_1)
e_1 = Segment(C, R)
f_1 = Segment(R, Q)
g_1 = Segment(B, Q)
J = Midpoint(B, Q)
K = Midpoint(R, Q)
L = Midpoint(C, R)
h_1 = Line(I, e)
i_1 = Line(L, b)
j_1 = Line(J, i_1)
k_1 = Line(K, h_1)
M = Intersect(h_1, j_1)
N = Intersect(j_1, k_1)
O = Intersect(i_1, k_1)
P = Intersect(h_1, i_1)
l_1 = Segment(P, I)
m_1 = Segment(N, K)
n_1 = Segment(M, J)
p_1 = Segment(O, L)
S = Midpoint(P, N)
B' = Mirror(B, S)
C' = Mirror(C, S)
s_1 = Segment(B', C')
B'_1 = Mirror(B, S)
Q' = Mirror(Q, S)
t_1 = Segment(B'_1, Q')
M' = Mirror(M, S)
J' = Mirror(J, S)
a_2 = Segment(M', J')
N' = Mirror(N, S)
K' = Mirror(K, S)
b_2 = Segment(N', K')
O' = Mirror(O, S)
L' = Mirror(L, S)
c_2 = Segment(O', L')
P' = Mirror(P, S)
I' = Mirror(I, S)
d_2 = Segment(P', I')
C'_1 = Mirror(C, S)
R' = Mirror(R, S)
e_2 = Segment(C'_1, R')
R'_1 = Mirror(R, S)
Q'_1 = Mirror(Q, S)
f_2 = Segment(R'_1, Q'_1)
U, j', q'_1, k', n' = Polygon(J', Q'_1, K', N')
g_2 = Segment(A, G)
h_2 = Segment(F, B)
V = Intersect(g_2, h_2)
n = 1 (slider from 0 to 1, step 0.1)
u = Vector(Q', V)
v = Vector(Q'_1, V)
J'' = Translate(J', Vector[n v])
Q'_1' = Translate(Q'_1, Vector[n v])
K'' = Translate(K', Vector[n v])
N'' = Translate(N', Vector[n v])
U', j'', q'_1', k'', n'' = Polygon(J'', Q'_1', K'', N'')
W, p', l', c', i' = Polygon(P', L', C', I')
Y, o', k'_1, r', l'_1 = Polygon(O', K', R', L')
Z, i'_1, b', j'_1, m' = Polygon(I', B', J', M')
P_1, n'_1, o'_1, p'_1, m'_1 = Polygon(N', O', P', M')
o = 0
w = 1 (slider from 0 to 1, step 0.1)
z = Vector(C', V)
P'' = Translate(P', Vector[w z])
L'' = Translate(L', Vector[w z])
C'' = Translate(C', Vector[w z])
I'' = Translate(I', Vector[w z])
W', p'', l'', c'', i'' = Polygon(P'', L'', C'', I'')
q = 1 (slider from 0 to 1, step 0.1)
u_1 = Vector(R', V)
O'' = Translate(O', Vector[q u_1])
K''_1 = Translate(K', Vector[q u_1])
R'' = Translate(R', Vector[q u_1])
L''_1 = Translate(L', Vector[q u_1])
Y', o'', k''_1, r'', l''_1 = Polygon(O'', K''_1, R'', L''_1)
v_1 = Vector(B', V)
s = 1 (slider from 0 to 1, step 0.1)
I''_1 = Translate(I', Vector[s v_1])
B'' = Translate(B', Vector[s v_1])
J''_1 = Translate(J', Vector[s v_1])
M'' = Translate(M', Vector[s v_1])
Z', i''_1, b'', j''_1, m'' = Polygon(I''_1, B'', J''_1, M'')
w_1 = Vector(N', D)
t = 1 (slider from 0 to 1, step 0.1)
N''_1 = Translate(N', Vector[t w_1])
O''_1 = Translate(O', Vector[t w_1])
P''_1 = Translate(P', Vector[t w_1])
M''_1 = Translate(M', Vector[t w_1])
P_1', n''_1, o''_1, p''_1, m''_1 = Polygon(N''_1, O''_1, P''_1, M''_1)
α = Angle(C, A, B)
β = Angle(C, A, B)