|
Notebook[{Cell[ |
|
BoxData[RowBox[{}]],"Input",CellLabel -> "In[5]:= ",ExpressionUUID -> "a5eda00a-dbbb-408b-ae55-06412828302d"],Cell[ |
|
CellGroupData[ |
|
{Cell[ |
|
BoxData[RowBox[{RowBox[{"Manipulate","[",RowBox[{RowBox[{"Plot3D","[",RowBox[ |
|
{RowBox[{"{",RowBox[{RowBox[{RowBox[{"x","^","2"}]," ","+"," ",RowBox[{"y","^","2"}]}],","," ",RowBox[ |
|
{RowBox[{"-",RowBox[{"x","^","2"}]}]," ","-"," ",RowBox[{"y","^","2"}]}]}],"}"}],","," ",RowBox[ |
|
{"{",RowBox[{"x",","," ",RowBox[{"-","2"}],","," ","2"}],"}"}],","," ",RowBox[{"{",RowBox[ |
|
{"y",","," ",RowBox[{"-","2"}],","," ","2"}],"}"}],","," ","\n"," ",RowBox[{"RegionFunction"," ","\[Rule]"," ",RowBox[ |
|
{"Function","[",RowBox[{RowBox[{"{",RowBox[{"x",","," ","y",","," ","z"}],"}"}],","," ",RowBox[ |