28.4527 setxunit %% 10 mm
%90 setxunit
0 4.5 setxrange
0 3 setyrange

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

%tracerepere marks

/a 1.1 def
/b 0.5 def
/v {a b} def
/w {1 1} def
/A1 {1.8 0.7} def
/D1 {A1 v addv} def
/A2 {A1 w addv} def
A1 D1 droite
A1 A2 droite
D1 A1 A2 1 (<-) tripointarcarrow