summaryrefslogtreecommitdiff
path: root/Build/source/utils/asymptote/examples/wedge.asy
diff options
context:
space:
mode:
Diffstat (limited to 'Build/source/utils/asymptote/examples/wedge.asy')
-rw-r--r--Build/source/utils/asymptote/examples/wedge.asy23
1 files changed, 23 insertions, 0 deletions
diff --git a/Build/source/utils/asymptote/examples/wedge.asy b/Build/source/utils/asymptote/examples/wedge.asy
new file mode 100644
index 00000000000..41b4326cf42
--- /dev/null
+++ b/Build/source/utils/asymptote/examples/wedge.asy
@@ -0,0 +1,23 @@
+import graph3;
+import solids;
+size(0,150);
+currentprojection=perspective(8,10,2);
+currentlight=White;
+
+draw(circle(O,4,Z));
+draw(shift(-4Z)*scale(4,4,8)*unitcylinder,green+opacity(0.2));
+
+triple F(real x){return (x,sqrt(16-x^2),sqrt((16-x^2)/3));}
+path3 p=graph(F,0,4,operator ..);
+path3 q=reverse(p)--rotate(180,(0,4,4/sqrt(3)))*p--cycle;
+
+render render=render(merge=true);
+draw(surface(q--cycle),red,render);
+
+real t=2;
+path3 triangle=(t,0,0)--(t,sqrt(16-t^2),0)--F(t)--cycle;
+draw(surface(triangle),blue,render);
+
+xaxis3("$x$",Arrow3,PenMargin3(0,0.25));
+yaxis3("$y$",Arrow3,PenMargin3(0,0.25));
+zaxis3("$z$",dashed,Arrow3);