Fichier 948.jps — Modifié le 8 Mai 2007 à 13 h 20
%% auteur : Christian Vassard
-5 12 setxrange
-5 12 setyrange
30 setxunit
30 setyunit
15 setfontsize
%% definition des points
/A {-4 -3} def
/B {2 -1} def
/C {0 3} def
/D {6 5} def
/E {3 4} def
/F {10 11} def
%% repere et quadrillage
quadrillage
traceaxes
unites
%% les points
[A B C D E F] points
[A D F C] polygone
pointilles
.7 setcurvelinewidth
[A F] ligne
[C D] ligne
[B F] ligne
%% un point tout seul (le point O est predefini)
O point
%% la legende
setTimesItalic
(A) A ltext
(B) B rtext
(C) C ltext
(D) D dtext
(E) E dltext
(F) F rtext