[pstricks] Package Conflict pst-3dplot | pst-solides3d ?

[robert.fischer10 at arcor.de]

Hello,

in one document I use 3dplot and solides3d for different pictures. Without having pst-3dplot, the solides3d example
below works. With pst-3dplot I get a error message. nevertheless the picture is drawed in the correct way.

Moreover there exists the note 'that after pst-3dplot no package is loaded, which uses the old keyval interface.'

Following works fine without any error (\usepackage{pst-3dplot} is commented out)

\documentclass{minimal}
\usepackage{pst-pdf}
\usepackage{pstricks}
\usepackage{pst-solides3d}
\usepackage{pstricks-add}
%\usepackage{pst-3dplot}

\pagestyle{empty}
\begin{document}
		\psset{viewpoint=15 50 30,lightsrc=viewpoint,lightintensity=1.2,Decran=70}
%		\psset{lightsrc=viewpoint,lightintensity=1.2,Decran=17}
		\begin{pspicture}(-3.2,-3.4)(2.2,4.2)%(-2.2,-1.4)(1.2,4.0)  
			%Grid
%			\psgrid[gridcolor=gray,subgridcolor=lightgray]
			%
			%Local Postscript Definitions RadtoDeg
			\pstVerb{
				/MyHS{2}def
				/MyRS{0.5}def
				/MyHP{MyHS 0.5 mul}def
				/MyRP{MyRS 1.5 mul}def
				/MyHN{MyHS 1.2 mul}def
				/MyAlpha{MyRS MyHS  atan neg}def
				/MyBeta{MyAlpha MyRP MyHP atan add}def
				/MyRN{MyHN MyBeta tan mul}def
			}
			%Enable Memory
			\psset{solidmemory}%solidmemory=true
			
			%Positioning before solidmemory leads to error!?!?!
%			\codejps{
%			/MyAlpha{MyRS MyHS atan neg}def
%			/MyBeta{MyRP MyHP atan MyAlpha add}def
%			/MyRN{MyBeta tan MyHN mul}def
%			}
			%
			%Nutationskegel
			\psSolid[object=conecreux,
				h=MyHN,r=MyRN,mode=2,%ngrid=3 40,
				RotX=180,
				fillcolor=gray,incolor=gray!50,grid=false,
				action=none,name=MyConeN](0,0,MyHN)
			%
			%Spurkegel
			\psSolid[object=conecreux,
				h=MyHS,r=MyRS,mode=2,%ngrid=25 40,4
				RotX=180,
				fillcolor=black!90,incolor=gray,grid=false,
				action=none,name=MyConeS](0,0,MyHS)
			%
			%Polkegel
			\psSolid[object=conecreux,
				h=MyHP,r=MyRP,mode=2,%ngrid=25 40,
				RotX=180,
				action=none,name=MyConeP](0,0,MyHP)
%				\psset{transform={0 MyBeta 0 rotateOpoint3d}}
			\psSolid[object=load,
				RotY=MyBeta,
				fillcolor=black!90,incolor=gray,grid=false,
				load=MyConeP,name=MyConeP]
			%Figurenachse
			\psSolid[object=cylindre,
				h=4.0,r=0.01,mode=2,
				RotY=MyBeta,
				fillcolor=black,grid=false,%linewidth=0.01,
				action=none,name=MyLineB]
%			\psset{transform={0 0 0 rotateOpoint3d}}
			
			%Omega
			\psSolid[object=cylindre,
				h=3.5,r=0.01,mode=2,
				RotY=MyAlpha,
				fillcolor=black,grid=false,%linewidth=0.01,
				action=none,name=MyLineA]
			
			%Z-Axes Part
			\psSolid[object=cylindre,
				h=3.5,r=0.01,mode=2,
				fillcolor=black,grid=false,%linewidth=0.01,
				action=none,name=MyLineZ]
			
			%Fusion
			\psSolid[object=fusion,
				base=MyConeS MyConeP MyConeN MyLineA MyLineB MyLineZ,
				grid=false,opacity=0.6,
				linecolor=gray,linewidth=0.1\pslinewidth]
			
			%Axes
			\axesIIID[showOrigin=false,axisnames={x,y,\vec{L}},
			arrowinset=0,arrowscale=1.5](0,0,3)(1.5,2,3.5)
			\composeSolid
			
			%Label
			\psTransformPoint[RotY=MyAlpha](0 0 3.5)(0,0,0){O'}
			\nput{80}{O'}{$\vec{\omega}$}
			
		\end{pspicture}


\end{document}

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

Problem:

if \usepackage{pst-3dplot} used, the picture looks identical. But follwoing error message:

! Bad number: MyBeta 0 substituded \@pstrickserr
! Bad number: MyAlpha 0 substituded \@pstrickserr

Any idea what is the reason behind?

PS:
if you use jpscode and transform instead of pstVerb and RotX, there appeaers also no error message (see commented lines in above code)

PSS Attachment -> PDF output

Best Regards,
Robert.


-------------- next part --------------
A non-text attachment was scrubbed...
Name: M01.pdf
Type: application/pdf
Size: 26994 bytes
Desc: not available
URL: <http://tug.org/pipermail/pstricks/attachments/20090716/41a31a65/attachment-0001.pdf>