diff options
author | Karl Berry <karl@freefriends.org> | 2015-05-11 22:12:25 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2015-05-11 22:12:25 +0000 |
commit | 0417a4fa56359c545358f5fb8c9b3f88a1845db2 (patch) | |
tree | ed331ec191a82fe896f05005dee844269e406281 /Build/source/utils/asymptote/examples | |
parent | e7256bd4adc1d8df03ed8434e3f9cc15817b6f22 (diff) |
asy 2.33 sources
git-svn-id: svn://tug.org/texlive/trunk@37343 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/utils/asymptote/examples')
-rw-r--r-- | Build/source/utils/asymptote/examples/lemniscate.asy | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/Build/source/utils/asymptote/examples/lemniscate.asy b/Build/source/utils/asymptote/examples/lemniscate.asy new file mode 100644 index 00000000000..b151e43c18b --- /dev/null +++ b/Build/source/utils/asymptote/examples/lemniscate.asy @@ -0,0 +1,20 @@ +settings.outformat = "png";; +settings.render = 16; +size(8cm); + +import smoothcontour3; + +// Erdos lemniscate of order n: +real erdos(pair z, int n) { return abs(z^n-1)^2 - 1; } + +real h = 0.12; + +real lemn3(real x, real y) { return erdos((x,y), 3); } + +real f(real x, real y, real z) { + return lemn3(x,y)^2 + (16*abs((x,y))^4 + 1) * (z^2 - h^2); +} + +draw(implicitsurface(f,a=(-3,-3,-3),b=(3,3,3),overlapedges=true), + surfacepen=material(diffusepen=gray(0.5),emissivepen=gray(0.4), + specularpen=gray(0.1))); |