summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/doc/latex/latex-graphics-companion/3-1-6.mp
blob: 82212a0167a31cbb5ac77fea721fb36922aae646 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13

defaultfont:="ptmr8r";
warningcheck:=0;
beginfig(1)
pickup pencircle scaled 4pt
   yscaled .2pt rotated 60;
n:=5;
for i := (n*20) step -(n) until (n):
 draw (i,0)..(0,i)..(-i,0)
      ..(0,-(i-n))..(i-n,0);
endfor
endfig;
end;