Author: Frédéric Chanez

C'est un octogone.

O = (2, 0)
c = Circle(O, 8)
V = Point(c)
a = Segment(O, V)
A = Point(c)
b = Ray(A, O)
D = Intersect(c, b, 2)
d = Segment(A, D)
e = 5 (slider from -1 to 5, step 0.5)
B = Midpoint(A, O)
C = Midpoint(O, D)
f = OrthogonalLine(B, d)
g = OrthogonalLine(O, d)
h = OrthogonalLine(C, d)
I = Intersect(c, f, 2)
J = Intersect(c, g, 2)
K = Intersect(c, h, 2)
L = Intersect(c, h, 1)
M = Intersect(c, g, 1)
N = Intersect(c, f, 1)
poly1, a_1, i, j, k, d_1, l, m, n = Polygon(A, I, J, K, D, L, M, N)
E = (14, 8)
F = (14, -6)
p = Circle(A, 6)
q = Circle(O, 6)
G = Point(p)
H = Point(p)
r = CircleArc(A, G, H)
P = Point(q)
Q = Point(q)
s = CircleArc(O, P, Q)
R, S = Intersect(r, s)
t = Line(R, S)
T = Point(t)
U = Point(t)
b_1 = Segment(T, U)
c_1 = Circle(D, 6)
W = Point(q)
Z = Point(q)
e_1 = CircleArc(O, W, Z)
A_1 = Point(c_1)
B_1 = Point(c_1)
f_1 = CircleArc(D, A_1, B_1)
C_1, D_1 = Intersect(e_1, f_1)
g_1 = Line(C_1, D_1)
E_1 = Point(g_1)
F_1 = Point(g_1)
h_1 = Segment(E_1, F_1)