doc/.svn/text-base/par-projectionangledroit.tex.svn-base

   1 \section {Angle droit}
   2
   3 L'objet \Cadre{rightangle} permet de définir un angle droit. Sa
   4 syntaxe est
   5 \Cadre{[object=rightangle,args=$A$ $B$ $C$]}
   6
   7 \begin{multicols}{2}
   8
   9 %% projete orthpgonal d'un point sur une droite
  10 %%
  11 \begin{pspicture}(-3,-2.5)(3.5,2.5)%
  12 \psframe*[linecolor=blue!50](-3,-2.5)(3.5,2.5)
  13 \psset{lightsrc=viewpoint,viewpoint=50 30 15,Decran=40}
  14 \psset{solidmemory}
  15 %% definition du plan de projection
  16 \psSolid[object=plan,
  17    definition=equation,
  18    args={[1 0 1 0] 90},
  19    base=-4 4 -3 3,
  20    fillcolor=white,
  21    linecolor=gray!30,
  22 %   plangrid,
  23    planmarks,
  24    name=monplan,
  25 ]
  26 \psset{plan=monplan,visibility=false}
  27 %% definition droite d
  28 \psProjection[object=droite,
  29    definition=horizontale,
  30    args=-1,
  31    name=d,
  32 ]
  33 \psset{fontsize=15}
  34 %% definition du point M
  35 \psProjection[object=point,
  36    args=-2 1,
  37    name=M,
  38    text=M,
  39    pos=ul,
  40 ]
  41 %% definition du point H
  42 \psProjection[object=point,
  43    definition=orthoproj,
  44    args=M d,
  45    name=H,
  46    text=H,
  47    pos=dr,
  48 ]
  49 %% definition du point H' pour orienter l'angle droit
  50 %% et mettre la legende
  51 \psProjection[object=point,
  52    definition=xdpoint,
  53    args=2 d,
  54    name=H',
  55    action=none,
  56    text=d,
  57    pos=ur,
  58 ]
  59 %% definition d'une ligne
  60 \psProjection[object=line,
  61    args=M H,
  62 ]
  63 %% dessin angle droit
  64 \psProjection[object=rightangle,
  65    args=M H H',
  66 ]
  67 \composeSolid
  68 %\axesIIID(4,4,2)(5,5,6)
  69 \end{pspicture}
  70 \columnbreak
  71
  72 \begin{gbar}
  73 \begin{verbatim}
  74 \psProjection[object=droite,
  75    definition=horizontale,args=-1,name=d,]
  76 \psProjection[object=point,args=-2 1,
  77    name=M,text=M,pos=ul,]
  78 \psProjection[object=point,
  79    definition=orthoproj,
  80    args=M d,name=H,text=H,pos=dr,]
  81 %% definition du point H' pour orienter l'angle droit
  82 \psProjection[object=point,
  83    definition=xdpoint,args=2 d,
  84    name=H',action=none,text=d,pos=ur,]
  85 \psProjection[object=line,args=M H,]
  86 \psProjection[object=rightangle,args=M H H',]
  87 \end{verbatim}
  88 \end{gbar}
  89
  90 \end{multicols}
  91