Surfaces as Exercises 2

CPP2[a_,b_,c_,s_]:=ParametricPlot3D[

{u*Cos[a*v],u*Sin[b*v],-v*Cos[c*u]},
{u,-2Pi,2Pi},{v,0,2Pi},PlotStyle->{RGBColor["steelblue"],

Opacity[.2]},Axes->False,Boxed->False,

AspectRatio->1,PlotRange->All,
ViewPoint->{.8,.8,.9},PlotPoints->50,
Mesh->{25,50},MeshStyle->{RGBColor["crimson"],Cyan},
ImageSize->s,Background->RGBColor["silver"]];
{CPP2[1,1,1,400],CPP2[4,-3,1,400]}