summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/doc/generic/pst-solides3d/doc/par-face.tex
blob: f1413cb7356f0ecfcd60fe2c4879198a4bfd4569 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
\section {Solide monoface -- Solide biface}

Le contour de \texttt{face} est défini sur le plan $Oxy$ par
les coordonnées des sommets placés dans le sens trigonométrique par le
paramètre \texttt{base} : 
\begin{verbatim}
\psSolid[object=face,base=x1 y1 x2 y2 x3 y3 ...xn yn](0,0,0)%
\end{verbatim}
\subsection{\texttt{`face'} triangulaire}
\begin{minipage}{0.47\linewidth}
\psset{unit=0.6}
\psset{viewpoint=50 -20 30 rtp2xyz,Decran=50}
\begin{pspicture}(-5.5,-4.5)(7,3.5)
\psframe(-5.5,-4.5)(7,3.5)
\psSolid[object=grille,base=-4 6 -4 4,action=draw,linecolor=gray](0,0,0)
\psSolid[object=face,fillcolor=yellow,action=draw*,
      incolor=blue,
      biface,
      base=0 0 3 0 1.5 3,
      num=all ,
      show=all
      ](0,1,0)
\psSolid[object=face,fillcolor=yellow,action=draw*,
      incolor=blue,
      base=0 0 3 0 1.5 3,
      num=all,
      show=all,
      biface,
      RotX=180](0,-1,0)
\axesIIID(0,0,0)(6,6,3)
\end{pspicture}
\end{minipage}
%
\begin{minipage}{0.5\linewidth}
\begin{verbatim}
\psset{unit=0.6}
\psset{
  viewpoint=50 -20 30 rtp2xyz,Decran=50}
\begin{pspicture}(-6,-4.5)(7,3.5)
\psframe(-6,-4.5)(7,3.5)
\psSolid[
   object=face,fillcolor=yellow,action=draw*,
   incolor=blue, biface, base=0 0 3 0 1.5 3
   ](0,1,0)
\psSolid[
   object=face,fillcolor=yellow,action=draw*,
   incolor=blue, base=0 0 3 0 1.5 3,
   biface, RotX=180](0,-1,0)
\end{pspicture
\end{verbatim}
\end{minipage}



\subsection{\texttt{`face'} définie par une fonction}

\begin{minipage}{0.5\linewidth}
\psset{unit=0.45}
\psset{viewpoint=50 -20 30 rtp2xyz,Decran=50}
\def\BASE{0 10 360{/Angle ED 5 Angle cos dup mul mul % x
                    3 Angle cos 3 exp Angle sin mul mul % y
                    } for}
\begin{pspicture}(-9,-5.5)(9,6)
\psframe(-9,-5.5)(9,6)
\defFunction[algebraic]{F}(t)
   {5*(cos(t))^2}
   {3*(sin(t))*(cos(t))^3}{}
%   {t cos dup mul 5 mul}
%   {t cos 3 exp t sin mul 3 mul}{}
\psSolid[object=grille,base=-6 6 -6 6,action=draw,linecolor=gray](0,0,0)
\psSolid[object=face,fillcolor=magenta,action=draw*,
      incolor=blue,
      biface,RotZ=90,
      base=0 2 pi mul {F} CourbeR2+
      ](0,0,0)%
\psSolid[object=face,fillcolor=yellow,action=draw*,
      incolor=blue,
      biface,
      base=0 2 pi mul {F} CourbeR2+](0,0,0)%
\psSolid[object=face,fillcolor=yellow,action=draw*,
      incolor=blue,
      biface,RotY=180,
      base=0 2 pi mul {F} CourbeR2+](0,0,0)%
\psSolid[object=face,fillcolor=yellow,action=draw*,
      incolor=red,
      biface,RotY=180,RotZ=90,
      base=0 2 pi mul {F} CourbeR2+](0,0,0)%
\axesIIID(0,0,0)(6,6,5)
\end{pspicture}
\end{minipage}
%
\begin{minipage}{0.45\linewidth}
\begin{verbatim}
\defFunction[algebraic]{F}(t)
   {5*(cos(t))^2}
   {3*(sin(t))*(cos(t))^3}{}
base=0 2 pi mul {F} CourbeR2
\end{verbatim}
\end{minipage}