input geometriesyr16 figure(u,u,14u,8.5u); pair C,B,A,F,N,M,E; A=u*(8,5); B-A=u*(-3,1.8); C-A=u*(-2,-1); N=4.8/3[A,C]; M=4.8/3[A,B]; E=8/3[C,A]; F=8/3[B,A]; trace droite(M,N); trace droite(B,C); trace droite(E,F); trace droite(N,E); trace droite(M,F); nomme.urt(M); nomme.urt(B); nomme.top(A); nomme.llft(F); nomme.lft(E); nomme.lft(C); nomme.lft(N); fin; prologues:=2; figureespace(-10u,-10u,10u,10u); Initialisation(5,30,20,700); color S,A,B,C,D,O,O',A',B',C',D'; D=(0,0,0); A-D=(0.45,0,0); B-A=(0,0.6,0); C-B=D-A; O=1/2[B,D]; S-O=(0,0,1); O'=2/3[S,O]; A'=2/3[S,A]; B'=2/3[S,B]; C'=2/3[S,C]; D'=2/3[S,D]; NbS:=5; Sommet1:=S; Sommet2:=A; Sommet3:=B; Sommet4:=C; Sommet5:=D; NF:=5; Fc[100]:=4;Fc[101]:=2;Fc[102]:=5;Fc[103]:=4;Fc[104]:=3; Fc[200]:=3;Fc[201]:=1;Fc[202]:=2;Fc[203]:=3; Fc[300]:=3;Fc[301]:=1;Fc[302]:=5;Fc[303]:=2; Fc[400]:=3;Fc[401]:=1;Fc[402]:=4;Fc[403]:=5; Fc[500]:=3;Fc[501]:=1;Fc[502]:=3;Fc[503]:=4; DessineObjet; trace segment(B,D) dashed evenly; trace segment(A,C) dashed evenly; trace chemin(A',B',C'); trace chemin(B',D',C',A',D') dashed evenly; trace segment(S,O) dashed evenly; nomme.top(S); nomme.llft(A); nomme.lrt(B); nomme.rt(C); nomme.ulft(D); nomme.urt(C'); nomme.ulft(D'); nomme.lft(A'); nomme.lrt(B'); nomme.bot(O); nomme.urt(O'); finespace; end