GraphingCalculator 3.2;
Window 40 190 754 830;
PaneDivider 171;
BackgroundColor 0 0 0;
BackgroundType 0;
FontSizes 12 11 10;
3D.Depth 1.10309097429715;
3D.View 0.830903319634389 -0.303783032921072 -0.466171151327434 0.26627397735766 0.952737665575775 -0.146250160941726 0.488567131930521 -0.00260950236981147 0.872522405497243;
3D.Rotation 1 0 0 0 1 0 0 0 1;
Text "<size=13>The equation in spherical coordinates below contains two constants, <I>a </I>and <I>b</I>, that can be varied with the sliders. (r is used here in place of rho.) 
Use the mouse to rotate the surface in any direction.";
Expr r=a*sin(theta)+sin(b*phi);
Color 3;
MathPaneSlider 100;
Expr a=slider([-2,2]);
Color 3;
MathPaneSlider 160;
Expr b=slider([-5,5]);