Cuarto menguante

A = (4.16, 1.7)
c = Circle(A, 1)
a = OrthogonalLine(A, xAxis)
b = OrthogonalLine(A, yAxis)
B, C = Intersect(c, a)
D, E = Intersect(c, b)
d = Segment(E, D)
e = Segment(C, B)
F: D + C - A
f = CircleArc(F, C, D)
g = CircleArc(A, C, D)