t_{1} = 1.5 (slider from 1 to 2)
r_{3}: (sqrt(3) * t_{1} / sqrt(t_{1}^(2) + t_{1} + 1))
k_{1}: (2 / ((sqrt(3) * t_{1})) * sqrt((-t_{1}^(4)) + (5 * t_{1}^(2)) - 4))
r_{2}: (sqrt(3) * t_{1} / sqrt(t_{1}^(2) - t_{1} + 1))
r_{1}: (sqrt(3) / 2 * t_{1})
c_{0} = 0 (slider from 0 to 1, step 0.01)
A: (-2, 0, 0)
B: (2, 0, 0)
P: (t_{1}, (sqrt(3) * t_{1}), 0)
f = Segment(A, P)
g = Segment(P, B)
h = Segment(B, A)
x_{1}: t_{1}
y_{1}: (sqrt(3) / 2 * t_{1})
n_{1}: π - asin(k_{1} / r_{1})
a_{1}: (n_{1} * c_{0})
C_{1}: (x_{1}, y_{1}, 0) + (0, (r_{1} * cos(a_{1})), (r_{1} * sin(a_{1})))
Q = Midpoint(P, B)
R = Midpoint(P, A)
M = Midpoint(A, B)
i = Segment(R, M)
m = Segment(C_{1}, R)
H_{1}: (x(C_{1}), y(C_{1}), 0)
j = Segment(C_{1}, Q)
k = Segment(Q, R)
S_{2}: A + (r_{2} / ((2 * sqrt(t_{1}^(2) - t_{1} + 1))) * ((sqrt(3) * t_{1}), 2 - t_{1}, 0))
n_{2}: π - asin(k_{1} / r_{2})
p = Segment(Q, M)
S_{3}: B + (r_{3} / ((2 * sqrt(t_{1}^(2) + t_{1} + 1))) * (((-sqrt(3)) * t_{1}), 2 + t_{1}, 0))
n_{3}: asin(k_{1} / r_{3})
a_{3}: (c_{0} * n_{3})
C_{3}: S_{3} + (cos(a_{3}) * (B - S_{3})) + (0, 0, (r_{3} * sin(a_{3})))
H_{3}: (x(C_{3}), y(C_{3}), 0)
q = Segment(C_{3}, Q)
r = Segment(C_{3}, M)
a_{2}: (n_{2} * c_{0})
C_{2}: S_{2} + (cos(a_{2}) * (A - S_{2})) + (0, 0, (r_{2} * sin(a_{2})))
l = Segment(C_{2}, R)
n = Segment(C_{2}, M)
H_{2}: (x(C_{2}), y(C_{2}), 0)