\input fig4tex.tex %%%%%%%% DEBUT DESSIN cube sept %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% \figinit{3cm,3D} % axe \figpt 1:(0,0,0)\figpt 2:(0,0,2)\figpt 3:(0,2,2) \figpt 4:(2,2,2)\figpt 5:(2,0,2) \figpt 6:(2,0,0)\figpt 7:(2,2,0)\figpt 8:(0,2,0) \figpt 9:(0,0,1)\figpt 20:(1,0,0) \figpt 10:(0,1,2) \figvectP 14[3,4] \figvectN 15[20,9,10] \figptinterlineplane 12 :[3,14; 20,15] \figvectP 16[7,4] \figptinterlineplane 11 :[7,16; 20,15] \figvectP 19[6,7] \figptinterlineplane 18 :[6,19; 20,15] \figvectN 21[1,6,7] \figvectP 22[10,9] \figptinterlineplane 23 :[9,22; 1,21] %%%%%%%%%%%%%%%%%%%%% %% fichier graphical %%%%%%%%%%%%%%%%%%% \psbeginfig{} \psset(width=1,fillmode=yes,color=0.7)\psline[20,9,10,12,11,18,20] \psreset{first} \psline[1,2,3,4,5,2]\psline[1,6,7,4,5,6] %\psline[20,9,10,11] \psset(width=1)\psline[10,12]\psline[20,9]\psline[11,18] \psset(dash =5) \psline[1,8,7]\psline[3,8] \psset(width=1)\psline[9,10]\psline[11,12]\psline[18,20] \psreset{first} \psset(dash=5)\psline[9,23,20] \psendfig %%%%%%%%%%%%%%%%%%% %% writing %%%%%%%%%%%%%%%%%%% \def\DIM{0.05} \figvisu{\figBoxA}{}{ \figwritew 1:$D$(\DIM) \figwritew 2:$A$(\DIM) \figwritenw 3:$E$(\DIM) \figwritene 4:$H$(\DIM) \figwritesw 5:$B$(\DIM) \figwritee 6:$C$(\DIM) \figwritee 7:$G$(\DIM) \figwrites 8:$F$(\DIM) \figwritew 9:$J$(\DIM) \figwritenw 10:$K$(\DIM) \figwritee 11:$M$(\DIM) \figwriten 12:$L$(\DIM) \figwritee 18:$N$(\DIM) \figwrites 20:$I$(\DIM) \figwrites 23:$R$(\DIM) } \box\figBoxA \bye