summaryrefslogtreecommitdiff
path: root/Master/texmf/doc/asymptote/examples/sphericalharmonic.asy
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf/doc/asymptote/examples/sphericalharmonic.asy')
-rw-r--r--Master/texmf/doc/asymptote/examples/sphericalharmonic.asy12
1 files changed, 12 insertions, 0 deletions
diff --git a/Master/texmf/doc/asymptote/examples/sphericalharmonic.asy b/Master/texmf/doc/asymptote/examples/sphericalharmonic.asy
new file mode 100644
index 00000000000..471bcaae9cd
--- /dev/null
+++ b/Master/texmf/doc/asymptote/examples/sphericalharmonic.asy
@@ -0,0 +1,12 @@
+import graph3;
+import palette;
+size(200);
+
+currentprojection=orthographic(4,2,4);
+
+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);
+draw(s,mean(palette(s.map(abs),Gradient(yellow,red))),nolight);