C:\Users\dominik\Downloads\kkp_dotykajici_se_kruznice_vnejsi_dotyk_primka_neprotina_kruznice-eukl

Číslo kroku

A = (2.24, -1.46)
B_{2} = (8.96, -2.74)
f = Line(A, B_{2})
C = (15.790344163184795, 4.6391098804194)
D = (17.473043111693006, 2.8755406570126407)
g = Line(C, D)
c = Circle(C, D)
E = Point(g)
e = Circle(E, D)
Číslo = 0 (slider from 0 to 11, step 1)
q_1 = Circle(D, E)
e' = Mirror(e, q_1)
c'_{1} = Mirror(c, q_1)
f' = Mirror(f, q_1)
Q = Point(c'_{1})
R = Point(c'_{1})
c' = Line(Q, R)
S = Center(f')
j_1 = OrthogonalLine(S, c')
T = Intersect(f', j_1, 2)
l = OrthogonalLine(T, j_1)
r_1 = Mirror(l, q_1)
U = Intersect(f', j_1, 1)
m = OrthogonalLine(U, j_1)
s_1 = Mirror(m, q_1)
Z = Intersect(c', j_1)
A_1 = Intersect(e', j_1, 1)
B = Midpoint(Z, A_1)
n = OrthogonalLine(B, j_1)
t_1 = Circle(S, Radius[f'] + Distance[A_1, B])
C_1 = Intersect(t_1, n, 2)
D_1 = Intersect(t_1, n, 1)
p = Circle(C_1, Segment[B, A_1])
o = Circle(D_1, Segment[B, A_1])
e_2 = Circle(S, Distance[A_1, B] - Radius[f'])
E_1 = Intersect(e_2, n, 2)
F_1 = Intersect(e_2, n, 1)
q = Circle(E_1, Segment[B, A_1])
r = Circle(F_1, Segment[B, A_1])
h_2 = Mirror(p, q_1)
k_2 = Mirror(q, q_1)
p_2 = Mirror(o, q_1)
q_2 = Mirror(r, q_1)