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;
Generated by dwww version 1.15 on Wed May 22 21:32:43 CEST 2024.