diff options
author | Karl Berry <karl@freefriends.org> | 2013-04-07 18:26:53 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2013-04-07 18:26:53 +0000 |
commit | b04c2e1a42573e9735547702356c7b9a769a6855 (patch) | |
tree | c0753443f39500a062d7698fe6b94359c813f871 /Master/texmf-dist/doc/asymptote/examples/Sierpinski.asy | |
parent | fb0bf13304a356f197bfc1add17f98c07e96f17b (diff) |
texmf -> texmf-dist: doc
git-svn-id: svn://tug.org/texlive/trunk@29714 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/doc/asymptote/examples/Sierpinski.asy')
-rw-r--r-- | Master/texmf-dist/doc/asymptote/examples/Sierpinski.asy | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/Master/texmf-dist/doc/asymptote/examples/Sierpinski.asy b/Master/texmf-dist/doc/asymptote/examples/Sierpinski.asy new file mode 100644 index 00000000000..d1664045d9f --- /dev/null +++ b/Master/texmf-dist/doc/asymptote/examples/Sierpinski.asy @@ -0,0 +1,17 @@ +size(10cm); + +// Draw Sierpinski triangle with top vertex A, side s, and depth q. +void Sierpinski(pair A, real s, int q, bool top=true) +{ + pair B=A-(1,sqrt(2))*s/2; + pair C=B+s; + if(top) draw(A--B--C--cycle); + draw((A+B)/2--(B+C)/2--(A+C)/2--cycle); + if(q > 0) { + Sierpinski(A,s/2,q-1,false); + Sierpinski((A+B)/2,s/2,q-1,false); + Sierpinski((A+C)/2,s/2,q-1,false); + } +} + +Sierpinski((0,1),1,5); |