summaryrefslogtreecommitdiff
path: root/graphics/asymptote/examples/polarcircle.asy
diff options
context:
space:
mode:
authorNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
committerNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
commite0c6872cf40896c7be36b11dcc744620f10adf1d (patch)
tree60335e10d2f4354b0674ec22d7b53f0f8abee672 /graphics/asymptote/examples/polarcircle.asy
Initial commit
Diffstat (limited to 'graphics/asymptote/examples/polarcircle.asy')
-rw-r--r--graphics/asymptote/examples/polarcircle.asy30
1 files changed, 30 insertions, 0 deletions
diff --git a/graphics/asymptote/examples/polarcircle.asy b/graphics/asymptote/examples/polarcircle.asy
new file mode 100644
index 0000000000..ce7ed94819
--- /dev/null
+++ b/graphics/asymptote/examples/polarcircle.asy
@@ -0,0 +1,30 @@
+import math;
+import graph;
+size(0,100);
+
+real f(real t) {return 2*cos(t);}
+pair F(real x) {return (x,f(x));}
+
+draw(polargraph(f,0,pi,operator ..));
+
+defaultpen(fontsize(10pt));
+
+xaxis("$x$");
+yaxis("$y$");
+
+real theta=radians(50);
+real r=f(theta);
+draw("$\theta$",arc((0,0),0.5,0,degrees(theta)),red,Arrow,PenMargins);
+
+pair z=polar(r,theta);
+draw(z--(z.x,0),dotted+red);
+draw((0,0)--(z.x,0),dotted+red);
+label("$r\cos\theta$",(0.5*z.x,0),0.5*S,red);
+label("$r\sin\theta$",(z.x,0.5*z.y),0.5*E,red);
+dot("$(x,y)$",z,N);
+draw("r",(0,0)--z,0.5*unit(z)*I,blue,Arrow,DotMargin);
+
+dot("$(a,0)$",(1,0),NE);
+dot("$(2a,0)$",(2,0),NE);
+
+