D = (3.52, -0.72)
C = Point(Circle[D, 8])
a = Segment(D, C)
poly1, a_1, b, c, d, B, A = Polygon(D, C, 4)
e = 1.12 (slider from 0 to 4, step 0.0010)
f = Circle(A, e)
g = Circle(B, e)
h = Circle(C, e)
k = Circle(D, e)
E = Intersect(f, c)
L = Intersect(f, d)
K = Intersect(k, d)
J = Intersect(k, a_1)
I = Intersect(h, a_1)
H = Intersect(h, b)
G = Intersect(g, b)
F = Intersect(g, c)
poly2, f_1, e_1, l, k_1, j, i, h_1, g_1 = Polygon(L, E, F, G, H, I, J, K)
m = Perimeter(poly2)
n = Distance(e_1, f_1)
o = Perimeter(poly2)
poly3, a_2, b_1, c_1, d_1 = Polygon(A, B, C, D)
poly4, l_1, e_2, f_2, g_2, h_2, i_1, j_1, k_2 = Polygon(L, E, F, G, H, I, J, K)