\documentclass{article}
\usepackage{pst-solides3d,pst-node,multido,url}
\usepackage[latin1]{inputenc}
\usepackage[T1]{fontenc}
\usepackage[a4paper]{geometry}
\usepackage[frenchle]{babel}
\makeatletter
\def\psPoint{\def\pst@par{}\pst@object{psPoint}}
\def\psPoint@i(#1)#2{{% coordonnées cartésiennes
  \begin@ClosedObj
\pnode(!
    \tx@optionssolides
    SolidesDict begin
    #1
   3dto2d cm_1 exch cm_1 exch
   end){#2}%
   \end@ClosedObj
  }\ignorespaces%
}
\makeatother
\def\grille{% quadrillage du plan Oxy
\multido{\ix=-6+1}{13}{%
    \psPoint(\ix\space -6 0){A}
    \psPoint(\ix\space 6 0){B}
    \psline(A)(B)}
\multido{\iy=-6+1}{13}{%
    \psPoint(-6 \iy\space 0){A}
    \psPoint(6 \iy\space 0){B}
    \psline(A)(B)}
    \psPoint(0 0 0){O}
    \psPoint(6 0 0){X}
    \psPoint(0 6 0){Y}
    \psPoint(0 0 6){Z}
    \psline[arrowsize=0.3,arrowinset=0.2,linecolor=blue]{->}(O)(X)
    \psline[arrowsize=0.3,arrowinset=0.2,linecolor=blue]{->}(O)(Y)
    \psline[arrowsize=0.3,arrowinset=0.2,linecolor=blue]{->}(O)(Z)
    \uput[r](X){\textcolor{blue}{$x$}}\uput[u](Y){\textcolor{blue}{$y$}}%
    \uput[r](Z){\textcolor{blue}{$z$}}\uput[u](O){\textcolor{blue}{$O$}}}

\def\axes(#1,#2,#3){% axes 3d
  \psPoint(0 0 0){O}
    \psPoint(#1 0 0){X}
    \psPoint(0 #2 0){Y}
    \psPoint(0 0 #3){Z}
    \psline[arrowsize=0.3,arrowinset=0.2,linecolor=blue]{->}(O)(X)
    \psline[arrowsize=0.3,arrowinset=0.2,linecolor=blue]{->}(O)(Y)
    \psline[arrowsize=0.3,arrowinset=0.2,linecolor=blue]{->}(O)(Z)
    \uput[dr](X){\textcolor{blue}{$x$}}\uput[u](Y){\textcolor{blue}{$y$}}%
    \uput[r](Z){\textcolor{blue}{$z$}}\uput[l](O){\textcolor{blue}{$O$}}}
\pagestyle{empty}
\date{27 octobre 2\,006}
\author{JPV \& ML}
\title{Documentation pst-solides3d\\ version-alpha 0.1}

\begin{document}
\maketitle
\begin{abstract}
\verb+pst-solides3d+ est une extension de PSTricks permettant de dessiner des solides
en 3D. Un certain nombre de solides son,t déjà pré-définis. Une commande \verb+codejps+ permet d'inclure
directement du code \texttt{postscript} mis-au point par Jean-Paul Vignault sur le site de :

\url{http://melusine.eu.org/syracuse/bbgraf/}
\end{abstract}
\section{Le cylindre}
%\input{exemplescylindre.tex}
\section{La sphère}
%\input{exemplessphere.tex}
\section{La \textsf{grille} et son paramètre : \textsf{base}}
\input{exemplesgrille.tex}
\end{document}
