%@AUTEUR:Guillaume Connan

prologues:=2;

verbatimtex
%&latex
\documentclass{article}
\usepackage[upright]{fourier}
\begin{document}
etex

input geometriesyr16

vardef pol(expr r,t) =
  (r*cos(t),r*sin(t))
enddef;

transform T;
(0,0) transformed T =(-u,2.732u);
(u,0) transformed T =(-2.732u,1.732u);
(0,u) transformed T =(0,u);

figure(-5u,-4u,5u,3u);

pair M[];

M[0]=(0.433u,0.75u);
for k=0 upto 2 :
  M[k+1]= M[k] transformed T;
endfor;

drawarrow (-5u,0)--(5u,0);
drawarrow (0,-4u)--(0,3u);

dotlabel.lrt(btex $M_0$ etex, M[0] );
dotlabel.lft(btex $M_1$ etex, M[1] );
dotlabel.rt(btex $M_2$ etex, M[2] );
dotlabel.bot(btex $M_3$ etex, M[3] );
dotlabel.ulft(btex $\Omega$ etex,(0,u) );

for i=0 upto 3 :
  draw (0,u)--M[i];
endfor;

draw (0,u)--(5u,u) withcolor orange withpen pencircle scaled 1.3bp;

fin;

end