diff options
| author | Karl Berry <karl@freefriends.org> | 2010-06-12 23:32:15 +0000 |
|---|---|---|
| committer | Karl Berry <karl@freefriends.org> | 2010-06-12 23:32:15 +0000 |
| commit | 7bcc6b29e853351e4a95b0aebcb6f2765450e86c (patch) | |
| tree | aa90b1ae4d891202466bfac07aa6d323588d62e1 /Master/texmf-dist/dvips/pst-magneticfield | |
| parent | f8b2509b17bd7177dc511cbaa7ecd21edea407b1 (diff) | |
pst-magneticfield update (12jun10)
git-svn-id: svn://tug.org/texlive/trunk@18922 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/dvips/pst-magneticfield')
| -rw-r--r-- | Master/texmf-dist/dvips/pst-magneticfield/pst-magneticfield.pro | 14 |
1 files changed, 9 insertions, 5 deletions
diff --git a/Master/texmf-dist/dvips/pst-magneticfield/pst-magneticfield.pro b/Master/texmf-dist/dvips/pst-magneticfield/pst-magneticfield.pro index fdd24b8217c..1d3cab3a66f 100644 --- a/Master/texmf-dist/dvips/pst-magneticfield/pst-magneticfield.pro +++ b/Master/texmf-dist/dvips/pst-magneticfield/pst-magneticfield.pro @@ -1,4 +1,4 @@ -%% $Id: pst-magneticfield.pro 339 2010-06-07 20:50:23Z herbert $ +%% $Id: pst-magneticfield.pro 346 2010-06-11 06:12:08Z herbert $ %% %% This is file `pst-magneticfield.pro', %% @@ -16,7 +16,7 @@ %% DESCRIPTION: %% `pst-magneticfield' is a PSTricks package to draw fields of Helmholtz coils %% -%% version 0.01 / 2010-06-07 Herbert Voss <hvoss _at_ tug.org> +%% version 0.02 / 2010-06-11 Herbert Voss <hvoss _at_ tug.org> %% % /tx@MFieldDict 60 dict def @@ -29,13 +29,17 @@ tx@MFieldDict begin gsave x2 y2 moveto y2 y1 sub x2 x1 sub atan rotate % 1 1 scale - -1 CLW mul 2 CLW mul rlineto - 7 CLW mul -2 CLW mul rlineto - -7 CLW mul -2 CLW mul rlineto +% -1 CLW mul 2 CLW mul rlineto +% 7 CLW mul -2 CLW mul rlineto +% -7 CLW mul -2 CLW mul rlineto + 1 CLW mul 2 CLW mul rlineto + -7 CLW mul -2 CLW mul rlineto + 7 CLW mul -2 CLW mul rlineto closepath fill grestore } def +% /Calcul_B_Spires { /Bx 0 def /By 0 def |