R = 3 (slider from 0 to 5, step 1)
A = (0.92, 1.4825)
c = Circle(A, R)
B = (5.02, 1.4625)
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)