Présentation de synt_006.jps

-2 8 setyrange
-3 7 setxrange

quadrillage
tracerepere
marks

/A {-2 5} def
/B {2 -1} def
/C {5 1} def
/D {15 4 div -.5} def
/I {A C milieu} def
/G {I I B vecteur 1 3 div mulv addv} def
I I A distance cercle

[G I] {times2} plot
[A B C D] points
[A B C] polygone

A B C angledroit
pointilles
[I B] ligne
setTimesItalic
   (O) O drtext
   (A) A ultext
   (B) B drtext
   (C) C drtext
   (D) D drtext
   (I) I urtext
   (G) G urtext