Présentation de tracegeom.jps

/A {2 2} def   
/B {-2 2} def   
/C {-2 -2} def

A B C parallelopoint /D defpoint

A D C .5 (=) tripointarc
B A D .5 (-) tripointarc

gsave
   pointilles
   A B D arcp
   C A D arcnp
grestore

1.5 setlinewidth
A B 2 marked
B C 1 marked
A B C angledroit
[A B C D] polygone

setTimesItalic
   (A) A urtext
   (B) B ultext
   (C) C dltext
   (D) D drtext

orange C A .7 trait
rouge C A -1.2 trait
bleu D B 12 Arc