texlive[41976] Master/texmf-dist: pst-eucl (2sep16)
commits+karl at tug.org
commits+karl at tug.org
Sat Sep 3 03:23:02 CEST 2016
Revision: 41976
http://tug.org/svn/texlive?view=revision&revision=41976
Author: karl
Date: 2016-09-03 03:23:02 +0200 (Sat, 03 Sep 2016)
Log Message:
-----------
pst-eucl (2sep16)
Modified Paths:
--------------
trunk/Master/texmf-dist/doc/generic/pst-eucl/Changes
trunk/Master/texmf-dist/doc/generic/pst-eucl/README
trunk/Master/texmf-dist/doc/generic/pst-eucl/pst-eucl-doc.pdf
trunk/Master/texmf-dist/doc/generic/pst-eucl/pst-eucl-doc.tex
trunk/Master/texmf-dist/tex/generic/pst-eucl/pst-eucl.tex
Modified: trunk/Master/texmf-dist/doc/generic/pst-eucl/Changes
===================================================================
--- trunk/Master/texmf-dist/doc/generic/pst-eucl/Changes 2016-09-03 01:11:06 UTC (rev 41975)
+++ trunk/Master/texmf-dist/doc/generic/pst-eucl/Changes 2016-09-03 01:23:02 UTC (rev 41976)
@@ -4,6 +4,8 @@
pst-eucl.tex --------
+1.54 2016/09/01 - added MarkArrow, MarkArroww,MarkArrowww
+1.53 2016/05/03 - revert changes of CodeFig(A|B)
1.52 2015/10/19 - added more optional arguments (ts)
1.51 2014/05/17 - added two new functions for angles and distances
1.50 2014/04/05 - added MarkHashLength|Sep (hv)
Modified: trunk/Master/texmf-dist/doc/generic/pst-eucl/README
===================================================================
--- trunk/Master/texmf-dist/doc/generic/pst-eucl/README 2016-09-03 01:11:06 UTC (rev 41975)
+++ trunk/Master/texmf-dist/doc/generic/pst-eucl/README 2016-09-03 01:23:02 UTC (rev 41976)
@@ -1,4 +1,4 @@
- the pst-eucl package
+pst-eucl package
This program can be redistributed and/or modified under the terms
of the LaTeX Project Public License Distributed from CTAN
@@ -27,10 +27,3 @@
run `texhash`
- if you don't have a local texmf directory, you can create it or ask
- the root to create it by modifying the file:
-
- $(TEXMF)/web2c/texmf.cnf
-
- remove the original for the first line:
-
Modified: trunk/Master/texmf-dist/doc/generic/pst-eucl/pst-eucl-doc.pdf
===================================================================
(Binary files differ)
Modified: trunk/Master/texmf-dist/doc/generic/pst-eucl/pst-eucl-doc.tex
===================================================================
--- trunk/Master/texmf-dist/doc/generic/pst-eucl/pst-eucl-doc.tex 2016-09-03 01:11:06 UTC (rev 41975)
+++ trunk/Master/texmf-dist/doc/generic/pst-eucl/pst-eucl-doc.tex 2016-09-03 01:23:02 UTC (rev 41976)
@@ -258,6 +258,9 @@
\item \Seg{MarkHashhh}
\item \Seg{MarkCros}
\item \Seg{MarkCross}
+ \item \Seg{MarkArrow}
+ \item \Seg{MarkArroww}
+ \item \Seg{MarkArrowww}
\end{compactitem}
\end{multicols}
\endgroup
Modified: trunk/Master/texmf-dist/tex/generic/pst-eucl/pst-eucl.tex
===================================================================
--- trunk/Master/texmf-dist/tex/generic/pst-eucl/pst-eucl.tex 2016-09-03 01:11:06 UTC (rev 41975)
+++ trunk/Master/texmf-dist/tex/generic/pst-eucl/pst-eucl.tex 2016-09-03 01:23:02 UTC (rev 41976)
@@ -10,15 +10,15 @@
%% : hv herbert at dante.de
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% Require PSTricks and pst-node packages
-\ifx\PSTricksLoaded\endinput\else\input pstricks.tex\fi
\ifx\PSTnodesLoaded\endinput\else\input pst-node.tex\fi
+\ifx\PSTArrowLoaded\endinput\else\input pst-arrow.tex\fi
\ifx\PSTtoolsLoaded\endinput\else\input pst-tools.tex\fi
-\ifx\PSTXKeyLoaded\endinput\else \input pst-xkey\fi
+%\ifx\PSTXKeyLoaded\endinput\else \input pst-xkey\fi
\ifx\MultidoLoaded\endinput \else\input multido.tex \fi
\csname PSTEuclideLoaded\endcsname
\let\PSTEuclideLoaded\endinput
-\def\fileversion{1.52}
-\def\filedate{2015/10/19}
+\def\fileversion{1.54}
+\def\filedate{2016/09/01}
%% This program can be redistributed and/or modified under the terms
%% of the LaTeX Project Public License Distributed from CTAN
%% archives in directory macros/latex/base/lppl.txt.
@@ -48,12 +48,12 @@
\newif\ifPst at PtNameMath%
\define at key[psset]{pst-eucl}{PtNameMath}[false]{\@nameuse{Pst at PtNameMath#1}}%
% symbol used for marking equal length segment
-\define at key[psset]{pst-eucl}{SegmentSymbol}[MarkHashh]{\edef\psk at SegmentSymbol{#1}}%
-\define at key[psset]{pst-eucl}{SegmentSymbolA}[MarkHashh]{\edef\psk at SegmentSymbolA{#1}}%
-\define at key[psset]{pst-eucl}{SegmentSymbolB}[MarkHashh]{\edef\psk at SegmentSymbolB{#1}}%
-\define at key[psset]{pst-eucl}{SegmentSymbolC}[MarkHashh]{\edef\psk at SegmentSymbolC{#1}}%
-\define at key[psset]{pst-eucl}{Mark}[undef]{\edef\psk at Mark{#1}}%
-\define at key[psset]{pst-eucl}{mark}[undef]{\edef\psk at mark{Angle#1}}% for angles
+\define at key[psset]{pst-eucl}{SegmentSymbol}[MarkHashh]{\def\psk at SegmentSymbol{#1}}%
+\define at key[psset]{pst-eucl}{SegmentSymbolA}[MarkHashh]{\def\psk at SegmentSymbolA{#1}}%
+\define at key[psset]{pst-eucl}{SegmentSymbolB}[MarkHashh]{\def\psk at SegmentSymbolB{#1}}%
+\define at key[psset]{pst-eucl}{SegmentSymbolC}[MarkHashh]{\def\psk at SegmentSymbolC{#1}}%
+\define at key[psset]{pst-eucl}{Mark}[undef]{\def\psk at Mark{#1}}%
+\define at key[psset]{pst-eucl}{mark}[undef]{\def\psk at mark{Angle#1}}% for angles
\define at key[psset]{pst-eucl}{MarkAngle}[undef]{\edef\psk at MarkAngle{#1}}%
\newdimen\psMarkHashLength
\newdimen\psMarkHashSep
@@ -277,7 +277,7 @@
\def\Pst at SegmentMark[#1]#2#3{%
\bgroup\psset{#1}% % Affectation of local parameters
\ncline[nodesep=0]{#2}{#3}
- \ncput[nrot=:U]{$\csname\psk at SegmentSymbol\endcsname$}%
+ \ncput[nrot=:U]{$\expandafter\@nameuse\expandafter{\psk at SegmentSymbol}$}% $
\egroup%
}%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
@@ -348,6 +348,19 @@
\let\AngleMarkCross\MarkCross
\def\MarkCirc{\pscircle(0,0){2\pslinewidth}}
\let\AngleMarkCirc\MarkCirc
+% MarkArrow >
+\def\MarkArrow{%
+ \psline[linestyle=none,veearrowlength=\psMarkHashLength,
+ veearrowangle=90,veearrowlinewidth=\pslinewidth,
+ ArrowInside=-v](-\psMarkHashLength,0)(\psMarkHashLength,0)}%
+\def\MarkArroww{%
+ \psline[linestyle=none,veearrowlength=\psMarkHashLength,
+ veearrowangle=90,veearrowlinewidth=\pslinewidth,
+ ArrowInsideNo=2,ArrowInside=-v](-2\psMarkHashLength,0)(2\psMarkHashLength,0)}%
+\def\MarkArrowww{%
+ \psline[linestyle=none,veearrowlength=\psMarkHashLength,
+ veearrowangle=90,veearrowlinewidth=\pslinewidth,
+ ArrowInsideNo=3,ArrowInside=-v](-2.5\psMarkHashLength,0)(2.5\psMarkHashLength,0)}%
%
%%end modif alaindelplanque 11/2003
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
@@ -1084,14 +1097,14 @@
\egroup
\psset{linecolor=\psk at CodeFigColor, linestyle=\psk at CodeFigStyle, arcsep=-1}%
\ifx\psk at CodeFigA\@undef%
- \ifx\psk at CodeFigB\@undef\ifPst at CodeFig\ifPst at CodeFigAarc\pstArcOAB{#2}{#6}{#7}\else\pstArcnOAB{#2}{#6}{#7}\fi\fi\fi
+ \ifx\psk at CodeFigB\@undef\ifPst at CodeFig\pstArcOAB{#2}{#6}{#7}\fi\fi
\else%
- \ifx\psk at CodeFigA\@none \ifPst at CodeFigA\ifPst at CodeFigAarc\pstArcOAB{#2}{#6}{#7}\else\pstArcnOAB{#2}{#6}{#7}\fi\fi\fi
+ \ifPst at CodeFigAarc\pstArcOAB{#2}{#6}{#7}\else\pstArcnOAB{#2}{#6}{#7}\fi%
\fi
\ifx\psk at CodeFigB\@undef%
- \ifx\psk at CodeFigA\@undef\ifPst at CodeFig\ifPst at CodeFigBarc\pstArcOAB{#4}{#6}{#7}\else\pstArcnOAB{#4}{#6}{#7}\fi\fi\fi
- \else
- \ifx\psk at CodeFigB\@none \ifPst at CodeFigB\ifPst at CodeFigBarc\pstArcOAB{#4}{#6}{#7}\else\pstArcnOAB{#4}{#6}{#7}\fi\fi\fi
+ \ifx\psk at CodeFigA\@undef\ifPst at CodeFig\pstArcOAB{#4}{#6}{#7}\fi\fi
+ \else%
+ \ifPst at CodeFigBarc\pstArcOAB{#4}{#6}{#7}\else\pstArcnOAB{#4}{#6}{#7}\fi%
\fi
\egroup
}%
More information about the tex-live-commits
mailing list