summaryrefslogtreecommitdiff
path: root/Master/texmf/doc/asymptote/examples/washermethod.asy
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf/doc/asymptote/examples/washermethod.asy')
-rw-r--r--Master/texmf/doc/asymptote/examples/washermethod.asy43
1 files changed, 0 insertions, 43 deletions
diff --git a/Master/texmf/doc/asymptote/examples/washermethod.asy b/Master/texmf/doc/asymptote/examples/washermethod.asy
deleted file mode 100644
index d86bf8cd4df..00000000000
--- a/Master/texmf/doc/asymptote/examples/washermethod.asy
+++ /dev/null
@@ -1,43 +0,0 @@
-import graph3;
-import solids;
-size(0,150);
-currentprojection=perspective(0,0,11,up=Y);
-
-pen color1=green+opacity(0.25);
-pen color2=red;
-real alpha=250;
-
-real f(real x) {return 2x^2-x^3;}
-pair F(real x) {return (x,f(x));}
-triple F3(real x) {return (x,f(x),0);}
-
-ngraph=12;
-
-real x1=0.7476;
-real x2=1.7787;
-real x3=1.8043;
-
-path[] p={graph(F,x1,x2,Spline),
- graph(F,0.7,x1,Spline)--graph(F,x2,x3,Spline),
- graph(F,0,0.7,Spline)--graph(F,x3,2,Spline)};
-
-pen[] pn=new pen[] {color1,color2,color1};
-
-render render=render(compression=0);
-
-for(int i=0; i < p.length; ++i) {
- revolution a=revolution(path3(p[i]),Y,0,alpha);
- draw(surface(a),pn[i],render);
-
- surface s=surface(p[i]--cycle);
- draw(s,pn[i],render);
- draw(rotate(alpha,Y)*s,pn[i],render);
-}
-
-draw((4/3,0,0)--F3(4/3),dashed);
-xtick("$\frac{4}{3}$",(4/3,0,0));
-
-xaxis3(Label("$x$",1),Arrow3);
-yaxis3(Label("$y$",1),ymax=1.25,dashed,Arrow3);
-arrow("$y=2x^2-x^3$",F3(1.6),X+Y,0.75cm,red);
-draw(arc(1.1Y,0.3,90,0,7.5,180),Arrow3);