Construct the line segments joining
[cos(t),sin(t)] with [cos(2t),sin(2t)] as t
ranges over [0,2p].

>

> restart;

> x1:=cos(t);

> y1:=sin(t);

> x2:=cos(2*t);

> y2:=sin(2*t);

> m:=[[x1,y1],[x2,y2]];

> t:=k*Pi/50;

> plot([m$k=1..100],color=yellow,scaling=constrained,axes=none);

>