H = (5, 2)
A = Point(yAxis)
B = Point(Circle[A, 8])
C = Point(Circle[B, 5])
G: B + (0 * Vector[B, C]) + (0.600000000000001 * OrthogonalVector[Segment[B, C]])
D: B + Vector[B, C] + OrthogonalVector[Segment[B, C]]
E = (5, 5)
F = (0, 5)
poly1, f, e, h, a = Polygon(F, E, H, A)
poly2, g, a_1, b = Polygon(A, B, G)
poly3, b_1, c, d, g_1 = Polygon(B, C, D, G)
poly4, e_1, h_1, d_1 = Polygon(H, D, E)