2e

2e

x+y > 2e

-2e > x-y

x-y < 2e

y=k\,x-m+n

n = 1.6
m = 5.6
k = 0.2 (slider from 0 to 20, step 0.1)
r = 14.4 (slider from 0 to 30, step 0.01)
O = (0, 0)
e = 3
E': ((-e), 0)
E: (e, 0)
d_r: x + y = (2 * e)
m_r: (-2 * e) = x - y
n_r: x - y = (2 * e)
o(x, y) = x + y > 6
p(x, y) = (-x) + y < 6
s_1(x, y) = x - y < 6
D_3 = Point(m_r)
D_4 = Point(n_r)
D_1 = Intersect(m_r, d_r)
D_2 = Intersect(d_r, n_r)
Vieleck1, a_1, d_1, f_1, c = Polygon(D_3, D_1, D_2, D_4)
A = Point(a)
Q: (r, 0)
B = Point(a)
f(x) = (k * (x - m)^(2)) + n
b = Segment(O, Q)
g_Q = OrthogonalLine(Q, xAxis)
C = Intersect(f, g_Q, (14.4, 17.088000000000005))
D = (7.050000000000015, 10.110656881813412)
Kr_E = Circle(E, x(Q))
Kr'_E = Circle(E', y(C))
s = Circle(E', k)
P_c, P_c' = Intersect(Kr'_E, Kr_E)
P_d, P_d' = Intersect(s, Kr_E)
Ortslinie1 = Locus(P_d, r)
Ortslinie2 = Locus(P_d', r)
Ortslinie3 = Locus(P_c, r)
Ortslinie4 = Locus(P_c', r)
i = Segment(D, Q)
j = Segment(C, Q)
t(x) = (((-m)) / n * x) - k
F = Intersect(g_Q, j)
G = Intersect(t, g_Q)
H = Intersect(g_Q, j)
g = Segment(Q, G)
d = Circle(E', g)
Text6: "k=" + k + ""