User Portlet User Portlet

Discussions
Well now that worked---thanks Gianluca!
Thanks Gianluca that worked.
Thanks Valeriu, Actually I was able to get the result I was looking for with: RevolutionPlot3D[{(Sqrt[Cos[2*\[Theta]]])*Sin[t], t}, {t, 0, 2 Pi}, {\[Theta], -Pi/4, Pi/4}]` ![RevolutionPlot3D=Cylindrical Coordinates][1] This is the...