diff options
author | Karl Berry <karl@freefriends.org> | 2012-05-05 22:01:58 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2012-05-05 22:01:58 +0000 |
commit | 4c56a7f771b8c9fabb57b8def881a6c6785e5699 (patch) | |
tree | 67ace5cf3da0ddba9b8d5cd000de7ec7b9cfffa9 /Master/texmf-dist/tex/generic/pst-plot/pst-plot.tex | |
parent | 3f76fb1e46581e09148781915e7e7868671e46f9 (diff) |
pst-plot (5may12)
git-svn-id: svn://tug.org/texlive/trunk@26218 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/generic/pst-plot/pst-plot.tex')
-rw-r--r-- | Master/texmf-dist/tex/generic/pst-plot/pst-plot.tex | 29 |
1 files changed, 19 insertions, 10 deletions
diff --git a/Master/texmf-dist/tex/generic/pst-plot/pst-plot.tex b/Master/texmf-dist/tex/generic/pst-plot/pst-plot.tex index b53b1b82a89..0f75e67e95c 100644 --- a/Master/texmf-dist/tex/generic/pst-plot/pst-plot.tex +++ b/Master/texmf-dist/tex/generic/pst-plot/pst-plot.tex @@ -1,4 +1,4 @@ -% $Id: pst-plot.tex 669 2012-03-14 19:33:54Z herbert $ +% $Id: pst-plot.tex 687 2012-05-03 12:06:21Z herbert $ %% BEGIN pst-plot.tex %% %% plotting functions and data with PSTricks. @@ -20,8 +20,8 @@ \ifx\PSTFPloaded\endinput\else \input pst-fp.tex \fi \ifx\MultidoLoaded\endinput\else \input multido.tex \fi % -\def\fileversion{1.40} -\def\filedate{2012/03/14} +\def\fileversion{1.42} +\def\filedate{2012/05/03} \message{ v\fileversion, \filedate\space (tvz,hv)} % \edef\TheAtCode{\the\catcode`\@} @@ -1743,6 +1743,7 @@ D\space##1% /maxTickline \ifis@yAxis \pst@number#3 \else \pst@number#4 \fi def /dT \ifis@yAxis \psk@dy \else \psk@dx \fi\space abs % added abs 2006-07-07 65536 div viceversa { neg } if def % div to get pt instead of sp + /DT \ifis@yAxis \psk@Dy \else \psk@Dx \fi\space abs viceversa { neg } if def /subTNo \ifis@yAxis\psk@ysubticks\else\psk@xsubticks\fi \space def subTNo 0 gt { /dsubT dT subTNo div def}{ /dsubT 0 def } ifelse % deltaSubTick \ifis@yAxis \psk@yticksize \else \psk@xticksize \fi @@ -1786,13 +1787,17 @@ D\space##1% %\iffalse % start ticks --------------------------------------------------------- % showOrigin { 0 }{ dT } ifelse - 0 dT MaxValue 1 add { % the positive part of the axes + 0 dT MaxValue 1 add { % the positive part of the axes, step unit is pt /cntTick exch def % the index logLines { % log lines? gsave - 1 10 subTNo div 9.99 { % do not write a line for 1 + 1 1 DT { + 1 sub /OffSet exch def +% 1 10 subTNo div 9.99 { % do not write a line for 1 + 10 subTNo 1 add div dup 10 { % do not write a line for 1 /dx exch def % save index - /x cntTick dT dx log mul add def % +% /x cntTick dT dx log mul add def % + /x dx log OffSet add \ifis@yAxis\pst@number\psyunit\else\pst@number\psxunit\fi\space mul cntTick add def % x abs MaxValue abs le { % out of range? \ifis@yAxis \ifPst@maxyTicks true \else false \fi @@ -1804,7 +1809,7 @@ D\space##1% { x tickstart STsize mul #5 moveto x tickend STsize mul #5 lineto } ifelse } if - } for + } for } for subTwidth SLW subTColor % set line width and subtick color subLSstroke grestore % restore main tick status @@ -1863,9 +1868,13 @@ D\space##1% /cntTick exch def logLines { % log lines? gsave - 1 10 subTNo div 9.99 { % do not write a line for 1 + 1 1 DT cvi { + 1 sub /OffSet exch def + 10 subTNo 1 add div dup 10 { % do not write a line for 1 +% 1 10 subTNo div 9.99 { % do not write a line for 1 /dx exch def % save index - /x cntTick dT dx log mul add def % +% /x cntTick dT dx log mul add def % + /x dx log OffSet add \ifis@yAxis\pst@number\psyunit\else\pst@number\psxunit\fi\space mul cntTick add def x abs MinValue abs le { % out of range? \ifis@yAxis \ifPst@maxyTicks true \else false \fi @@ -1877,7 +1886,7 @@ D\space##1% { x tickstart STsize mul #5 moveto x tickend STsize mul #5 lineto } ifelse } if - } for + } for } for /dsubT 0 def subTwidth SLW subTColor % set line width and subtick color subLSstroke |