Source
%% auteur : 
-4.9 7 setxrange
-4.9 4.9 setyrange
50 setxunit
50 setyunit
xticks
yticks
/cerc{O 4} def
cerc cercle
/I{1 0} def
/J{0 1} def
/K{-4 0} def
/L{4 0} def
/M{0 -4} def
/N{0 4} def
[M N] ligne
[K L] ligne
/A{60 cerc cpoint} def
A point
/B {132 cerc cpoint} def
B point
/C{204 cerc cpoint} def
C point
/D{276 cerc cpoint} def
D point
/E{348 cerc cpoint} def
E point
[A B C D E] polygone
O I droite
/A'{O E A translatepoint} def
A' point
%
%[A A'] ligne
1.8 setlinewidth
[O I] (->) ligne
[O J] (->) ligne
1 setlinewidth
[A' A] ligne
[A A' E O] polygone

#latex#$\vec{i}$
0.5 -0.2 [1.2 1.2] cctexlabel

#latex#$\vec{j}$
-0.1 0.5 [1.2 1.2] cctexlabel
setTimes
(A) A [1.5 1.5] urtext
(B) B [1.5 1.5]  ultext
(O) O [1.5 1.5] dltext
(C) C [1.5 1.5]  dltext
(D) D [1.5 1.5] dtext
(E) E [1.5 1.5] drtext
(I) L [1.5 1.5] rtext
(F) 6 2.5 [1.5 1.5] rtext