summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/generic/pst-plot
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2012-05-05 22:01:58 +0000
committerKarl Berry <karl@freefriends.org>2012-05-05 22:01:58 +0000
commit4c56a7f771b8c9fabb57b8def881a6c6785e5699 (patch)
tree67ace5cf3da0ddba9b8d5cd000de7ec7b9cfffa9 /Master/texmf-dist/tex/generic/pst-plot
parent3f76fb1e46581e09148781915e7e7868671e46f9 (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')
-rw-r--r--Master/texmf-dist/tex/generic/pst-plot/pst-plot.tex29
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