쉬운 길 두고 돌아가기 제2탄.

u := 50;
path p; p = fullcircle scaled 2u;
t := length p / 360;
beginfig(0);
drawarrow (down -- up) scaled u;
drawarrow origin -- right scaled 370;
draw origin
for i=1 upto 360: .. (i, ypart point t*i of p) endfor
withpen pencircle scaled 1.5;
endfig;