input geometriesyr12;
figure(0,0,9u,2u);
x.so=0;
y.so=0;
x.ne=9;
y.ne=2;
trace grille(0.5);
drawarrow placepoint(0,2)--placepoint(18,2) withpen pencircle scaled 2bp;
fin;
end