input geometriesyr16; figureespace(-10u,-10u,15u,20u); Initialisation(5,30,20,600); color A,B,C,D,E,F,G,H; trace Pave(A,B,C,D,E,F,G,H)(1,1.4,1/5); nomme.lft(A); nomme.lrt(B); nomme.rt(C); nomme.urt(D); nomme.top(E); nomme.lft(F); nomme.lrt(G); nomme.rt(H); trace segment(A,C) dashed evenly scaled 2; trace segment(A,H) dashed evenly scaled 2; finespace; end