R = 3 (slider from 0 to 5, step 1)
A = (0.92, 1.4825)
c = Circle(A, R)
B = (4.32, 1.1625)
a = Line(A, B)
b = OrthogonalLine(A, a)
C = Intersect(c, b, 2)
D = Intersect(c, b, 1)
E = Midpoint(A, C)
F = Midpoint(A, D)
d = Line(E, a)
e = Line(F, a)
G = Intersect(c, d, 2)
H = Intersect(c, e, 2)
poly1, h, a_1, g = Polygon(A, G, H)