S_1 = (4.504591144354724, -0.4193697532226923)
B = (7.8979896483923655, 0.9756940762150024)
k_1 = Circle(S_1, B)
S_2 = (10.86, 3.4)
D = (5.2, 1.56)
k_2 = Circle(S_2, D)
E = Point(k_1)
F = Intersect(k_1, k_2, 1)
P = Intersect(k_1, k_2, 2)
e = Ellipse(S_1, S_2, P)
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.0199401943621328, -4.793083380648985)
L = (15.099535362516699, -5.283240942343311)
p, p_{2} = Tangent(k_1, k_2)
Intersect(-0.28062413031824973x² - 2.7411444392189104x y + 1.176335905512384y² + 11.039795697893727x + 19.14037730325699y = 51.625399937201415, k_1)
G = Intersect(k_2, p, 1)
i = OrthogonalLine(G, p)
M = Mirror(S_2, p)
j = Line(M, p)
q = Parabola(S_2, j)
S_4 = Intersect(e, i, 2)
S_3 = Intersect(e, q, 1)
S_5 = Intersect(f, q, 2)
S_6 = Intersect(f, q, 1)
S = Point(i)
r = Circle(S, G)
T = Point(q)
l = OrthogonalLine(T, p)
U = Intersect(p, l)
s = Circle(T, U)
m = OrthogonalLine(S_6, p)
n = OrthogonalLine(S_5, p)
t = OrthogonalLine(S_4, p)
b = OrthogonalLine(S_3, p)
N = Intersect(m, p)
O = Intersect(n, p)
Q = Intersect(b, p)
R = Intersect(t, p)
k_4 = Circle(S_4, R)
k_5 = Circle(S_5, O)
k_3 = Circle(S_3, Q)
k_6 = Circle(S_6, N)