test-decoupe_cube.tex

\documentclass{article}
\usepackage{pst-V3D}
\usepackage[latin1]{inputenc}
\usepackage[T1]{fontenc}% utiliser obligatoirement ce codage !!!
% sinon affichage des lettres accentuées
% très perturbées !!!
\usepackage[a4paper]{geometry}
\input{cube_object.tex}
\input{decoupecube_object.tex}
 
\def\Rectangle(#1,#2)(#3,#4){
newpath
#1 #2 moveto
#3 #2 lineto
#3 #4 lineto
#1 #4 lineto
 closepath }
 
 
\definecolor{Orange}{rgb}{.956 .643 .376}
 
\newcommand\CUBE{%
    \pstVerb{1 setlinejoin}%
    \pnodeXYZ(2,2,4){A}
    \pnodeXYZ(-2,2,4){B}
    \pnodeXYZ(-2,-2,4){C}
    \pnodeXYZ(2,-2,4){D}
    \pnodeXYZ(2,2,0){E}
    \pnodeXYZ(-2,2,0){F}
    \pnodeXYZ(-2,-2,0){G}
    \pnodeXYZ(2,-2,0){H}}
\pagestyle{empty}
\begin{document}
\psset{arete=false}
\begin{center}
\psset{unit=0.5}
\psset{A=4,THETA=30,PHI=40,Dobs=20,Decran=15}
\begin{pspicture}(-4.5,-4)(4,5)
\psframe(-4.5,-4)(4,5)
\CUBE
\planThreeDput[fillstyle=solid,fillcolor=Orange,normale=90 -90]{\Rectangle(-4,-4)(4,4)}
\planThreeDput[gridcolor=white,normale=90 -90,fontscale=0.5]{\Grille(-4,-4)(4,4)}
\uput[r](A){$A$}\uput[u](B){$B$}\uput[u](C){$C$}\uput[u](D){$D$}
\uput[d](E){$E$}\uput[r](F){$F$}\uput[l](H){$H$}
\pspolygon[linewidth=0.5\pslinewidth,linecolor=gray!50](C)(B)(F)(G)
\psDecoupeCube(0,0,2)
\pspolygon[linewidth=0.5\pslinewidth](A)(B)(C)(D)
\pspolygon[linewidth=0.5\pslinewidth](A)(E)(F)(B)
\pspolygon[linewidth=0.5\pslinewidth](A)(D)(H)(E)
\end{pspicture}
\begin{pspicture}(-4.5,-4)(4,5)
\psframe(-4.5,-4)(4,5)
\psset{PHI=60}
\CUBE
\planThreeDput[fillstyle=solid,fillcolor=Orange,normale=90 -90]{\Rectangle(-4,-4)(4,4)}
\planThreeDput[gridcolor=white,normale=90 -90,fontscale=0.5]{\Grille(-4,-4)(4,4)}
\uput[u](B){$B$}\uput[u](C){$C$}\uput[u](D){$D$}
\uput[d](E){$E$}\uput[r](F){$F$}\uput[l](H){$H$}
\pspolygon[linewidth=0.5\pslinewidth,linecolor=gray!50](C)(B)(F)(G)
\psDecoupeCube[tetraedre=T2](0,0,2)
\uput[r](A){$A$}
\pspolygon[linewidth=0.5\pslinewidth](A)(B)(C)(D)
\pspolygon[linewidth=0.5\pslinewidth](A)(E)(F)(B)
\pspolygon[linewidth=0.5\pslinewidth](A)(D)(H)(E)
\end{pspicture}
\begin{pspicture}(-4.5,-4)(4,5)
\psframe(-4.5,-4)(4,5)
\CUBE
\planThreeDput[fillstyle=solid,fillcolor=Orange,normale=90 -90]{\Rectangle(-4,-4)(4,4)}
\planThreeDput[gridcolor=white,normale=90 -90,fontscale=0.5]{\Grille(-4,-4)(4,4)}
\uput[u](B){$B$}\uput[u](C){$C$}\uput[u](D){$D$}
\uput[d](E){$E$}\uput[r](F){$F$}\uput[l](H){$H$}\uput[ur](G){$G$}
\pspolygon[linewidth=0.5\pslinewidth,linecolor=gray!50](C)(B)(F)(G)
\pspolygon[linewidth=0.5\pslinewidth,linecolor=gray!50](C)(D)(H)(G)
\psDecoupeCube[tetraedre=T5](0,0,2)
\uput[r](A){$A$}
\pspolygon[linewidth=0.5\pslinewidth](A)(B)(C)(D)
\pspolygon[linewidth=0.5\pslinewidth](A)(E)(F)(B)
\pspolygon[linewidth=0.5\pslinewidth](A)(D)(H)(E)
\end{pspicture}
\begin{pspicture}(-4.5,-4)(4,5)
\psframe(-4.5,-4)(4,5)
\CUBE
\planThreeDput[fillstyle=solid,fillcolor=Orange,normale=90 -90]{\Rectangle(-4,-4)(4,4)}
\planThreeDput[gridcolor=white,normale=90 -90,fontscale=0.5]{\Grille(-4,-4)(4,4)}\uput[u](B){$B$}\uput[u](C){$C$}\uput[u](D){$D$}
\uput[d](E){$E$}\uput[r](F){$F$}\uput[l](H){$H$}\uput[ul](G){$G$}
\pspolygon[linewidth=0.5\pslinewidth,linecolor=gray!50](C)(B)(F)(G)
\pspolygon[linewidth=0.5\pslinewidth,linecolor=gray!50](C)(D)(H)(G)
\psDecoupeCube[tetraedre=T4](0,0,2)
\uput[r](A){$A$}
\pspolygon[linewidth=0.5\pslinewidth](A)(B)(C)(D)
\pspolygon[linewidth=0.5\pslinewidth](A)(E)(F)(B)
\pspolygon[linewidth=0.5\pslinewidth](A)(D)(H)(E)
\end{pspicture}
\begin{pspicture}(-4.5,-4)(4,5)
\psframe(-4.5,-4)(4,5)
\CUBE
\planThreeDput[fillstyle=solid,fillcolor=Orange,normale=90 -90]{\Rectangle(-4,-4)(4,4)}
\planThreeDput[gridcolor=white,normale=90 -90,fontscale=0.5]{\Grille(-4,-4)(4,4)}
\uput[r](A){$A$}\uput[u](B){$B$}\uput[u](C){$C$}\uput[u](D){$D$}
\uput[d](E){$E$}\uput[r](F){$F$}\uput[l](H){$H$}\uput[ul](G){$G$}
\pspolygon[linewidth=0.5\pslinewidth,linecolor=gray!50](C)(B)(F)(G)
\pspolygon[linewidth=0.5\pslinewidth,linecolor=gray!50](C)(D)(H)(G)
\psDecoupeCube[tetraedre=T3](0,0,2)
\pspolygon[linewidth=0.5\pslinewidth](A)(B)(C)(D)
\pspolygon[linewidth=0.5\pslinewidth](A)(E)(F)(B)
\pspolygon[linewidth=0.5\pslinewidth](A)(D)(H)(E)
\end{pspicture}
\begin{pspicture}(-4.5,-4)(4,5)
\psframe(-4.5,-4)(4,5)
\CUBE
\planThreeDput[fillstyle=solid,fillcolor=Orange,normale=90 -90]{\Rectangle(-4,-4)(4,4)}
\planThreeDput[gridcolor=white,normale=90 -90,fontscale=0.5]{\Grille(-4,-4)(4,4)}\uput[u](B){$B$}\uput[u](C){$C$}\uput[u](D){$D$}
\uput[d](E){$E$}\uput[r](F){$F$}\uput[l](H){$H$}\uput[ul](G){$G$}
\pspolygon[linewidth=0.5\pslinewidth,linecolor=gray!50](C)(B)(F)(G)
\pspolygon[linewidth=0.5\pslinewidth,linecolor=gray!50](C)(D)(H)(G)
\psDecoupeCube[tetraedre=T6](0,0,2)
\uput[r](A){$A$}
\pspolygon[linewidth=0.5\pslinewidth](A)(B)(C)(D)
\pspolygon[linewidth=0.5\pslinewidth](A)(E)(F)(B)
\pspolygon[linewidth=0.5\pslinewidth](A)(D)(H)(E)
\end{pspicture}
%
\begin{pspicture}(-4.5,-4)(4,5)
\psframe(-4.5,-4)(4,5)
\psset{PHI=60}
\CUBE
\planThreeDput[fillstyle=solid,fillcolor=Orange,normale=90 -90]{\Rectangle(-4,-4)(4,4)}
\planThreeDput[gridcolor=white,normale=90 -90,fontscale=0.5]{\Grille(-4,-4)(4,4)}
\pspolygon[linewidth=0.5\pslinewidth,linecolor=gray!50](C)(B)(F)(G)
\pspolygon[linewidth=0.5\pslinewidth,linecolor=gray!50](C)(D)(H)(G)
\psDecoupeCube[tetraedre=T2](0,0,2)
\pspolygon[linewidth=0.5\pslinewidth](A)(B)(C)(D)
\pspolygon[linewidth=0.5\pslinewidth](A)(E)(F)(B)
\pspolygon[linewidth=0.5\pslinewidth](A)(D)(H)(E)
\end{pspicture}
\begin{pspicture}(-4.5,-4)(4,5)
\psframe(-4.5,-4)(4,5)
%\psset{PHI=60}
\CUBE
\planThreeDput[fillstyle=solid,fillcolor=Orange,normale=90 -90]{\Rectangle(-4,-4)(4,4)}
\planThreeDput[gridcolor=white,normale=90 -90,fontscale=0.5]{\Grille(-4,-4)(4,4)}
\psDecoupeCube[tetraedre=T4](0,0,2)
\psDecoupeCube[tetraedre=T2](0,0,2)
\pspolygon[linewidth=0.5\pslinewidth](A)(B)(C)(D)
\pspolygon[linewidth=0.5\pslinewidth](A)(E)(F)(B)
\pspolygon[linewidth=0.5\pslinewidth](A)(D)(H)(E)
\end{pspicture}
\begin{pspicture}(-4.5,-4)(4,5)
\psframe(-4.5,-4)(4,5)
\CUBE
\planThreeDput[fillstyle=solid,fillcolor=Orange,normale=90 -90]{\Rectangle(-4,-4)(4,4)}
\planThreeDput[gridcolor=white,normale=90 -90,fontscale=0.5]{\Grille(-4,-4)(4,4)}
\psDecoupeCube[tetraedre=T2](0,0,2)
\psDecoupeCube[tetraedre=T4](0,0,2)
\psDecoupeCube(0,0,2)
\pspolygon[linewidth=0.5\pslinewidth](A)(B)(C)(D)
\pspolygon[linewidth=0.5\pslinewidth](A)(E)(F)(B)
\pspolygon[linewidth=0.5\pslinewidth](A)(D)(H)(E)
\end{pspicture}
\begin{pspicture}(-4.5,-4)(4,5)
\psframe(-4.5,-4)(4,5)
\CUBE
\planThreeDput[fillstyle=solid,fillcolor=Orange,normale=90 -90]{\Rectangle(-4,-4)(4,4)}
\planThreeDput[gridcolor=white,normale=90 -90,fontscale=0.5]{\Grille(-4,-4)(4,4)}
\psDecoupeCube[tetraedre=T2](0,0,2)
\psDecoupeCube[tetraedre=T4](0,0,2)
\psDecoupeCube(0,0,2)
\psDecoupeCube[tetraedre=T6](0,0,2)
\pspolygon[linewidth=0.5\pslinewidth](A)(B)(C)(D)
\pspolygon[linewidth=0.5\pslinewidth](A)(E)(F)(B)
\pspolygon[linewidth=0.5\pslinewidth](A)(D)(H)(E)
\end{pspicture}
\begin{pspicture}(-4.5,-4)(4,5)
\psframe(-4.5,-4)(4,5)
\CUBE
\planThreeDput[fillstyle=solid,fillcolor=Orange,normale=90 -90]{\Rectangle(-4,-4)(4,4)}
\planThreeDput[gridcolor=white,normale=90 -90,fontscale=0.5]{\Grille(-4,-4)(4,4)}
\psDecoupeCube[tetraedre=T2](0,0,2)
\psDecoupeCube[tetraedre=T4](0,0,2)
\psDecoupeCube(0,0,2)
\psDecoupeCube[tetraedre=T6](0,0,2)
\psDecoupeCube[tetraedre=T5](0,0,2)
\pspolygon[linewidth=0.5\pslinewidth](A)(B)(C)(D)
\pspolygon[linewidth=0.5\pslinewidth](A)(E)(F)(B)
\pspolygon[linewidth=0.5\pslinewidth](A)(D)(H)(E)
\end{pspicture}
\begin{pspicture}(-4.5,-4)(4,5)
\psframe(-4.5,-4)(4,5)
\CUBE
\planThreeDput[fillstyle=solid,fillcolor=Orange,normale=90 -90]{\Rectangle(-4,-4)(4,4)}
\planThreeDput[gridcolor=white,normale=90 -90,fontscale=0.5]{\Grille(-4,-4)(4,4)}
\psDecoupeCube[tetraedre=T2](0,0,2)
\psDecoupeCube[tetraedre=T4](0,0,2)
\psDecoupeCube(0,0,2)
\psDecoupeCube[tetraedre=T6](0,0,2)
\psDecoupeCube[tetraedre=T5](0,0,2)
\psDecoupeCube[tetraedre=T3](0,0,2)
\pspolygon[linewidth=0.5\pslinewidth](A)(B)(C)(D)
\pspolygon[linewidth=0.5\pslinewidth](A)(E)(F)(B)
\pspolygon[linewidth=0.5\pslinewidth](A)(D)(H)(E)
\end{pspicture}
\end{center}
\newpage
\begin{center}
\psset{unit=0.5}
\psset{A=4,THETA=-30,PHI=40,Dobs=20,Decran=15}
\begin{pspicture}(-4.5,-4)(4,5)
\psframe(-4.5,-4)(4,5)
%\psset{PHI=60}
\CUBE
\planThreeDput[fillstyle=solid,fillcolor=Orange,normale=90 -90]{\Rectangle(-4,-4)(4,4)}
\planThreeDput[gridcolor=white,normale=90 -90,fontscale=0.5]{\Grille(-4,-4)(4,4)}
\pspolygon[linewidth=0.5\pslinewidth,linecolor=gray!50](C)(B)(F)(G)
\pspolygon[linewidth=0.5\pslinewidth,linecolor=gray!50](C)(D)(H)(G)
\psDecoupeCube[tetraedre=T2](0,0,2)
\pspolygon[linewidth=0.5\pslinewidth](A)(B)(C)(D)
\pspolygon[linewidth=0.5\pslinewidth](A)(E)(F)(B)
\pspolygon[linewidth=0.5\pslinewidth](A)(D)(H)(E)
\psline[linewidth=0.5\pslinewidth,linecolor=gray!50](B)(F)
\psline[linewidth=0.5\pslinewidth](C)(G)
\end{pspicture}
\begin{pspicture}(-4.5,-4)(4,5)
\psframe(-4.5,-4)(4,5)
%\psset{PHI=60}
\CUBE
\planThreeDput[fillstyle=solid,fillcolor=Orange,normale=90 -90]{\Rectangle(-4,-4)(4,4)}
\planThreeDput[gridcolor=white,normale=90 -90,fontscale=0.5]{\Grille(-4,-4)(4,4)}
\psDecoupeCube[tetraedre=T4](0,0,2)
\psDecoupeCube[tetraedre=T2](0,0,2)
\pspolygon[linewidth=0.5\pslinewidth](A)(B)(C)(D)
\pspolygon[linewidth=0.5\pslinewidth](A)(E)(F)(B)
\pspolygon[linewidth=0.5\pslinewidth](A)(D)(H)(E)
\psline[linewidth=0.5\pslinewidth,linecolor=gray!50](B)(F)
\end{pspicture}
\begin{pspicture}(-4.5,-4)(4,5)
\psframe(-4.5,-4)(4,5)
\CUBE
\planThreeDput[fillstyle=solid,fillcolor=Orange,normale=90 -90]{\Rectangle(-4,-4)(4,4)}
\planThreeDput[gridcolor=white,normale=90 -90,fontscale=0.5]{\Grille(-4,-4)(4,4)}
\psDecoupeCube[tetraedre=T4](0,0,2)
\psDecoupeCube[tetraedre=T2](0,0,2)
\psDecoupeCube(0,0,2)
\pspolygon[linewidth=0.5\pslinewidth](A)(B)(C)(D)
\pspolygon[linewidth=0.5\pslinewidth](A)(E)(F)(B)
\psline[linewidth=0.5\pslinewidth,linecolor=gray!50](B)(F)
\pspolygon[linewidth=0.5\pslinewidth](A)(D)(H)(E)
\end{pspicture}
\begin{pspicture}(-4.5,-4)(4,5)
\psframe(-4.5,-4)(4,5)
\CUBE
\planThreeDput[fillstyle=solid,fillcolor=Orange,normale=90 -90]{\Rectangle(-4,-4)(4,4)}
\planThreeDput[gridcolor=white,normale=90 -90,fontscale=0.5]{\Grille(-4,-4)(4,4)}
\psDecoupeCube[tetraedre=T4](0,0,2)
\psDecoupeCube[tetraedre=T2](0,0,2)
\psDecoupeCube(0,0,2)
\psDecoupeCube[tetraedre=T5](0,0,2)
\pspolygon[linewidth=0.5\pslinewidth](A)(D)(H)(E)
\end{pspicture}
\begin{pspicture}(-4.5,-4)(4,5)
\psframe(-4.5,-4)(4,5)
\CUBE
\planThreeDput[fillstyle=solid,fillcolor=Orange,normale=90 -90]{\Rectangle(-4,-4)(4,4)}
\planThreeDput[gridcolor=white,normale=90 -90,fontscale=0.5]{\Grille(-4,-4)(4,4)}
\psDecoupeCube[tetraedre=T4](0,0,2)
\psDecoupeCube[tetraedre=T2](0,0,2)
\psDecoupeCube(0,0,2)
\psDecoupeCube[tetraedre=T5](0,0,2)
\psDecoupeCube[tetraedre=T6](0,0,2)
\psline[linewidth=0.5\pslinewidth](A)(E)
\end{pspicture}
\begin{pspicture}(-4.5,-4)(4,5)
\psframe(-4.5,-4)(4,5)
\CUBE
\planThreeDput[fillstyle=solid,fillcolor=Orange,normale=90 -90]{\Rectangle(-4,-4)(4,4)}
\planThreeDput[gridcolor=white,normale=90 -90,fontscale=0.5]{\Grille(-4,-4)(4,4)}
\psDecoupeCube[tetraedre=T4](0,0,2)
\psDecoupeCube[tetraedre=T2](0,0,2)
\psDecoupeCube(0,0,2)
\psDecoupeCube[tetraedre=T5](0,0,2)
\psDecoupeCube[tetraedre=T6](0,0,2)
\psDecoupeCube[tetraedre=T3](0,0,2)
\end{pspicture}
\end{center}
\newpage
\begin{center}
\psset{unit=0.5}
\psset{A=4,THETA=-120,PHI=40,Dobs=20,Decran=15}
\begin{pspicture}(-4.5,-4)(4,5)
\psframe(-4.5,-4)(4,5)
%\psset{PHI=60}
\CUBE
\planThreeDput[fillstyle=solid,fillcolor=Orange,normale=90 -90]{\Rectangle(-4,-4)(4,4)}
\planThreeDput[gridcolor=white,normale=90 -90,fontscale=0.5]{\Grille(-4,-4)(4,4)}
\pspolygon[linewidth=0.5\pslinewidth,linecolor=gray!50](C)(B)(F)(G)
\pspolygon[linewidth=0.5\pslinewidth,linecolor=gray!50](C)(D)(H)(G)
\psDecoupeCube[tetraedre=T3](0,0,2)
\pspolygon[linewidth=0.5\pslinewidth](A)(B)(C)(D)
\pspolygon[linewidth=0.5\pslinewidth](D)(C)(G)(H)
\pspolygon[linewidth=0.5\pslinewidth](B)(C)(G)(F)
\end{pspicture}
\begin{pspicture}(-4.5,-4)(4,5)
\psframe(-4.5,-4)(4,5)
%\psset{PHI=60}
\CUBE
\planThreeDput[fillstyle=solid,fillcolor=Orange,normale=90 -90]{\Rectangle(-4,-4)(4,4)}
\planThreeDput[gridcolor=white,normale=90 -90,fontscale=0.5]{\Grille(-4,-4)(4,4)}
\psDecoupeCube[tetraedre=T3](0,0,2)
\psDecoupeCube(0,0,2)
\pspolygon[linewidth=0.5\pslinewidth](A)(B)(C)(D)
\pspolygon[linewidth=0.5\pslinewidth](D)(C)(G)(H)
\pspolygon[linewidth=0.5\pslinewidth](B)(C)(G)(F)
\end{pspicture}
\begin{pspicture}(-4.5,-4)(4,5)
\psframe(-4.5,-4)(4,5)
\CUBE
\planThreeDput[fillstyle=solid,fillcolor=Orange,normale=90 -90]{\Rectangle(-4,-4)(4,4)}
\planThreeDput[gridcolor=white,normale=90 -90,fontscale=0.5]{\Grille(-4,-4)(4,4)}
\psDecoupeCube[tetraedre=T3](0,0,2)
\psDecoupeCube(0,0,2)
\psDecoupeCube[tetraedre=T6](0,0,2)
\pspolygon[linewidth=0.5\pslinewidth](A)(B)(C)(D)
\pspolygon[linewidth=0.5\pslinewidth](D)(C)(G)(H)
\pspolygon[linewidth=0.5\pslinewidth](B)(C)(G)(F)
\end{pspicture}
\begin{pspicture}(-4.5,-4)(4,5)
\psframe(-4.5,-4)(4,5)
\CUBE
\planThreeDput[fillstyle=solid,fillcolor=Orange,normale=90 -90]{\Rectangle(-4,-4)(4,4)}
\planThreeDput[gridcolor=white,normale=90 -90,fontscale=0.5]{\Grille(-4,-4)(4,4)}
\psDecoupeCube[tetraedre=T3](0,0,2)
\psDecoupeCube(0,0,2)
\psDecoupeCube[tetraedre=T6](0,0,2)
\psDecoupeCube[tetraedre=T5](0,0,2)
\pspolygon[linewidth=0.5\pslinewidth](A)(B)(C)(D)
\pspolygon[linewidth=0.5\pslinewidth](D)(C)(G)(H)
\pspolygon[linewidth=0.5\pslinewidth](B)(C)(G)(F)
\end{pspicture}
\begin{pspicture}(-4.5,-4)(4,5)
\psframe(-4.5,-4)(4,5)
\CUBE
\planThreeDput[fillstyle=solid,fillcolor=Orange,normale=90 -90]{\Rectangle(-4,-4)(4,4)}
\planThreeDput[gridcolor=white,normale=90 -90,fontscale=0.5]{\Grille(-4,-4)(4,4)}
\psDecoupeCube[tetraedre=T3](0,0,2)
\psDecoupeCube(0,0,2)
\psDecoupeCube[tetraedre=T6](0,0,2)
\psDecoupeCube[tetraedre=T5](0,0,2)
\psDecoupeCube[tetraedre=T4](0,0,2)
\pspolygon[linewidth=0.5\pslinewidth](A)(B)(C)(D)
\pspolygon[linewidth=0.5\pslinewidth](D)(C)(G)(H)
\pspolygon[linewidth=0.5\pslinewidth](B)(C)(G)(F)
\end{pspicture}
\begin{pspicture}(-4.5,-4)(4,5)
\psframe(-4.5,-4)(4,5)
\CUBE
\planThreeDput[fillstyle=solid,fillcolor=Orange,normale=90 -90]{\Rectangle(-4,-4)(4,4)}
\planThreeDput[gridcolor=white,normale=90 -90,fontscale=0.5]{\Grille(-4,-4)(4,4)}
\psDecoupeCube[tetraedre=T3](0,0,2)
\psDecoupeCube(0,0,2)
\psDecoupeCube[tetraedre=T6](0,0,2)
\psDecoupeCube[tetraedre=T5](0,0,2)
\psDecoupeCube[tetraedre=T2](0,0,2)
\psDecoupeCube[tetraedre=T4](0,0,2)
\pspolygon[linewidth=0.5\pslinewidth](A)(B)(C)(D)
\pspolygon[linewidth=0.5\pslinewidth](D)(C)(G)(H)
\pspolygon[linewidth=0.5\pslinewidth](B)(C)(G)(F)
\end{pspicture}
\end{center}
\end{document}