input geometriesyr16; figure(0,0,4.5u,4.5u); x.u:=5mm; y.u:=5mm; remplis polygone(pp(0,8),pp(1,8),pp(1,9),pp(0,9)) withcolor gris; remplis polygone(pp(0,6),pp(3,6),pp(3,9),pp(2,9),pp(2,7),pp(0,7)) withcolor gris; remplis polygone(pp(0,4),pp(5,4),pp(5,9),pp(4,9),pp(4,5),pp(0,5)) withcolor gris; remplis polygone(pp(0,2),pp(7,2),pp(7,9),pp(6,9),pp(6,3),pp(0,3)) withcolor gris; remplis polygone(pp(0,0),pp(9,0),pp(9,9),pp(8,9),pp(8,1),pp(0,1)) withcolor gris; trace grille(0.5); fin; end