Enneper Surface
ParametricPlot3D[{u - u^3/3 + u*v^2, v - v^3/3 + v*u^2, u^2 - v^2}, {u, -Pi, Pi}, {v, -Pi, Pi}, Boxed -> False, Axes -> False, PlotStyle -> Directive[RandomColor[], Opacity[0.7], Specularity[White, 3]]]
ParametricPlot3D[{u - u^3/3 + u*v^2, v - v^3/3 + v*u^2, u^2 - v^2}, {u, -Pi, Pi}, {v, -Pi, Pi}, Boxed -> False, Axes -> False, PlotStyle -> Directive[RandomColor[], Opacity[0.7], Specularity[White, 3]]]