input geometriesyr16; figure(0,0,7.5u,5u); trace grille(0.5); trace hachurage(polygone(placepoint(1,2),placepoint(3,2),placepoint(3,4),placepoint(1,4)),60,0.1,0); trace polygone(placepoint(7,2),placepoint(7,6),placepoint(6,6),placepoint(6,8),placepoint(7,8),placepoint(7,7),placepoint(8,7),placepoint(8,8),placepoint(9,8),placepoint(9,7),placepoint(10,7),placepoint(10,8),placepoint(11,8),placepoint(11,6),placepoint(10,6),placepoint(10,2)) withpen pencircle scaled 1.5bp; fin; end