par-transformpointconnu.tex

\section {Transformer un point et le mémoriser}
 
Soit un point initial $A(x,y,z)$. On fait subir à ce point des
rotations autour des axes $Ox$, $Oy$ et $Oz$ d'angles respectifs :
\texttt{[RotX=valeurX,RotX=valeurY,RotX=valeurZ]}, dans cet ordre,
puis on opère une translation de vecteur $(v_x,v_y,v_z)$. Le problème
a été de récupérer les coordonnées du point final $A'(x',y',z')$.
 
Le code
 \psframebox[fillstyle=solid,fillcolor=yellow,linecolor=yellow]%
 {\texttt{$\backslash$psTransformPoint[RotX=valeurX,RotX=valeurY,
 RotX=valeurZ](x y z)(vx,vy,vz)\{A'\}}}\\
 permet de stocker dans le n\oe{}ud $A'$, les coordonnées du point
 transformé.
 
Dans l'exemple suivant $A(2,2,2)$ est l'un des sommets du cube
initial, dont le centre est placé à l'origine du repère.
{\red
\begin{verbatim}
\psSolid[object=cube,a=4,action=draw*,linecolor=red]%
\end{verbatim}
}
Ce cube subit différentes transformations :
{\red
\begin{verbatim}
\psSolid[object=cube,a=4,action=draw*,RotX=-30,RotY=60,RotZ=-60](7.5,11.25,10)%
\end{verbatim}
}
Pour obtenir l'image de $A$, on applique la commande suivante :
{\red
\begin{verbatim}
\psTransformPoint[RotX=-30,RotY=60,RotZ=-60](2 2 2)(7.5,11.25,10){A'}
\end{verbatim}
}
Ce qui permet, par exemple, de nommer ces points et de dessiner le vecteur
$\overrightarrow{AA'}$.
\begin{center}
\begin{pspicture}(-2,-4)(6,6)
\psframe(-2,-4)(9,6)
\psset{viewpoint=50 20 30 rtp2xyz,Decran=50,unit=0.5,lightsrc={}}
\psSolid[object=cube,a=4,action=draw*,linecolor=red]%
\psPoint(2,2,2){A}\psdot(A)
\psSolid[object=cube,a=4,action=draw*,RotX=-30,RotY=60,RotZ=-60](7.5,11.25,10)%
\psTransformPoint[RotX=-30,RotY=60,RotZ=-60](2 2 2)(7.5,11.25,10){A'}
\psdot(A')\psline[linecolor=blue,arrowsize=0.3]{{o-v}}(A)(A')
\uput[u](A'){$A'$}\uput[u](A){$A$}
\psset{solidmemory,action=none}
\psSolid[object=cube,a=4,name=A1,](0,0,0)
\psSolid[object=plan,definition=solidface,args=A1 0,name=P0]
\psSolid[object=plan,definition=solidface,args=A1 1,name=P1]
\psSolid[object=plan,definition=solidface,args=A1 4,name=P4]
\psset{fontsize=100}
\psProjection[object=texte,linecolor=red,text=A,plan=P0]%
\psProjection[object=texte,linecolor=red,text=B,plan=P1]%
\psProjection[object=texte,linecolor=red,text=E,plan=P4]%
\psSolid[object=cube,a=4,RotX=-30,RotY=60,RotZ=-60,
   name=A2](7.5,11.25,10)
\psSolid[object=plan,definition=solidface,args=A2 0,name=P'0]
\psSolid[object=plan,definition=solidface,args=A2 1,name=P'1]
\psSolid[object=plan,definition=solidface,args=A2 2,name=P'2]
\psProjection[object=texte,text=A,plan=P'0]%
\psProjection[object=texte,text=B,plan=P'1]%
\psProjection[object=texte,text=C,plan=P'2]%
\axesIIID(2,2,2)(10,10,8)
\end{pspicture}
\end{center}