[pstricks] pst-3dplot|Error: /undefined in SphericalCoorType

[robert.fischer10 at arcor.de]

Hello,

works again. The *.txt was not updated by Miketex automatically. After manually doing this, it is all okay.
Please close below topic.

Best Regards,
Robert. 


----- Original Nachricht ----
Von:     robert.fischer10 at arcor.de
An:      pstricks at tug.org
Datum:   10.10.2009 14:28
Betreff: pst-3dplot|Error: /undefined in SphericalCoorType

Hello,

I have updated package pst-3dplot. And now using SphericalCoor results in ghostscript Error: /undefined in SphericalCoorType

Example:
\documentclass[10pt,a4paper,twoside]{book}
\usepackage[latin1]{inputenc}
\usepackage{ngerman,a4wide}
\usepackage{pst-pdf}
\usepackage{pst-3dplot}

\begin{document}

\begin{pspicture}(-5,-5)(5,5)
	\pstThreeDLine[SphericalCoor=true](1,10,20)(2,20,30)
\end{pspicture}

\end{document}


generating ps file fails with:
Error: /undefined in SphericalCoorType
Operand stack:
   --nostringval--   1   10   20
Execution stack:
   %interp_exit   .runexec2   --nostringval--   --nostringval--   --nostringval--   2   %stopped_push   --nostringval--   --nostringval--   false   1   %stopped_push   1   3   %oparray_pop   1   3   %oparray_pop   1   3   %oparray_pop   1   3   %oparray_pop   .runexec2   --nostringval--   --nostringval--   --nostringval--   2   %stopped_push   --nostringval--   1   --nostringval--   %repeat_continue   --nostringval--   0   --nostringval--   %repeat_continue   --nostringval--
Dictionary stack:
   --dict:1128/1686(ro)(G)--   --dict:0/20(G)--   --dict:120/200(L)--   --dict:95/300(L)--   --dict:39/200(L)--   --dict:95/200(L)--   --dict:103/200(L)--
Current allocation mode is local
Last OS error: No such file or directory

--- Begin offending input ---
 /PROCMQUATERNION
/ConcatMQuaternion def} {/PROCMXYZ () def /PROCMQUATERNION () def}
ifelse } ifelse RotSequence (quaternion ) ne {PROCMXYZ} {PROCMQUATERNION}
ifelse cvx exec /RotSet (keep ) def {end} if /leftHanded false def
/coorType 0  def 1 1 2  /zLight ED /yLight ED /xLight ED 1 setlinejoin
/dxUnit 1.0  def /dyUnit 1.0  def /dzUnit 1.0  def /SphericalCoor true
def /xUnit { 28.45274  mul } def /yUnit { 28.45274  mul } def convertStackTo2D
end  /Lineto /lineto load def false 0  setlinejoin   NArray n 0 eq
not { n 1 eq { 0 0 /n 2 def } if () length 0 gt { 1.5 2.  CLW mul add
dup 1.4  mul exch 0.4 mul neg add /arrowlength exch def 4 copy /y1
ED /x1 ED /y2 ED /x2 ED /Alpha y2 y1 sub x2 x1 sub Atan def ArrowA
x1 Alpha cos arrowlength mul add y1 Alpha sin arrowlength mul add /n
n 1 sub def n { 4 copy /y1 ED /x1 ED /y2 ED /x2 ED x1 y1 0.5  1 gt
{ /Alpha y2 y1 sub x2 x1 sub Atan def /ArrowPos 0.  def /Length x2
x1 sub y2 y1 sub Pyth def /dArrowPos 0.5  abs def { /ArrowPos ArrowPos
dArrowPos add def ArrowPos Lengt
--- End offending input ---
file offset = 124955
gsapi_run_string_continue returns -101

Best Regards,
Robert.