1 files changed, 12 insertions, 0 deletions
diff --git a/Build/source/utils/asymptote/examples/sphericalharmonic.asy b/Build/source/utils/asymptote/examples/sphericalharmonic.asy
new file mode 100644
index 00000000000..471bcaae9cd
--- /dev/null
+++ b/Build/source/utils/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);