A = Point(yAxis)
B = Intersect(xAxis, yAxis)
C = (6, 0)
poly1, c, a, b = Polygon(A, B, C)
D = Point(Circle[A, 6.71])
f = Segment(A, D)
E = Point(Circle[C, 6.71])
g = Segment(C, E)
h = Segment(D, E)
poly2, d_1, a_1, c_1, e_1 = Polygon(D, A, C, E)
Textpoly2: "Area of  " + (Name[D]) + (Name[A]) + (Name[C]) + (Name[E]) + " = " + poly2
abs(6)
F = Point(Circle[C, abs(6)])
k = Segment(C, F)
G = Point(yAxis)
poly3, b_1, g_2, f_2, c_2 = Polygon(B, G, F, C)
Textpoly3: "Area of  " + (Name[B]) + (Name[G]) + (Name[F]) + (Name[C]) + " = " + poly3
abs(3)
H = Point(Circle[A, abs(3)])
m = Segment(A, H)
I = Point(xAxis)
poly4, a_2, h_1, i_1, b_2 = Polygon(A, H, I, B)
Textpoly4: "Area of  " + (Name[A]) + (Name[H]) + (Name[I]) + (Name[B]) + " = " + poly4