summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/doc/asymptote/examples/polararea.asy
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2013-04-07 18:26:53 +0000
committerKarl Berry <karl@freefriends.org>2013-04-07 18:26:53 +0000
commitb04c2e1a42573e9735547702356c7b9a769a6855 (patch)
treec0753443f39500a062d7698fe6b94359c813f871 /Master/texmf-dist/doc/asymptote/examples/polararea.asy
parentfb0bf13304a356f197bfc1add17f98c07e96f17b (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.asy38
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);
+