GraphingCalculator 3.2;
Window 44 6 755 699;
PaneDivider 227;
BackgroundColor 0 0 0;
BackgroundType 0;
3D.X -4 4;
3D.Y -4 4;
3D.Z -4 4;
FontSizes 12 11 10;
SliderThrottle 241;
U -1.5 1.5;
V 0 6.28318530717959;
3D.View 0.733416949141209 -0.596309866386678 -0.326365013385377 0.546312458376628 0.802748794615953 -0.239033618064228 0.404527225949882 -0.00298596588783456 0.914521080934211;
3D.Rotation 1 0 0 0 1 0 0 0 1;
Text "<size=12>Move the sliders to control the values of the 3 parameters in the equation of the cone below.";
Color 17;
Grain 0.716666666666667;
Expr z^2/c^2=x^2/a^2+y^2/b^2;
Color 4;
MathPaneSlider 50;
Expr a=slider([-4,4,80]);
Color 2;
MathPaneSlider 50;
Expr b=slider([-4,4,80]);
Color 3;
MathPaneSlider 50;
Expr c=slider([-4,4,80]);
Text "<size=16>



";
Expr vector(x,y,z)=vector(a*u*cos(v),b*u*sin(v),c*u);