texlive[53594] Master/texmf-dist: pst-eucl (29jan20)
commits+karl at tug.org
commits+karl at tug.org
Wed Jan 29 23:38:39 CET 2020
Revision: 53594
http://tug.org/svn/texlive?view=revision&revision=53594
Author: karl
Date: 2020-01-29 23:38:39 +0100 (Wed, 29 Jan 2020)
Log Message:
-----------
pst-eucl (29jan20)
Modified Paths:
--------------
trunk/Master/texmf-dist/doc/generic/pst-eucl/Changes
trunk/Master/texmf-dist/doc/generic/pst-eucl/pst-eucl-doc.bib
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
trunk/Master/texmf-dist/tex/latex/pst-eucl/pst-eucl.sty
Modified: trunk/Master/texmf-dist/doc/generic/pst-eucl/Changes
===================================================================
--- trunk/Master/texmf-dist/doc/generic/pst-eucl/Changes 2020-01-29 22:38:26 UTC (rev 53593)
+++ trunk/Master/texmf-dist/doc/generic/pst-eucl/Changes 2020-01-29 22:38:39 UTC (rev 53594)
@@ -6,6 +6,8 @@
pst-eucl.tex --------
+1.70 2020/01/29 - add optional argument RightAngleDotDistance to controll the the dot
+ position for right angles (type german or swissromand)
1.69 2020/01/09 - add macro to get the chord with specified length, \pstCircleChordNode.
- add macro to draw the center of the triangle's escribed circle, \pstTriangleEC.
- add macro to draw the orthocenter of triangle, \pstTriangleHC.
Modified: trunk/Master/texmf-dist/doc/generic/pst-eucl/pst-eucl-doc.bib
===================================================================
--- trunk/Master/texmf-dist/doc/generic/pst-eucl/pst-eucl-doc.bib 2020-01-29 22:38:26 UTC (rev 53593)
+++ trunk/Master/texmf-dist/doc/generic/pst-eucl/pst-eucl-doc.bib 2020-01-29 22:38:39 UTC (rev 53594)
@@ -55,7 +55,7 @@
edition = {7},
publisher = {DANTE -- Lehmanns},
year = {2016},
- address = {Heidelberg/Hamburg}
+ address = {Heidelberg and Hamburg}
}
@Book{PSTricksE,
@@ -82,7 +82,7 @@
edition = {1},
publisher = {DANTE -- Lehmanns Media},
year = {2012},
- address = {Heidelberg/Berlin}
+ address = {Heidelberg and Berlin}
}
@@ -90,9 +90,9 @@
author = {Victor Eijkhout},
title = {\TeX\ by Topic -- {A} \TeX{}nician Reference},
edition = {1},
- publisher = {DANTE -- lehmanns media},
+ publisher = {DANTE -- Lehmanns media},
year = {2014},
- address = {Heidelberg/Berlin}
+ address = {Heidelberg and Berlin}
}
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 2020-01-29 22:38:26 UTC (rev 53593)
+++ trunk/Master/texmf-dist/doc/generic/pst-eucl/pst-eucl-doc.tex 2020-01-29 22:38:39 UTC (rev 53594)
@@ -370,6 +370,8 @@
\end{pspicture}
\end{LTXexample}
+%$
+
\subsection{Triangles}
The more classical figure, it has its own macro \Lcs{pstTriangle} for a quick definition:
@@ -413,6 +415,8 @@
\Lcs{pstTriangleASA}\OptArgs\Largr{pos}\Largb{A}\Largr{$\angle{A}$,c,$\angle{B}$}\Largb{B}\Largb{C}
\end{BDef}
+%$
+
- Macro \Lcs{pstTriangleSSS} create a triangle $ABC$ with given $A(x_1,y_1)$, and the three sides $a,b,c$,
it output $B(x_2,y_2)$ and $C(x_3,y_3)$.\\
- Macro \Lcs{pstTriangleSAS} create a triangle $ABC$ with given $A(x_1,y_1)$, the angle of $\angle{A}$, and the other two sides $b,c$,
@@ -527,12 +531,12 @@
\begin{sloppypar}
-Valid optional arguments are \Lkeyword{RightAngleType}, \Lkeyword{RightAngleSize}, and
- \Lkeyword{RightAngleSize}
+Valid optional arguments are \Lkeyword{RightAngleType}, \Lkeyword{RightAngleSize},
+ \Lkeyword{RightAngleSize}, and \Lkeyword{RightAngleDotDistance}
\end{sloppypar}
-The symbol used is controlled by the parameter \Lkeyword{RightAngleType}
-\nxLkeyval{default}. Its possible values are :
+The symbol is controlled by the parameter \Lkeyword{RightAngleType}
+\nxLkeyval{default}. Its possible values are:
\begin{compactitem}
\item \Lkeyval{*} : standard symbol ;
@@ -540,10 +544,17 @@
\item \Lkeyval{suisseromand} : swiss romand symbol (given P. Schnewlin).
\end{compactitem}
-The only parameter controlling this command, excepting the ones which
+The only parameters controlling this command, excepting the ones which
controlled the line, is \Lkeyword{RightAngleSize} which defines the size
-of the symbol \DefaultVal{0.28 unit}.
+of the symbol \DefaultVal{0.28 unit} and \Lkeyword{RightAngleDotDistance}. For a
+right angle style \Lkeyval{german} or \Lkeyval{swissromand} the distance of the dot
+is preset to 0.5 (\Lkeyval{german}) or 0.45 (\Lkeyval{swissromand}), relative to the radius.
+It can be controlled by the optional argument \Lkeyword{RightAngleDotDistance} which is
+preset to 1. A greater value moves the dot away from the reference point.
+
+
+
For other angles, there is the command:
\begin{BDef}
Modified: trunk/Master/texmf-dist/tex/generic/pst-eucl/pst-eucl.tex
===================================================================
--- trunk/Master/texmf-dist/tex/generic/pst-eucl/pst-eucl.tex 2020-01-29 22:38:26 UTC (rev 53593)
+++ trunk/Master/texmf-dist/tex/generic/pst-eucl/pst-eucl.tex 2020-01-29 22:38:39 UTC (rev 53594)
@@ -1,13 +1,13 @@
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -*- Mode: Latex -*- %%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% pst-eucl.tex --- Generation of geometric figures in euclidean geometry
%% Copyright 2000-2013 Dominique RODRIGUEZ
-%% Copyright 2014- Dominique RODRIGUEZ, Herbert Voß
+%% Copyright 2014-... Dominique RODRIGUEZ, Herbert Voß
%%
%% 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.
%%
-%% Author : Dominique RODRIGUEZ (EN) <dominique.rodriguez at waika9.com>
+%% Authors : Dominique RODRIGUEZ (EN) <dominique.rodriguez at waika9.com>
%% : hv hvoss at tug.org
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% Require PSTricks and pst-node packages
@@ -20,8 +20,8 @@
\csname PSTEuclideLoaded\endcsname
\let\PSTEuclideLoaded\endinput
%
-\def\fileversion{1.69}
-\def\filedate{2020/01/09}
+\def\fileversion{1.70}
+\def\filedate{2020/01/29}
%%
\message{`PST-Euclide v\fileversion, \filedate\space (dr,hv)}%
%% prologue for postcript
@@ -73,7 +73,7 @@
\iffalse
\define at key[psset]{pst-eucl}{PosAngle}{\expandafter\psk@@Pos at Angle#1,,!}%
\def\psk@@Pos at Angle#1,#2,#3#4#5!{%
- \typeout{1: #1; 2: #2; 3: #3; 4: #4; 5: #5}%
+% \typeout{1: #1; 2: #2; 3: #3; 4: #4; 5: #5}%
\def\psk at PosAngle{#1}%
\def\@temp{#1}%
\ifx\@temp\@undef \typeout{Nichts machen}\else\typeout{Winkel setzen}%
@@ -89,6 +89,7 @@
% dimension of the right angle mark
\define at key[psset]{pst-eucl}{RightAngleSize}[4]{\def\psk at RightAngleSize{#1}}%
\define at key[psset]{pst-eucl}{RightAngleType}[default]{\def\psk at RightAngleType{#1}}%
+\define at key[psset]{pst-eucl}{RightAngleDotDistance}[1]{\def\psk at RightAngleDotDistance{#1 }}%
% radius of an angle mark
\define at key[psset]{pst-eucl}{MarkAngleRadius}[0.4]{\def\psk at MarkAngleRadius{#1}}%
\define at key[psset]{pst-eucl}{MarkAngleType}[default]{\def\psk at MarkAngleType{#1}}%
@@ -156,7 +157,8 @@
PosAngleA=undef,
PosAngleB=undef, PosAngleC=undef, Mark=undef, mark=undef,SegmentSymbol=MarkHashh,
SegmentSymbolA=MarkHashh, SegmentSymbolB=MarkHash, SegmentSymbolC=MarkHashhh,
- RightAngleSize=.4, RightAngleType=default, LabelAngleOffset=0, LabelSep=1,
+ RightAngleSize=.4, RightAngleType=default, RightAngleDotDistance=1,
+ LabelAngleOffset=0, LabelSep=1,
LabelRefPt=c, MarkAngle=undef, MarkAngleType=default, MarkAngleRadius=.4,
HomCoef=.5, RotAngle=60,
CurveType=none, TransformLabel=none, Central at Sym=false, DrawCirABC=true,
@@ -465,13 +467,13 @@
% \psline(0,0)
% }
% \fi
- \pstMarkAngle[MarkAngleRadius=\psk at RightAngleSize,LabelSep=\psk at RightAngleSize\space .5 mul]{#1}{#2}{#3}%
+ \pstMarkAngle[MarkAngleRadius=\psk at RightAngleSize,LabelSep=\psk at RightAngleSize\space .5 mul \psk at RightAngleDotDistance mul]{#1}{#2}{#3}%
{\psscalebox{\psk at RightAngleSize}{\pscircle*{!.08 \psk at xdotscale\space mul}}}%
\else
\ifx\psk at RightAngleType\@suisseromand
\rput{*0}%
(!tx at EcldDict begin /N@#3 GetNode exch Atan /N@#1 GetNode exch Atan
- 2 copy lt { exch 360 sub exch } if add 2 div .45 \psk at RightAngleSize\space mul exch PtoC end)%
+ 2 copy lt { exch 360 sub exch } if add 2 div .45 \psk at RightAngleSize\space mul \psk at RightAngleDotDistance mul exch PtoC end)%
{\psscalebox{\psk at RightAngleSize}{\pscircle*{.08}}}%
\psline(0,0)%
(!tx at EcldDict begin /N@#3 GetNode exch Atan \psk at RightAngleSize\space exch PtoC end )%
Modified: trunk/Master/texmf-dist/tex/latex/pst-eucl/pst-eucl.sty
===================================================================
--- trunk/Master/texmf-dist/tex/latex/pst-eucl/pst-eucl.sty 2020-01-29 22:38:26 UTC (rev 53593)
+++ trunk/Master/texmf-dist/tex/latex/pst-eucl/pst-eucl.sty 2020-01-29 22:38:39 UTC (rev 53594)
@@ -10,6 +10,6 @@
[\filedate\space v\fileversion\space `PST-eucl' (dr,hv)]
\IfFileExists{pst-eucl.pro}{%
\ProvidesFile{pst-eucl.pro}
- [2020/01/09 v. 1.02, PostScript prologue file (hv)]
+ [2020/01/29 v. 1.03, PostScript prologue file (hv)]
\@addtofilelist{pst-eucl.pro}}{}%
\endinput
More information about the tex-live-commits
mailing list.