>	with(Student[MultivariateCalculus]): CrossSection(x^2-y^2, z= -25..25, x=-4..4, y=-4..4, planes = 10);

with(plots);
contourplot(x^2-y^2, x=-4..4, y=-4..4);

>