[pstricks] pst-solides3d

Poul Riis Poul.Riis at skolekom.dk
Sun Aug 22 08:13:20 CEST 2010


Graphics with PSTricks <pstricks at tug.org> writes:
>looks like a missing space between f23 and false

???
The project below gives the result attached.

\documentclass{article}
\parindent0pt
\pagestyle{empty}
\textwidth12cm
\usepackage[gray,cmyk]{pstricks}
\usepackage{pst-3dplot}
\usepackage{pst-func}
\usepackage{pst-solides3d}
\usepackage[x11names]{xcolor}
\usepackage{pstricks-add}
\usepackage{amsmath,amsfonts}
\definecolor{pureblack}{cmyk}{0 0 0 1}
\usepackage{siunitx}
\usepackage{comma}

\begin{document}

\begin{pspicture}[solidmemory](-4,-5)(7,4)
\psset{viewpoint=50 -40 10
rtp2xyz,Decran=50,linecolor=red,lightsrc=viewpoint}
\axesIIID(0,0,0)(5,5,5)
\end{pspicture}

\end{document}
>
>
>> 3) I would like to replace
>> \psSolid[object=cylindre,r=rcyl,h=hcyl,ngrid=1 24,plansepare={[nx ny nz
>> 0]},name=partiescylindre,action=none](0,0,-4)
>> with something like
>> \psSolid[object=cylindre,r=rcyl,h=hcyl,ngrid=1 24,plansepare={[nx ny nz
>> 0]},name=partiescylindre,action=none](!0 0 -hcut)
>> This seems not to be allowed?
>
>(0,0,hcut neg) should work
Oh, yes, it does!

\documentclass{article}
\parindent0pt
\pagestyle{empty}
\textwidth12cm
\usepackage[gray,cmyk]{pstricks}
\usepackage{pst-3dplot}
\usepackage{pst-func}
\usepackage{pst-solides3d}
\usepackage[x11names]{xcolor}
\usepackage{pstricks-add}
\usepackage{amsmath,amsfonts}
\definecolor{pureblack}{cmyk}{0 0 0 1}
\usepackage{siunitx}
\usepackage{comma}

\begin{document}

\begin{pspicture}[solidmemory](-4,-5)(7,4)
\psset{viewpoint=50 -40 10
rtp2xyz,Decran=50,linecolor=red,lightsrc=viewpoint}
\psset{solidmemory}
\pstVerb{/phi 10 def /cosphi phi cos def /sinphi phi sin def /nx sinphi
def /ny 0 def /nz cosphi def /rcyl 3 sqrt 4 mul def /hcut rcyl sinphi mul
cosphi div def /hcyl hcut 2 mul def}
\psSolid[object=cylindre,r=rcyl,h=hcyl,ngrid=1 24,plansepare={[nx ny nz
0]},name=partiescylindre,action=none](0,0,hcut neg)
\psSolid[object=load,load=partiescylindre1,fillcolor={[rgb]{0.7 1 0.7
}},fcol=0 (1 1 0.7 setrgbcolor)]
\end{pspicture}

\end{document}


BTW: Does anyone know a name of such a cylinder section - English, German
or French?

Poul Riis


-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://tug.org/pipermail/pstricks/attachments/20100822/590a7740/attachment-0001.html>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: comma23false.pdf
Type: application/pdf
Size: 4806 bytes
Desc: not available
URL: <http://tug.org/pipermail/pstricks/attachments/20100822/590a7740/attachment-0001.pdf>


More information about the PSTricks mailing list