Fichier 887.jps — Modifié le 11 Mars 2006 à 10 h 54
%% auteur :
-1 5 setxrange
-1 5 setyrange
50 setxunit
50 setyunit
/A{0 4} def
/B{4 4} def
/C{4 0} def
/D{0 0} def
/E{1.5 4} def
/H{4 2.5} def
/G{0 2.5} def
/F{1.5 0} def
[A B C D] polygone
A B C angledroit
B C D angledroit
C D A angledroit
D A B angledroit
[G H] ligne
[E F] ligne
setTimes
(A) A [1.5 1.5] ultext
(D) B [1.5 1.5] urtext
(C) C [1.5 1.5] dtext
(B) D [1.5 1.5] dltext
(E) E [1.5 1.5] utext
(F) 1.5 0 [1.5 1.5] dtext
(G) G [1.5 1.5] ltext
(H) H [1.5 1.5] rtext
(I) 1.5 2.5 [1.5 1.5] drtext
setTimesItalic
(x) 0.75 4 [1.5 1.5] utext