diff options
Diffstat (limited to 'Master/texmf-dist/doc/metapost/base/source-tutorial/circles.mp')
-rw-r--r-- | Master/texmf-dist/doc/metapost/base/source-tutorial/circles.mp | 22 |
1 files changed, 22 insertions, 0 deletions
diff --git a/Master/texmf-dist/doc/metapost/base/source-tutorial/circles.mp b/Master/texmf-dist/doc/metapost/base/source-tutorial/circles.mp new file mode 100644 index 00000000000..ef7eadc7658 --- /dev/null +++ b/Master/texmf-dist/doc/metapost/base/source-tutorial/circles.mp @@ -0,0 +1,22 @@ +if scantokens(mpversion) > 1.005: + outputtemplate := +else: + filenametemplate +fi +"%j.mps"; + +beginfig(0); + % Use 8 circles + N:=8; + + % Compute the "correct" radius + r:=54*sind(180/N)/(1+sind(180/N)); + + % Define one of the cirlces + path p; + p:=fullcircle scaled (2*r); + + % Draw all 8 circles + for n=0 upto N-1: draw p shifted (r/sind(180/N),0) rotated (360/N*n); endfor; +endfig; +end |