tangram  cheval

A = (-12.877433600000012, 6.153879399999999)
a_4 = 6
B = Point(Circle[A, 6])
a = Segment(A, B)
b = OrthogonalLine(A, a)
c = OrthogonalLine(B, a)
d = Circle(A, 6)
e = Circle(B, 6)
C = Intersect(e, c, 1)
D = Intersect(d, b, 1)
poly1, a_1, d_1, c_1, b_1 = Polygon(A, D, C, B)
f = Segment(A, C)
g = Segment(D, B)
E = Intersect(f, g)
poly2, a_2, d_2, e_1 = Polygon(D, E, A)
poly3, b_2, a_3, e_2 = Polygon(A, E, B)
h = Segment(D, E)
F = Midpoint(D, E)
G = Midpoint(E, C)
poly4, e_3, f_1, g_1 = Polygon(F, G, E)
k = Circle(D, 3)
H = Intersect(k, d_1, 1)
poly5, g_2, h_1, d_3, f_2 = Polygon(G, H, D, F)
i = Segment(E, G)
j = Line(H, G)
p = Circle(G, 2.12)
I = Intersect(p, j, 2)
q = Circle(E, 2.12)
J = Intersect(q, g, 2)
poly6, g_3, i_1, j_1, e_4 = Polygon(G, I, J, E)
poly7, c_2, h_2, i_2 = Polygon(H, I, C)
poly8, b_3, i_3, j_2 = Polygon(I, J, B)
K = (5.897212200000006, -8.423765600000003)
L = Point(Circle[K, a_2])
M = Rotate(L + (d_2, 0), Angle[A - E] + Angle[L - K] - Angle[E - D], L)
poly9, m, k_1, l = Polygon(K, L, M)
N = (5.9176, -6.7814)
O = Point(Circle[N, b_2])
P = Rotate(O + (a_3, 0), Angle[B - E] + Angle[O - N] - Angle[E - A], O)
poly10, p_1, n, o = Polygon(N, O, P)
Q = (0.10470959999999985, -4.061554400000002)
R = Point(Circle[Q, e_3])
S = Rotate(R + (f_1, 0), Angle[E - G] + Angle[R - Q] - Angle[G - F], R)
poly11, s, q_1, r = Polygon(Q, R, S)
T = (5.9015255999999985, -7.5366702)
U = Point(Circle[T, b_3])
V = Rotate(U + (i_3, 0), Angle[B - J] + Angle[U - T] - Angle[J - I], U)
poly12, v, t, u = Polygon(T, U, V)
W = (8.9380066, -5.392772600000005)
Z = Point(Circle[W, g_2])
A_1 = Rotate(Z + (h_1, 0), Angle[D - H] + Angle[Z - W] - Angle[H - G], Z)
B_1 = Rotate(A_1 + (d_3, 0), Angle[F - D] + Angle[A_1 - Z] - Angle[D - H], A_1)
poly13, w, z_1, a_5, b_4 = Polygon(W, Z, A_1, B_1)
C_1 = (3.7976, -2.5214)
D_1 = Point(Circle[C_1, g_3])
E_1 = Rotate(D_1 + (i_1, 0), Angle[J - I] + Angle[D_1 - C_1] - Angle[I - G], D_1)
F_1 = Rotate(E_1 + (j_1, 0), Angle[E - J] + Angle[E_1 - D_1] - Angle[J - I], E_1)
poly14, c_3, d_4, e_5, f_3 = Polygon(C_1, D_1, E_1, F_1)
G_1 = (5.9176, -0.3614)
H_1 = Point(Circle[G_1, c_2])
I_1 = Rotate(H_1 + (h_2, 0), Angle[C - I] + Angle[H_1 - G_1] - Angle[I - H], H_1)
poly15, i_4, g_4, h_3 = Polygon(G_1, H_1, I_1)
l_1 = Line(G_1, K)