Author: Daniel Mentrard

1

+

2

+

Den = 9 (slider from 6 to 20, step 1)
zz: 360.0° / Den
a = 33.300000000000004 (slider from -5 to 70, step 0.1)
A = (-44.73936142316767, 41.08071932736926)
c = Circle(A, a)
b = Line(A, xAxis)
B, C = Intersect(c, b)
Num = 12 (slider from 0 to 20, step 1)
D = Rotate(C, Num * zz, A)
E = Rotate(C, zz, A)
F = Rotate(C, 2.0 * zz, A)
G = Rotate(C, 3.0 * zz, A)
g = Segment(G, A)
H = Rotate(C, 4.0 * zz, A)
h = Segment(H, A)
I = Rotate(C, 5.0 * zz, A)
i = Segment(I, A)
J = Rotate(C, 6.0 * zz, A)
K = Rotate(C, 7.0 * zz, A)
L = Rotate(C, 8.0 * zz, A)
M = Rotate(C, 9.0 * zz, A)
O = Rotate(C, 11.0 * zz, A)
P = Rotate(C, 12.0 * zz, A)
k = Segment(K, A)
l = Segment(L, A)
m = Segment(M, A)
p = Segment(O, A)
q = Segment(C, A)
r = Segment(J, A)
j = Segment(A, P)
f = Segment(F, A)
s = Segment(D, A)
t = Segment(E, A)
Q = Rotate(C, 13.0 * zz, A)
R = Rotate(C, 14.0 * zz, A)
S = Rotate(C, 15.0 * zz, A)
T = Rotate(C, 16.0 * zz, A)
U = Rotate(C, 17.0 * zz, A)
V = Rotate(C, 18.0 * zz, A)
W = Rotate(C, 19.0 * zz, A)
a1 = Segment(Q, A)
b1 = Segment(R, A)
c1 = Segment(S, A)
d1 = Segment(T, A)
e1 = Segment(U, A)
f1 = Segment(V, A)
g1 = Segment(W, A)
T1: "" + Num
T2: "" + Den
K1 = (-21.771860373985643, -23.51537737345521)
L1 = (-12.441313072755442, -23.51537737345521)
M1 = (-23.90250314754609, -12.730419989076422)
N1 = (-8.902503147546092, -12.730419989076422)
O1 = (-8.902503147546092, -33.18476873975915)
P1 = (-23.90250314754609, -33.18476873975915)
s1 = Circle(A, a)
Tour: Num / Den
d = CircleSector(A, C, D)
t1 = Circle(A, a)
a2 = Line(A, xAxis)
Q1 = Point(a2)
u = Vector(A, Q1)
c2 = Translate(c, u)
A' = Translate(A, u)
C' = Translate(C, u)
A'_1 = Translate(A, u)
n = Segment(C', A'_1)
E' = Translate(E, u)
A'_2 = Translate(A, u)
h1 = Segment(E', A'_2)
F' = Translate(F, u)
A'_3 = Translate(A, u)
i1 = Segment(F', A'_3)
G' = Translate(G, u)
A'_4 = Translate(A, u)
j1 = Segment(G', A'_4)
H' = Translate(H, u)
A'_5 = Translate(A, u)
k1 = Segment(H', A'_5)
I' = Translate(I, u)
A'_6 = Translate(A, u)
l1 = Segment(I', A'_6)
J' = Translate(J, u)
A'_7 = Translate(A, u)
m1 = Segment(J', A'_7)
K' = Translate(K, u)
A'_8 = Translate(A, u)
n1 = Segment(K', A'_8)
L' = Translate(L, u)
A'_9 = Translate(A, u)
p1 = Segment(L', A'_9)
M' = Translate(M, u)
A'_{10} = Translate(A, u)
q1 = Segment(M', A'_{10})
D' = Translate(D, u)
A'_{11} = Translate(A, u)
r1 = Segment(D', A'_{11})
O' = Translate(O, u)
A'_{12} = Translate(A, u)
b2 = Segment(O', A'_{12})
A'_{13} = Translate(A, u)
P' = Translate(P, u)
d2 = Segment(A'_{13}, P')
Q' = Translate(Q, u)
A'_{14} = Translate(A, u)
e2 = Segment(Q', A'_{14})
R' = Translate(R, u)
A'_{15} = Translate(A, u)
f2 = Segment(R', A'_{15})
S' = Translate(S, u)
A'_{16} = Translate(A, u)
g2 = Segment(S', A'_{16})
T' = Translate(T, u)
A'_{17} = Translate(A, u)
h2 = Segment(T', A'_{17})
U' = Translate(U, u)
A'_{18} = Translate(A, u)
i2 = Segment(U', A'_{18})
V' = Translate(V, u)
A'_{19} = Translate(A, u)
j2 = Segment(V', A'_{19})
W' = Translate(W, u)
A'_{20} = Translate(A, u)
k2 = Segment(W', A'_{20})
A'_{21} = Translate(A, u)
C'_1 = Translate(C, u)
D'_1 = Translate(D, u)
p2 = Sector(Translate[Circle[A, C], u], C'_1, D'_1)
q2 = Translate(s1, u)
N = Point(a2)
l2 = Segment(A, B)
A'_{22} = Translate(A, u)
B' = Translate(B, u)
m2 = Segment(A'_{22}, B')
Z = Rotate(C, 10.0 * zz, A)
n2 = Segment(A, Z)
A'_{23} = Translate(A, u)
Z' = Translate(Z, u)
r2 = Segment(A'_{23}, Z')
v = Vector(A, N)
s2 = Translate(c, v)
C'_2 = Translate(C, v)
A'_{24} = Translate(A, v)
t2 = Segment(C'_2, A'_{24})
E'_1 = Translate(E, v)
A'_{25} = Translate(A, v)
a3 = Segment(E'_1, A'_{25})
F'_1 = Translate(F, v)
A'_{26} = Translate(A, v)
b3 = Segment(F'_1, A'_{26})
G'_1 = Translate(G, v)
A'_{27} = Translate(A, v)
c3 = Segment(G'_1, A'_{27})
H'_1 = Translate(H, v)
A'_{28} = Translate(A, v)
d3 = Segment(H'_1, A'_{28})
D'_2 = Translate(D, v)
A'_{29} = Translate(A, v)
e3 = Segment(D'_2, A'_{29})
I'_1 = Translate(I, v)
A'_{30} = Translate(A, v)
f3 = Segment(I'_1, A'_{30})
J'_1 = Translate(J, v)
A'_{31} = Translate(A, v)
g3 = Segment(J'_1, A'_{31})
K'_1 = Translate(K, v)
A'_{32} = Translate(A, v)
h3 = Segment(K'_1, A'_{32})
L'_1 = Translate(L, v)
A'_{33} = Translate(A, v)
i3 = Segment(L'_1, A'_{33})
M'_1 = Translate(M, v)
A'_{34} = Translate(A, v)
j3 = Segment(M'_1, A'_{34})
A'_{35} = Translate(A, v)
Z'_1 = Translate(Z, v)
k3 = Segment(A'_{35}, Z'_1)
O'_1 = Translate(O, v)
A'_{36} = Translate(A, v)
l3 = Segment(O'_1, A'_{36})
A'_{37} = Translate(A, v)
P'_1 = Translate(P, v)
m3 = Segment(A'_{37}, P'_1)
Q'_1 = Translate(Q, v)
A'_{38} = Translate(A, v)
n3 = Segment(Q'_1, A'_{38})
R'_1 = Translate(R, v)
A'_{39} = Translate(A, v)
p3 = Segment(R'_1, A'_{39})
S'_1 = Translate(S, v)
A'_{40} = Translate(A, v)
q3 = Segment(S'_1, A'_{40})
T'_1 = Translate(T, v)
A'_{41} = Translate(A, v)
r3 = Segment(T'_1, A'_{41})
U'_1 = Translate(U, v)
A'_{42} = Translate(A, v)
s3 = Segment(U'_1, A'_{42})
V'_1 = Translate(V, v)
A'_{43} = Translate(A, v)
t3 = Segment(V'_1, A'_{43})
W'_1 = Translate(W, v)
A'_{44} = Translate(A, v)
a4 = Segment(W'_1, A'_{44})
A'_{45} = Translate(A, v)
C'_3 = Translate(C, v)
D'_3 = Translate(D, v)
c4 = Sector(Translate[Circle[A, C], v], C'_3, D'_3)
d4 = Circle(Q1, C')
e4 = Circle(N, C'_2)
T5: "\frac{" + (Num - Den) + " }{" + Den + "} "
T7: "\frac{" + (Num - 2.0 * Den) + " }{" + Den + "} "
A1 = (-49.28501267248495, -0.0693867190818798)
B1 = (40, 0)
e = Segment(A1, B1)
C1 = (49.283845996921265, 4.95475413542669)
b4 = Segment(C1, B1)
D1 = (-60, 5)
f4 = Segment(A1, D1)
E1 = (-25.360532412920335, -33.802903885067984)
F1 = (-12.441313072755444, -33.802903885067984)
g4 = Segment(E1, F1)