> restart;

> x:=cos(t);

> y:=sin(t);

> m:=[[x,y],[x-y,x+y]];

> t:=2*k*Pi/100;

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

>