Fichier 1727.jps — Modifié le 22 Mars 2007 à 17 h 52

1727.pdf
Source
%% auteur : Christian Vassard


-3 8 setxrange
-5 5 setyrange
15 setfontsize
30 setxunit
30 setyunit
/A {2.5 1} def
/B {-1 -2} def
/C {3 -2} def
[A B C] points
[A B C] polygone
/M {-2 2.5} def
M point

/N {M A 180 rotatepoint} def
N point

/P {N C 180 rotatepoint} def
P point

/Q {P B 180 rotatepoint} def
Q point



pointilles
.7 setcurvelinewidth
[M N] ligne
[N P] ligne
[P Q] ligne
A M 3 marked
A N 3 marked
C N 2 marked
C P 2 marked
B P 1 marked
B Q 1 marked




setTimesItalic
   (A) A drtext
   (B) B drtext
   (C) C drtext
   (M) M drtext
   (N) N drtext
   (P) P drtext
   (Q) Q drtext