octahedron_10.tex

\documentclass{article}
\usepackage{pst-solides3d}
\begin{document}
\pagestyle{empty}
 
\begin{pspicture}(-4,-4)(4,4)
\psset{SphericalCoor,viewpoint=100 20 10,Decran=100,lightsrc=viewpoint}
\pstVerb{/radius 4 def
         /edge_cube radius 4 mul 3 div def
         /dot_axes edge_cube 2 div def
         /edge2 edge_cube 2 div def }%
\psSolid[object=cube,linecolor=red,
   a=edge_cube,
   action=draw]
\psSolid[object=octahedron,
   a=radius,
   trunc=all,
   trunccoeff=.3333,
   action=draw**]
\psLineIIID[linecolor=red](edge2,edge2 neg,edge2)(edge2,edge2,edge2)(edge2,edge2,edge2 neg)
\psLineIIID[linecolor=red](edge2 neg,edge2,edge2)(edge2,edge2,edge2)
\psPoint(0,0,0){O}
\psPoint(0,6,0){Y}
\psline[linestyle=dashed](O)(Y)
\uput[r](Y){my own label}
\end{pspicture}
\end{document}