%% auteur : 

-3.5 7 setxrange
-3 5 setyrange
40 setxunit
40 setyunit
/quadrillagewidth[.7 .4 .1] def
[1 1 .5 .5 .5 .5]{.7 setgray} Quadrillage
/z{0 5} def
/x{-3 -3} def
/y{7 0} def
/a{1 0} def
/b{0 1} def
/c{-0.5 -0.5} def
/A{0 0} def
/B{-1 -1} def
/C{2 -1} def
/D{3 0} def
/E{0 4} def
/F{-1 3} def
/G{2 3} def
/H{3 4} def

%quadrillage
.7 setlinewidth
[O x](->) ligne
[O y](->) ligne
[O z](->) ligne
1.3 setlinewidth
[E F G H] polygone
[A B C D] polygone
[F B C G] polygone
[E H D A] polygone
[O a](->) ligne
[O b](->) ligne
[O c](->) ligne

<tex>
$\vec \imath $
</tex>
-.4 0.2 [1.5 dup] dctexlabel

<tex>
$\vec \jmath $ 
</tex>
0.6 -.5 [1.5 dup] ultexlabel

<tex>
$\vec k $
</tex>
-.2 0.8 [1.5 dup] dctexlabel



setTimes
  
(A) O dtext
(B) B ultext
(C) C drtext
(D) D urtext
(E) E ultext
(F) F ultext
(B) G ultext
(H) H urtext
setTimesItalic
(x) -2.6 -3 [1.5 dup] text
(y) 6.5 -0.4 [1.5 dup] text
(z) -0.4 4.5 [1.5 dup] text