28.4527 setxunit %% 10 mm
%60 setxunit
0 5 setxrange
0 4 setyrange

%[1 1 .5 .5 .1 .1] {orange} Quadrillage

%tracerepere marks

/O {2.5 1.7} def
/r 2 def                      %% rayon du cercle
/cerc {O 2} def                 %% on nomme le cercle
/cerc1 {O 1} def                 %% on nomme le cercle
/cerc2 {O 3} def                 %% on nomme le cercle
/A {5 cerc cpoint} def        %% A = point du cercle d'angle 5
/B {50 cerc cpoint} def         %% B = point du cercle d'angle 50
/AA {185 cerc cpoint} def        %% A = point du cercle d'angle 5
/BB {230 cerc cpoint} def         %% B = point du cercle d'angle 50

O A droite
O B droite

A O B 1.2 (<-) tripointarcarrow
AA O BB 1.2 (<-) tripointarcarrow
A O BB 0.7 (<-) tripointarcarrow
AA O B 0.9 (<-) tripointarcarrow