diff options
Diffstat (limited to 'Master/texmf-dist/doc/asymptote/examples/shellsqrtx01.asy')
-rw-r--r-- | Master/texmf-dist/doc/asymptote/examples/shellsqrtx01.asy | 36 |
1 files changed, 36 insertions, 0 deletions
diff --git a/Master/texmf-dist/doc/asymptote/examples/shellsqrtx01.asy b/Master/texmf-dist/doc/asymptote/examples/shellsqrtx01.asy new file mode 100644 index 00000000000..553200df14c --- /dev/null +++ b/Master/texmf-dist/doc/asymptote/examples/shellsqrtx01.asy @@ -0,0 +1,36 @@ +import graph3; +import solids; +size(0,150); +currentprojection=orthographic(1,0,10,up=Y); +pen color=green; +real alpha=-240; + +real f(real x) {return sqrt(x);} +pair F(real x) {return (x,f(x));} +triple F3(real x) {return (x,f(x),0);} + +path p=graph(F,0,1,n=30,operator ..)--(1,0)--cycle; +path3 p3=path3(p); + +revolution a=revolution(p3,X,alpha,0); + +render render=render(compression=0,merge=true); +draw(surface(a),color,render); +draw(p3,blue); + +surface s=surface(p); +draw(s,color,render); +draw(rotate(alpha,X)*s,color,render); + +xaxis3(Label("$x$",1),xmax=1.25,dashed,Arrow3); +yaxis3(Label("$y$",1),Arrow3); + +dot("$(1,1)$",(1,1,0)); +arrow("$y=\sqrt{x}$",F3(0.8),Y,0.75cm,red); + +real r=0.4; +draw(F3(r)--(1,f(r),0),red); +real x=(1+r)/2; + +draw("$r$",(x,0,0)--(x,f(r),0),X+0.2Z,red,Arrow3,PenMargin3); +draw(arc(1.1X,0.4,90,90,3,-90),Arrow3); |