diff options
author | Karl Berry <karl@freefriends.org> | 2013-04-07 18:26:53 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2013-04-07 18:26:53 +0000 |
commit | b04c2e1a42573e9735547702356c7b9a769a6855 (patch) | |
tree | c0753443f39500a062d7698fe6b94359c813f871 /Master/texmf-dist/doc/asymptote/examples/polararea.asy | |
parent | fb0bf13304a356f197bfc1add17f98c07e96f17b (diff) |
texmf -> texmf-dist: doc
git-svn-id: svn://tug.org/texlive/trunk@29714 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/doc/asymptote/examples/polararea.asy')
-rw-r--r-- | Master/texmf-dist/doc/asymptote/examples/polararea.asy | 38 |
1 files changed, 38 insertions, 0 deletions
diff --git a/Master/texmf-dist/doc/asymptote/examples/polararea.asy b/Master/texmf-dist/doc/asymptote/examples/polararea.asy new file mode 100644 index 00000000000..15d42ffd00e --- /dev/null +++ b/Master/texmf-dist/doc/asymptote/examples/polararea.asy @@ -0,0 +1,38 @@ +import math; +import graph; + +size(0,150); + +real f(real t) {return 5+cos(10*t);} + +xaxis("$x$"); +yaxis("$y$"); + +real theta1=pi/8; +real theta2=pi/3; +path k=graph(f,theta1,theta2,operator ..); +real rmin=min(k).y; +real rmax=max(k).y; +draw((0,0)--rmax*expi(theta1),dotted); +draw((0,0)--rmax*expi(theta2),dotted); + +path g=polargraph(f,theta1,theta2,operator ..); +path h=(0,0)--g--cycle; +fill(h,lightgray); +draw(h); + +real thetamin=3*pi/10; +real thetamax=2*pi/10; +pair zmin=polar(f(thetamin),thetamin); +pair zmax=polar(f(thetamax),thetamax); +draw((0,0)--zmin,dotted+red); +draw((0,0)--zmax,dotted+blue); + +draw("$\theta_*$",arc((0,0),0.5*rmin,0,degrees(thetamin)),red+fontsize(10pt), + PenMargins); +draw("$\theta^*$",arc((0,0),0.5*rmax,0,degrees(thetamax)),blue+fontsize(10pt), + PenMargins); + +draw(arc((0,0),rmin,degrees(theta1),degrees(theta2)),red,PenMargins); +draw(arc((0,0),rmax,degrees(theta1),degrees(theta2)),blue,PenMargins); + |