EulerEll

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