summaryrefslogtreecommitdiff
path: root/graphics/asymptote/examples/AiryDisk.asy
diff options
context:
space:
mode:
Diffstat (limited to 'graphics/asymptote/examples/AiryDisk.asy')
-rw-r--r--graphics/asymptote/examples/AiryDisk.asy16
1 files changed, 16 insertions, 0 deletions
diff --git a/graphics/asymptote/examples/AiryDisk.asy b/graphics/asymptote/examples/AiryDisk.asy
new file mode 100644
index 0000000000..855abfaa95
--- /dev/null
+++ b/graphics/asymptote/examples/AiryDisk.asy
@@ -0,0 +1,16 @@
+import graph3;
+import gsl;
+
+size(10cm,15cm,IgnoreAspect);
+currentprojection=orthographic(150,50,1);
+
+real f(pair z) {real r=abs(z); return r == 0 ? 1 : (2.0*J(1,r)/r)^2;}
+
+real R=15;
+surface s=surface(f,(-R,-R),(R,R),100,Spline);
+
+draw(s,green);
+
+xaxis3("$x$",Bounds,InTicks);
+yaxis3("$y$",Bounds,InTicks);
+zaxis3(rotate(90)*"$I(\sqrt{x^2+y^2})$",Bounds,InTicks("$%#.1f$"));