summaryrefslogtreecommitdiff
path: root/graphics/asymptote/examples
diff options
context:
space:
mode:
authorNorbert Preining <norbert@preining.info>2022-08-08 03:05:28 +0000
committerNorbert Preining <norbert@preining.info>2022-08-08 03:05:28 +0000
commitf1e79c3669f68804c471699badc56a4a33a23246 (patch)
tree5e6feae427931b2043e96c6c0867e02ab647c9da /graphics/asymptote/examples
parente56ef8f972de679101fb97ad8e180614d3fd4267 (diff)
CTAN sync 202208080305
Diffstat (limited to 'graphics/asymptote/examples')
-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$"));