diff options
author | Karl Berry <karl@freefriends.org> | 2021-02-25 19:22:25 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2021-02-25 19:22:25 +0000 |
commit | ad547a6b5986815fda458221149728d9d9ab1d87 (patch) | |
tree | 16296910eb3eca724371474ea9aea3994dc69614 /Build/source/utils/asymptote/examples/magnetic.asy | |
parent | 947b43de3dd21d58ccc2ffadefc4441ea1c2a813 (diff) |
restore Build,TODO from r57911
git-svn-id: svn://tug.org/texlive/trunk@57915 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/utils/asymptote/examples/magnetic.asy')
-rw-r--r-- | Build/source/utils/asymptote/examples/magnetic.asy | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/Build/source/utils/asymptote/examples/magnetic.asy b/Build/source/utils/asymptote/examples/magnetic.asy new file mode 100644 index 00000000000..3ae40466d43 --- /dev/null +++ b/Build/source/utils/asymptote/examples/magnetic.asy @@ -0,0 +1,18 @@ +import graph3; +import contour3; + +size(200,0); +currentprojection=orthographic((6,8,2),up=Y); + +real a(real z) {return (z < 6) ? 1 : exp((abs(z)-6)/4);} +real b(real z) {return 1/a(z);} +real B(real z) {return 1-0.5cos(pi*z/10);} + +real f(real x, real y, real z) {return 0.5B(z)*(a(z)*x^2+b(z)*y^2)-1;} + +draw(surface(contour3(f,(-2,-2,-10),(2,2,10),10)),blue+opacity(0.75), + render(merge=true)); + +xaxis3(Label("$x$",1),red); +yaxis3(Label("$y$",1),red); +zaxis3(Label("$z$",1),red); |