a = 2.8 (slider from 0 to 5, step 0.1)
A = (-2.8, 3.76)
B = Point(Circle[A, a])
a_1 = Segment(A, B)
C = Point(Circle[A, 2 * a])
b = Segment(A, C)
D = Point(Circle[A, 3 * a])
c = Segment(A, D)
trojúhelník1a, e, a_4, b_1, E = Polygon(A, B, 3)
trojúhelník2a, f, a_2, c_1, F = Polygon(A, C, 3)
trojúhelník3a, g, a_3, d_1, G = Polygon(A, D, 3)
mnohoúhelník4, h, b_2, c_2, H = Polygon(B, C, 3)
mnohoúhelník5, i, e_1, h_1, I = Polygon(E, H, 3)
mnohoúhelník6, j, c_3, d_2, J = Polygon(C, D, 3)
mnohoúhelník7, k, h_2, j_1, K = Polygon(H, J, 3)
mnohoúhelník8, l, f_1, k_1, L = Polygon(F, K, 3)