From 7bcc6b29e853351e4a95b0aebcb6f2765450e86c Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Sat, 12 Jun 2010 23:32:15 +0000 Subject: pst-magneticfield update (12jun10) git-svn-id: svn://tug.org/texlive/trunk@18922 c570f23f-e606-0410-a88d-b1316a301751 --- .../tex/generic/pst-magneticfield/pst-magneticfield.tex | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) (limited to 'Master/texmf-dist/tex/generic') diff --git a/Master/texmf-dist/tex/generic/pst-magneticfield/pst-magneticfield.tex b/Master/texmf-dist/tex/generic/pst-magneticfield/pst-magneticfield.tex index 417a78dade5..be716d75a51 100644 --- a/Master/texmf-dist/tex/generic/pst-magneticfield/pst-magneticfield.tex +++ b/Master/texmf-dist/tex/generic/pst-magneticfield/pst-magneticfield.tex @@ -20,8 +20,8 @@ \ifx\MultidoLoaded\endinput\else \input multido.tex\fi \ifx\PSTXKeyLoaded\endinput\else \input pst-xkey \fi % -\def\fileversion{1.12} -\def\filedate{2010/06/07} +\def\fileversion{1.13} +\def\filedate{2010/06/11} \message{`pst-magneticfield' v\fileversion, \filedate\space (ml,jg,hv)} % \edef\PstAtCode{\the\catcode`\@} \catcode`\@=11\relax @@ -67,7 +67,7 @@ \def\psmagneticfield@ii(#1,#2){\@ifnextchar({\psmagneticfield@iii(#1,#2)}{\psmagneticfield@iii(#1,#2)(6,5)}} \def\psmagneticfield@iii(#1,#2)(#3,#4){% \pst@killglue% - \ifPst@AntiHelmholtz\addto@par{N=2}\fi + \ifPst@AntiHelmholtz\addbefore@par{N=2}\fi% \begin@SpecialObj% \pst@Verb{% make it global /NombreSpires \psk@magneticfieldN\space def @@ -109,7 +109,7 @@ /StreamDensityPlot \ifPst@StreamDensityPlot true \else false \fi def /Setgray \ifPst@setgray true \else false \fi def }% - \addto@pscode{ \tx@MFieldDict MagneticField end} + \addto@pscode{ \tx@MFieldDict MagneticField end }% \ifPst@drawSelf \ifPst@AntiHelmholtz \psline[style=\psk@styleSpire](!Radius neg Radius 2 div)(!Radius Radius 2 div) @@ -120,8 +120,8 @@ \multido{\i=1+1}{\psk@magneticfieldN}{% numero de la spire \pst@Verb{ /Yspire yA \i\space 1 sub inter mul sub def } % position de la spire \psline[style=\psk@styleSpire](! Radius neg Yspire)(! Radius Yspire) - \psline[style=\psk@styleCourant]{->}(!-0.2 Yspire)(!0.2 Yspire)} - \fi + \psline[style=\psk@styleCourant]{->}(! -0.2 Yspire)(! 0.2 Yspire)} + \fi% \fi% \end@SpecialObj% \ignorespaces} -- cgit v1.2.3