summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/doc/asymptote/examples/sphericalharmonic.asy
blob: 9fbb16f624d0d40386cc0860b65f72801f4e20cd (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
import graph3;
import palette;
size(200);

currentprojection=orthographic(4,2,4);
currentlight=Viewport;

real r(real theta, real phi) {return 1+0.5*(sin(2*theta)*sin(2*phi))^2;}

triple f(pair z) {return r(z.x,z.y)*expi(z.x,z.y);}

surface s=surface(f,(0,0),(pi,2pi),50,Spline);
s.colors(palette(s.map(abs),Gradient(yellow,red)));
draw(s,render(compression=Low,merge=true));