n[u_,v_] := (2)/(-(2^(1/2))Sin[u] Cos[v] +(2^(1/2)) Cos[u] Sin[v/2] +2)

X[u_,v_] := (1-n[u,v])+(2^(1/2)) n[u,v] Sin[u]Cos[v]

Y[u_,v_] := n[u,v] Sin[u] Sin[v]

Z[u_,v_] := n[u,v] Cos[u] Cos[v/2]

pltacc := 80

ParametricPlot3D[{X[u,v], Y[u,v], Z[u,v]}, {u,0,Pi},{v,0,2Pi},PlotPoints->pltacc]

ParametricPlot3D[{X[u,v],Y[u,v],Z[u,v]},{u,0,Pi},{v,0,2 Pi},PlotPoints->pltacc, MaxRecursion->15, PlotTheme->"ThickSurface"]