I have a pbs: Suppose 3 vector A, B,C with noted [A:B]:=(list)[ A,B,-A,-B] (i.e a paralelogram);

An endomorphism T such that T(.) where (.)=A,B or C are B,C, and (list)[C,-A,-B,-B]
 and T([x:y])=[T([x]):T([y])] where x,y = A,B or C.

Problem: draw T^{n}[A:B] , i.e its boundary is a fractal figure when n is big.

How can we draw a sequence of segments with a list data of column vector? Thanks

how can i draw a polygon with labeled vertex by numbers which are inside of that polygon§

I draw tiles, i want to utilise un plot of an array 2 dimension. But i have had a good solution ?

I input data by hand :

> with(plottools);
> with(plots);

 > a := proc (i, j) options operator, arrow; polygon([[i, j], [i, j+1], [i+1, j+1], [i+1, j]], color = red) end proc; b := proc (i, j) options operator, arrow; polygon([[i, j], [i, j+1], [i+1, j+1], [i+1, j]], color = green) end proc;