input geometriesyr16; figureespace(-10u,-10u,10u,10u); Initialisation(5,30,20,500); color A,B,C,D,E,F,G,H; trace Cube(D,H,G,C,B,A,E,F); nomme.llft(D); nomme.lrt(H); nomme.rt(G); nomme.urt(C); nomme.lrt(E); nomme.top(F); nomme.top(B); nomme.lft(A); color I; I=1/2[F,G]; trace codesegments(F,I,I,G,2); drawoptions(withpen pencircle scaled 1.75bp); trace chemin(D,H,I); trace segment(I,D) dashed evenly; drawoptions(); nomme.rt(I); finespace; figureespace(-10u,-10u,10u,10u); Initialisation(5,30,20,500); color A,B,C,D,E,F,G,H; trace Cube(D,H,G,C,B,A,E,F); nomme.llft(D); nomme.lrt(H); nomme.rt(G); nomme.urt(C); nomme.lrt(E); nomme.top(F); nomme.top(B); nomme.lft(A); color I,J; I=1/2[D,H]; J=1/2[G,H]; trace codesegments(D,I,I,H,2); trace codesegments(G,J,J,H,2); drawoptions(withpen pencircle scaled 1.75bp); trace segment(J,F); trace chemin(F,I,J) dashed evenly; drawoptions(); nomme.bot(I); nomme.rt(J); finespace; figureespace(-10u,-10u,10u,10u); Initialisation(5,30,20,500); color A,B,C,D,E,F,G,H; trace Cube(D,H,G,C,B,A,E,F); nomme.llft(D); nomme.lrt(H); nomme.rt(G); nomme.urt(C); nomme.lrt(E); nomme.top(F); nomme.top(B); nomme.lft(A); drawoptions(withpen pencircle scaled 1.75bp); trace chemin(D,B,H) dashed evenly; trace segment(D,H); drawoptions(); finespace; end