Fish

In[19]:=
  fishtop =
    ParametricPlot3D[{x, .2(2x-x^2) Cos[t], (2x-x^2) Sin[t]},
      {x,-.25,2},{t,0.1,Pi-.1},
      PlotPoints -> {15,10}];
  fishbottom =
    ParametricPlot3D[{x, .2(2x-x^2) Cos[t], (2x-x^2) Sin[t]},
      {x,-.25,2},{t,Pi+.1,2Pi-.1},
      PlotPoints -> {15,10}];
  leftstripe =
    ParametricPlot3D[{x, .2(2x-x^2) Cos[t], (2x-x^2) Sin[t]},
      {x,-.25,2},{t,-0.1,.1},
      PlotPoints -> {15,3}];
  rightstripe =
    ParametricPlot3D[{x, .2(2x-x^2) Cos[t], (2x-x^2) Sin[t]},
      {x,-.25,2},{t,Pi-0.1,Pi+.1},
      PlotPoints -> {15,3}];
  x = 1.7;
  t1 = Pi/2 + 1;
  t2 = Pi/2 - 1;
  eyes = Graphics3D[{{PointSize[0.05],
            Point[{x, .2(2x-x^2) Cos[t1], (2x-x^2) Sin[t1]}],
            Point[{x, .2(2x-x^2) Cos[t2], (2x-x^2) Sin[t2]}]}}
         ];

In[20]:=

  Show[fishtop,fishbottom,leftstripe,rightstripe,eyes,
    ViewPoint -> {2,2,0}
  ];

Up to Aquarium