S_1 = (4.155349483759876, -0.20479720175538887)
B = (7.8979896483923655, 0.9756940762150024)
k_1 = Circle(S_1, B)
S_2 = (10.883696896039716, 3.4131732608613277)
D = (5.2, 1.56)
k_2 = Circle(S_2, D)
E = Point(k_1)
F = Intersect(k_1, k_2, 1)
G = Intersect(k_1, k_2, 2)
e = Ellipse(S_1, S_2, G)
f = Hyperbola(S_1, S_2, F)
A = Point(e)
g = Line(A, S_2)
C = Intersect(k_2, g, 1)
c = Circle(A, C)
H = Point(f)
h = Line(H, S_2)
I = Intersect(k_2, h, 1)
d = Circle(H, I)
J = Intersect(k_2, h, 2)
k = Circle(H, J)
vzdalenostS1H = Distance(S_1, H)
TextS1H: Name[S_1] + (Name[H]) + " = " + vzdalenostS1H
vzdalenostS2H = Distance(S_2, H)
TextS2H: Name[S_2] + (Name[H]) + " = " + vzdalenostS2H
a = 0 (slider from 0 to 6, step 1)
K = (-0.8074439508400599, 1.6839881742222418)
L = (18.52214504034099, -0.5266482236534096)
p = Line(K, L)
i = OrthogonalLine(S_1, p)
M = Intersect(p, i)
q = Circle(M, Radius[k_1])
N = Intersect(q, i, 2)
j = OrthogonalLine(N, i)
O = Intersect(q, i, 1)
l = OrthogonalLine(O, i)
r = Parabola(S_1, j)
s = Parabola(S_1, l)
P = Point(s)
Q = Point(r)
m = OrthogonalLine(P, p)
n = OrthogonalLine(Q, p)
R = Intersect(p, n)
t = Circle(Q, R)
S = Intersect(p, m)
c_1 = Circle(P, S)
S_3 = Intersect(f, s, 2)
S_6 = Intersect(f, s, 1)
b = OrthogonalLine(S_6, p)
j_1 = OrthogonalLine(R, p)
S_5 = Intersect(e, r, 1)
f_1 = OrthogonalLine(S_5, p)
h_1 = OrthogonalLine(S_3, p)
Z = Intersect(p, b)
k_6 = Circle(S_6, Z)
A_1 = Intersect(p, f_1)
k_5 = Circle(S_5, A_1)
C_1 = Intersect(p, h_1)
k_3 = Circle(S_3, C_1)
S_4 = Intersect(e, s, 2)
S_7 = Intersect(e, s, 1)
g_1 = OrthogonalLine(S_7, p)
l_1 = OrthogonalLine(S_4, p)
W = Intersect(p, g_1)
k_7 = Circle(S_7, W)
B_1 = Intersect(p, l_1)
k_4 = Circle(S_4, B_1)
S_8 = Intersect(e, r, 2)
S_9 = Intersect(f, r, 2)
i_1 = OrthogonalLine(S_8, p)
m_1 = OrthogonalLine(S_9, p)
V = Intersect(p, i_1)
k_8 = Circle(S_8, V)
D_1 = Intersect(p, m_1)
k_9 = Circle(S_9, D_1)
S_1_0 = Intersect(f, r, 1)
n_1 = OrthogonalLine(S_1_0, p)
U = Intersect(n_1, p)
k_1_0 = Circle(S_1_0, U)