\section{Right angle}

\subsection{Direct definition}

The object \Lkeyword{rightangle} allows us to specify and draw a
\Index{right angle}. The syntax is: \texttt{[object=rightangle,args=$A$
$B$ $C$]}

\begin{LTXexample}[width=7.5cm]
\begin{pspicture}(-3,-2.5)(3.5,2.5)%
\psframe*[linecolor=blue!50](-3,-2.5)(3.5,2.5)
\psset{lightsrc=viewpoint,viewpoint=50 30 15,Decran=40}
\psset{solidmemory}
%% definition du plan de projection
\psSolid[object=plan,
   definition=equation,
   args={[1 0 1 0] 90},
   base=-4 4 -3 3,
   fillcolor=white,
   linecolor=gray!30,
%   plangrid,
   planmarks,
   name=monplan]
\psset{plan=monplan,visibility=false}
%% definition droite d
\psProjection[object=droite,
   definition=horizontale,
   args=-1,name=d]
\psset{fontsize=15}
%% definition du point M
\psProjection[object=point,
   args=-2 1,
   name=M,text=M,
   pos=ul]
%% definition du point H
\psProjection[object=point,
   definition=orthoproj,
   args=M d,
   name=H,text=H,
   pos=dr]
%% definition du point H' pour orienter l'angle droit
%% et mettre la legende
\psProjection[object=point,
   definition=xdpoint,
   args=2 d,name=H',
   action=none,
   text=d,pos=ur]
%% definition d'une ligne
\psProjection[object=line,
   args=M H]
%% dessin angle droit
\psProjection[object=rightangle,
   args=M H H']
\composeSolid
%\axesIIID(4,4,2)(5,5,6)
\end{pspicture}
\end{LTXexample}

\endinput
