[pstricks] = or {=}

[Poul Riis]

In the \uput-lines near the end of the file below I have put curly braces
around the equal signs. If I remove the braces gsview returns an error
message. What is the reason for this behaviour?

Btw, any ideas on how to further improve the figure will be appreciated....


Yours,
Poul Riis



\documentclass{article}
\usepackage{inputenc}
\usepackage[T1]{fontenc}
\usepackage[danish]{babel}
\usepackage{graphicx}
\usepackage{icomma}
\usepackage{geometry}
\usepackage[svgnames,dvipsnames,x11names]{xcolor}
\usepackage{amsmath,amssymb}
\usepackage{pst-plot}
\usepackage{pst-func}
\usepackage{pst-node}
\usepackage{pst-eucl}
\usepackage{pstricks-add}


\topmargin=-7.9cm
\textwidth=17.5cm
\textheight=27cm
\hoffset=-2cm
\tolerance=5000
\hbadness=5000
\pretolerance=2500
\parindent      =    0em

\pagestyle{empty}

\definecolor[ps]{bl}{rgb}{tx at addDict begin Red Green Blue end}%
\newcommand{\rainbowcolor}[1]{\pstVerb{/lambda #1 def lambda tx at addDict
begin wavelengthToRGB end}\psset{linecolor=bl}}%

\begin{document}
\huge
\begin{figure}
\centering%
\psset{unit=1.4cm}%
\begin{pspicture}(-6,-6)(6,6)
\SpecialCoor
\pstVerb{/goldenangle 137.5078 def
/capphi 5 sqrt 1 add 2 div def
/Nseed 25 def
/radius 8 def
/kk Nseed radius div radius div def
/xseed {kk div dup kk mul goldenangle mul cos exch sqrt mul} def
/yseed {kk div dup kk mul goldenangle mul sin exch sqrt mul neg} def
/fib {dup dup 1 eq exch 0 eq or not {dup 1 sub fib exch 2 sub fib add} if}
def
/b 12 def}
\pnode(!1 xseed 1 yseed){A1}
\pnode(!2 xseed 2 yseed){A2}
\pnode(!0 0){O}
\psframe*[linecolor=Gold2](!b 2 div neg b 2 div neg)(!b 2 div b 2 div)
\psframe*[linecolor=Gold1](!b 2 div neg b 2 div neg)(!b 2 div b 2 div b
capphi div add neg)
\psline(!1 xseed 1 yseed)(!0 0)(!2 xseed 2 yseed)
\pstMarkAngle[LabelSep=0.9, LabelAngleOffset=0,MarkAngleRadius=0.5,
arrows=-]{A2}{O}{A1}{137,51$^\circ$}
\pstMarkAngle[MarkAngleRadius=0.45, arrows=-]{A1}{O}{A2}{}
\pstMarkAngle[MarkAngleRadius=0.55, arrows=-]{A1}{O}{A2}{}
\pspolygon[linecolor=DeepPink3,linewidth=2.0pt](!b 2 div neg b 2 div
neg)(!0 7 4 div capphi sub sqrt 1 2 div sub b mul)(!b 2 div b 2 div
neg)(!b capphi div 2 div 7 4 div capphi sub sqrt 1 2 div sub 1 2 div
capphi 4 div add sqrt sub b mul)(!b capphi div 2 div neg 7 4 div capphi
sub sqrt 1 2 div sub 1 2 div capphi 4 div add sqrt sub b mul)
\psarc[linestyle=dashed,linecolor=DeepPink3,linewidth=2.0pt](!b 2 div neg
b 2 div neg){7.4164}{270}{288}
\psarc[linestyle=dashed,linecolor=DeepPink3,linewidth=2.0pt](!b 2 div b 2
div neg){7.4164}{252}{270}
\parametricplot[plotstyle=curve,linecolor=OliveGreen,linewidth=2.5pt,plotpoints=250]{0}{11}{t
xseed t yseed}
\multido{\n=1+1}{11}{\rainbowcolor{\n\space 10 mul 590
add}\psdot*[dotsize=1.0,dotstyle=*,plotstyle=curve](!\n\space xseed
\n\space yseed)\uput{0mm}[90](!\n\space xseed 7 \n\space gt {0.15
sub}{0.33 sub} ifelse \n\space yseed 0.25
sub){\psPrintValue[valuewidth=2,fontscale=30,linecolor=black]{\n\space
fib}}}%
\huge
\uput{0mm}[90](!0 -7.7){$\Phi {=} \dfrac{1{+}\sqrt{5}}{2}$}
\uput{0mm}[90](!0 -9.55){$\Phi {=}
\sqrt{1{+}\sqrt{1{+}\sqrt{1{+}\sqrt{1{+}...}}}}$}
\uput{0mm}[90](!0 -9.55){$\Phi {=}
\sqrtsign{1{+}\sqrtsign{1{+}\sqrtsign{1{+}\sqrtsign{1{+}...}}}}$}
\uput{0mm}[90](!-0 -11.4){$\Phi {=}
1{+}\frac{1}{1{+}\frac{1}{1{+}\frac{1}{1{+}\frac{1}{1{+}...}}}}$}
\uput{0mm}[90](!0 -12.5){$\Phi {\approx} 1,61803398875$}
\NormalCoor
\end{pspicture}
\end{figure}
\end{document}

-------------- next part --------------


###########################################
Denne meddelelse med evt. vedlæg  er scannet af SkoleKom ved hjælp af F-Secure virusscanner.

For yderligere information,
http://forside.skolekom.dk/indhold/punkt1/viruspolitik