1 \subsection{Bobine vide}
4 \begin{minipage}{0.45\linewidth}
6 \newcommand\SectionBobine{
11 R h 4 div sub h 3 div neg % 5
12 R h 4 div sub h 3 div % 6
19 \begin{minipage}{0.45\linewidth}
20 \begin{pspicture}(-2,-2)(5,2)
21 \pnode(!2 3 2 div){S1}
22 \pnode(!2 3 2 div neg){S2}
23 \pnode(!4 3 2 div neg){S3}
24 \pnode(!4 3 3 div neg){S4}
25 \pnode(!4 3 4 div sub 3 3 div neg){S5}
26 \pnode(!4 3 4 div sub 3 3 div){S6}
27 \pnode(!4 3 3 div){S7}
28 \pnode(!4 3 2 div){S8}
29 \def\pneuSection{\pspolygon[fillstyle=vlines,linewidth=2\pslinewidth]%
30 (S1)(S2)(S3)(S4)(S5)(S6)(S7)(S8)}
31 \rput(0,0){\pneuSection}\rput{180}{\pspolygon[fillstyle=vlines,linewidth=1.5pt]%
32 (!2 3 2 div)(!2 3 2 div neg)(!4 3 2 div neg)
33 (!4 3 3 div neg)(!4 3 4 div sub 3 3 div neg)
34 (!4 3 4 div sub 3 3 div)(!4 3 3 div)(!4 3 2 div)}
35 \psline(-3,1.5)(3,1.5)\psline(-3,-1.5)(3,-1.5)
36 \psline[linestyle=dashed,dash=1 0.2 0.05 0.2]{->}(0,-3)(0,3)
37 \uput[u](0,3){$z$}\uput[r](4.1,0){$y$}\uput[dl](0,0){$O$}
38 \psline[linestyle=dashed](2,-1)(2,1.5)
39 \psline[linestyle=dashed](4,-1)(4,2.5)
40 \psline[linestyle=dashed](-4,-1)(4,-1)
41 \psline[linestyle=dashed](-4,1)(4,1)
42 \psline[linestyle=dashed]{->}(-4,0)(4.2,0)
43 \psline{->}(0,1.8)(2,1.8)\uput[u](1,1.8){$r$}
44 \psline{->}(0,2.5)(4,2.5)\uput[u](2,2.5){$R$}
45 \psline{<->}(5,-1.5)(5,1.5)\uput[r](5,0){$h$}
54 \psdots[linecolor=red](S1)(S2)(S3)(S4)(S5)(S6)(S7)(S8)
60 \begin{pspicture}(-5,-6)(5,5)
66 R h 4 div sub h 3 div neg % 5
67 R h 4 div sub h 3 div % 6
71 \psframe*[linecolor=blue!50](-5,-5)(5,4)
72 \psset{viewpoint=70 40 10 rtp2xyz,Decran=25,lightsrc=0 30 100}
73 \psSolid[object=grille,base=-15 15 -15 15,fillcolor=yellow!30!black!10](0,0,-8)
74 %\psSolid[object=prisme,h=2,base=-15 1 -15 -1 15 -1 15 1](0,0,-8)
75 \psSolid[object=anneau,section=\SectionBobine,fillcolor=gray!50,h=6,R=8,r=4,RotX=90,linecolor=gray]%
80 \begin{lstlisting}[basicstyle=\small\ttfamily]
81 \psSolid[object=grille,base=-15 15 -15 15,fillcolor=yellow!30](0,0,-8)
82 \psSolid[object=anneau,section=\SectionBobine,fillcolor=gray!50,h=6,R=8,r=4,RotX=90,linecolor=gray]%
86 \subsection{D'autres anneaux}
87 Trois autres exemples sont disponibles sur la page :
89 \url{http://syracuse.eu.org/lab/bpst/pst-solides3d/anneaux}