R = 3 (slider from 0 to 5, step 1)
A = (1.22, 1.4825)
c = Circle(A, R)
B = (5.52, 1.6125)
a = Line(A, B)
b = OrthogonalLine(A, a)
C, D = Intersect(c, b)
E = Midpoint(A, D)
F = Midpoint(A, C)
d = Line(D, a)
e = Line(E, a)
f = Line(F, a)
g = Line(C, a)
G, H = Intersect(c, a)
I = Midpoint(A, H)
J = Midpoint(A, G)
h = Line(H, b)
i = Line(I, b)
j = Line(J, b)
k = Line(G, b)
K, L = Intersect(c, e)
M, N = Intersect(c, f)
O, P = Intersect(c, i)
Q, S = Intersect(c, j)
l = Segment(M, L)
m = Segment(Q, P)
n = Segment(O, S)
p = Segment(N, K)