EulerIp

h = -2 (slider from -5 to 5)
k = 1.8 (slider from -5 to 5)
p: (h * x) - (k * y) = 0
a: z = x^(4) - y^(4) + (10 * x^(2)) - (10 * y^(2))
eq1 = IntersectPath(p, a)
eq2: x^(2) + y^(2) + z^(2) - ((h^(2) / k^(2) + 2) * z / (10 - (10 * h^(2) / k^(2)))) = 0
c = IntersectPath(p, eq2)