Ellips: (x - a)^2/m^2 + (y - b)^2/n^2 = 1

Hyperbool: (x - a)^2/m^2 - (y - b)^2/n^2 = 1

b = 0 (slider from -5 to 5, step 0.1)
a = 0 (slider from -5 to 5, step 0.1)
p = 3 (slider from -5 to 5, step 0.1)
r = 8 (slider from 2 to 8, step 1)
M: (a - p, b)
c = Circle(M, r)
Q = Point(c)
F: (a + p, b)
g = Segment(F, Q)
k = LineBisector(F, Q)
d = Line(M, Q)
P = Intersect(d, k)
e_1 = Segment(P, Q)
f = Segment(P, F)
e = Ellipse(M, F, P)
h = Hyperbola(M, F, P)
m: (0.5 * r)^(2.0)
n: (0.5 * r)^(2.0) - p^(2.0)
tekst2: "(x - " + a + ")^2/" + m + " + (y - " + b + ")^2/" + n + " = 1"
tekst4: "(x - " + a + ")^2/" + m + " - (y - " + b + ")^2/" + (-(n)) + " = 1"
C: (a, b)