autocrop
12 setfontsize
/A {-3 3} def
/B {-2 3} def
/C {-1 3} def
/D {0 3} def
/E {2 3} def
[A B C D E] points
noir
setTimes
(A) A () uctext
(B) B uctext
(C) C (0 10) uctext
circleit
(D) D uctext
boxit
/linearc .2 def
/fillstyle {jaune fill} def
/dx_boxit 16 def
(E) E {30} uctext
|