Début

->

A = (14, 8)
B = (20, 8)
C = (20, 4)
D = (14, 4)
q1, a, b, c, d = Polygon(A, B, C, D)
E = (16.952856806359918, 5.87965741884792)
F = (17.951036830513136, 6.325273501059178)
e = Circle(E, F)
etape = 10 (slider from 0 to 10, step 1)
f = Line(F, E)
G = Intersect(f, d)
H = Intersect(f, b)
g = Segment(G, H)
I = Intersect(e, g, 1)
N = (5.495632255182534, 2.740832912934723)
O = (8.792800497819536, 4.528245170785315)
h = Circle(F, I)
J = Intersect(h, a, 1)
K = Intersect(h, a, 2)
p = Circle(I, F)
L = Intersect(p, c, 2)
M = Intersect(p, c, 1)
k = Circle(F, I)
q = Circle(I, F)
P = Intersect(k, q, 2)
Q = Intersect(k, q, 1)
i = Line(P, Q)
R = Intersect(e, i, 1)
S = Intersect(e, i, 2)
r = Circle(R, S)
s = Circle(S, R)
T = Intersect(r, a, 1)
U = Intersect(k, a, 1)
V = Intersect(r, a, 2)
W = Intersect(k, a, 2)
Z = Intersect(k, b, 1)
A_1 = Intersect(k, b, 2)
B_1 = Intersect(s, c, 1)
C_1 = Intersect(q, c, 1)
D_1 = Intersect(s, c, 2)
E_1 = Intersect(q, c, 2)
F_1 = Intersect(q, d, 1)
G_1 = Intersect(q, d, 2)
t = CircleArc(F, U, A_1)
c_1 = CircleArc(I, C_1, G_1)
d_1 = CircleArc(R, T, V)
e_1 = CircleArc(S, B_1, D_1)
H_1 = Intersect(i, a)
I_1 = Intersect(i, c)
j = Segment(H_1, I_1)
J_1 = Intersect(c_1, e_1, 1)
K_1 = Intersect(t, e_1, 2)
L_1 = Intersect(t, d_1, 1)
M_1 = Intersect(c_1, d_1, 2)
l = Line(J_1, L_1)
m = Line(K_1, M_1)
N_1 = Intersect(e, l, 1)
O_1 = Intersect(e, m, 1)
P_1 = Intersect(e, l, 2)
Q_1 = Intersect(e, m, 2)
R_1 = Intersect(m, d)
S_1 = Intersect(m, b)
T_1 = Intersect(l, c)
U_1 = Intersect(l, a)
n = Segment(U_1, T_1)
f_1 = Segment(R_1, S_1)
poly1, f_2, n_1, r_1, o_1, i_1, p_1, s_1, q_1 = Polygon(F, N_1, R, O_1, I, P_1, S, Q_1)