B: (5, 0, 0)
A: (0, 0, 0)
s = 0.65 (slider from -5 to 5, step 0.05)
E: (s, s, 4)
G: (5 - s, s, 4)
F: (s, 5 - s, 4)
H: (5 - s, 5 - s, 4)
S = Midpoint(H, F)
C: (0, 5, 0)
v5, c_2, f_1, e_1, a_2 = Polygon(C, F, E, A)
L = Point(a_2)
D: (5, 5, 0)
v4, d_2, c_1, f, h_1 = Polygon(D, C, F, H)
K = Point(d_2)
J = Point(h_1)
v3, g_1, h, d_1, b_2 = Polygon(G, H, D, B)
M = Point(d_1)
v7, j, k_1, l, m = Polygon(J, K, L, M)
O = Midpoint(j)
N = Midpoint(D, C)
r = 1.8 (slider from -5 to 5, step 0.1)
q = 2.95 (slider from -5 to 5, step 0.05)
v1, a, c, d, b = Polygon(A, C, D, B)
v2, a_1, e, g, b_1 = Polygon(A, E, G, B)
v6, e_2, g_2, h_2, f_2 = Polygon(E, G, H, F)
I: (2.5, 2.5, r)
i = Sphere(I, q)
k = IntersectPath(xOyPlane, i)
p = IntersectPath(xOyPlane, i)
P11: E + (1 / 2 * Vector[E, H])
n = OrthogonalLine(P11, v6)
rP = 0.2 (slider from 0 to 1, step 0.1)
t = Circle(P11, rP, n)
P31: N + (1 / 2 * Vector[N, S])
i_1 = OrthogonalLine(P31, v4)
p_1 = Circle(P31, rP, i_1)
P33: D + (3 / 4 * Vector[D, C]) + (3 / 4 * Vector[O, S])
P32: D + (1 / 4 * Vector[D, C]) + (1 / 4 * Vector[O, S])
q_1 = Circle(P32, rP, i_1)
r_1 = Circle(P33, rP, i_1)
P = Midpoint(A, B)
Q = Midpoint(E, G)
R = Centroid(v6)
P42: A + (1 / 4 * Vector[A, B]) + (1 / 4 * Vector[P, Q])
P41: A + (1 / 4 * Vector[A, B]) + (3 / 4 * Vector[P, Q])
P43: A + (3 / 4 * Vector[A, B]) + (3 / 4 * Vector[P, Q])
P44: A + (3 / 4 * Vector[A, B]) + (1 / 4 * Vector[P, Q])
j_1 = OrthogonalLine(P41, v2)
s_1 = Circle(P41, rP, j_1)
t_1 = Circle(P43, rP, j_1)
k_2 = Circle(P42, rP, j_1)
p_2 = Circle(P44, rP, j_1)
T = Midpoint(G, H)
U = Midpoint(B, D)
P51: B + (3 / 4 * Vector[B, D]) + (3 / 4 * Vector[U, T])
P52: B + (3 / 4 * Vector[B, D]) + (1 / 4 * Vector[U, T])
P53: B + (1 / 4 * Vector[B, D]) + (3 / 4 * Vector[U, T])
P54: B + (1 / 4 * Vector[B, D]) + (1 / 4 * Vector[U, T])
P55: B + (1 / 2 * Vector[B, D]) + (1 / 2 * Vector[U, T])
l_1 = OrthogonalLine(P55, v3)
q_2 = Circle(P53, rP, l_1)
r_2 = Circle(P51, rP, l_1)
s_2 = Circle(P54, rP, l_1)
t_2 = Circle(P52, rP, l_1)
c_3 = Circle(P55, rP, l_1)
V = Midpoint(C, A)
W = Midpoint(F, E)
P21: C + (3 / 4 * Vector[C, A]) + (1 / 4 * Vector[V, W])
P22: C + (1 / 4 * Vector[C, A]) + (3 / 4 * Vector[V, W])
m_1 = OrthogonalLine(P22, v5)
d_3 = Circle(P22, rP, m_1)
e_3 = Circle(P21, rP, m_1)
P61: D + (1 / 4 * Vector[D, B]) + (1 / 4 * Vector[U, V])
P62: D + (1 / 4 * Vector[D, B]) + (1 / 2 * Vector[U, V])
P63: D + (1 / 4 * Vector[D, B]) + (3 / 4 * Vector[U, V])
P64: D + (3 / 4 * Vector[D, B]) + (1 / 4 * Vector[U, V])
P65: D + (3 / 4 * Vector[D, B]) + (1 / 2 * Vector[U, V])
P66: D + (3 / 4 * Vector[D, B]) + (3 / 4 * Vector[U, V])
n_1 = OrthogonalLine(P63, v1)
f_3 = Circle(P63, rP, n_1)
g_3 = Circle(P66, rP, n_1)
h_3 = Circle(P62, rP, n_1)
k_3 = Circle(P61, rP, n_1)
p_3 = Circle(P65, rP, n_1)
q_3 = Circle(P64, rP, n_1)