From e0c6872cf40896c7be36b11dcc744620f10adf1d Mon Sep 17 00:00:00 2001 From: Norbert Preining Date: Mon, 2 Sep 2019 13:46:59 +0900 Subject: Initial commit --- graphics/asymptote/examples/twistedtubes.asy | 30 ++++++++++++++++++++++++++++ 1 file changed, 30 insertions(+) create mode 100644 graphics/asymptote/examples/twistedtubes.asy (limited to 'graphics/asymptote/examples/twistedtubes.asy') diff --git a/graphics/asymptote/examples/twistedtubes.asy b/graphics/asymptote/examples/twistedtubes.asy new file mode 100644 index 0000000000..9121ad6444 --- /dev/null +++ b/graphics/asymptote/examples/twistedtubes.asy @@ -0,0 +1,30 @@ +import graph3; +import palette; + +size(300,300,keepAspect=true); + +real w=0.4; + +real f(triple t) {return sin(t.x);} +triple f1(pair t) {return (cos(t.x)-2cos(w*t.y),sin(t.x)-2sin(w*t.y),t.y);} +triple f2(pair t) {return (cos(t.x)+2cos(w*t.y),sin(t.x)+2sin(w*t.y),t.y);} +triple f3(pair t) {return (cos(t.x)+2sin(w*t.y),sin(t.x)-2cos(w*t.y),t.y);} +triple f4(pair t) {return (cos(t.x)-2sin(w*t.y),sin(t.x)+2cos(w*t.y),t.y);} + +surface s1=surface(f1,(0,0),(2pi,10),8,8,Spline); +surface s2=surface(f2,(0,0),(2pi,10),8,8,Spline); +surface s3=surface(f3,(0,0),(2pi,10),8,8,Spline); +surface s4=surface(f4,(0,0),(2pi,10),8,8,Spline); + +pen[] Rainbow=Rainbow(); +s1.colors(palette(s1.map(f),Rainbow)); +s2.colors(palette(s2.map(f),Rainbow)); +s3.colors(palette(s3.map(f),Rainbow)); +s4.colors(palette(s4.map(f),Rainbow)); + +defaultrender.merge=true; + +draw(s1); +draw(s2); +draw(s3); +draw(s4); -- cgit v1.2.3