summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/latex/tkz-euclide/tkz-obj-eu-points.tex
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/tex/latex/tkz-euclide/tkz-obj-eu-points.tex')
-rw-r--r--Master/texmf-dist/tex/latex/tkz-euclide/tkz-obj-eu-points.tex49
1 files changed, 37 insertions, 12 deletions
diff --git a/Master/texmf-dist/tex/latex/tkz-euclide/tkz-obj-eu-points.tex b/Master/texmf-dist/tex/latex/tkz-euclide/tkz-obj-eu-points.tex
index 62600426e73..774faae9219 100644
--- a/Master/texmf-dist/tex/latex/tkz-euclide/tkz-obj-eu-points.tex
+++ b/Master/texmf-dist/tex/latex/tkz-euclide/tkz-obj-eu-points.tex
@@ -1,11 +1,11 @@
% tkz-obj-eu-points.tex
-% Copyright 2011 by Alain Matthes
+% Copyright 2020 by Alain Matthes
% This file may be distributed and/or modified
% 1. under the LaTeX Project Public License and/or
% 2. under the GNU Public License.
-\def\fileversion{3.01c}
-\def\filedate{2020/01/23}
-\typeout{2020/01/23 3.01c tkz-obj-eu-points.tex}
+\def\fileversion{3.02c}
+\def\filedate{2020/01/24}
+\typeout{2020/01/24 3.02c tkz-obj-eu-points.tex}
\makeatletter
%add ExCenter
%<--------------------------------------------------------------------------–>
@@ -354,15 +354,16 @@
%<--------------------------------------------------------------------------–>
% Nagel center Na
%<--------------------------------------------------------------------------–>
-% INa = 3 IG. Nagel point
+% INa = 3 IG. Nagel point % correction 02/02/20
\def\tkzNagelCenter(#1,#2,#3){%
\begingroup
\pgfinterruptboundingbox
- \tkzInCenter(#1,#2,#3)
- \pgfnodealias{tkz@ptin}{tkzPointResult}
- \tkzCentroid(#1,#2,#3)
- \pgfnodealias{tkz@cen}{tkzPointResult}
- \tkz@VecCoLinear(tkz@ptin,tkz@cen,tkz@ptin)
+ \tkzDefExcentralTriangle(#1,#2,#3){tkz@a,tkz@b,tkz@c}
+ \tkzUProjection(#2,#3)(tkz@a)
+ \pgfnodealias{tkz@tgta}{tkzPointResult}
+ \tkzUProjection(#1,#2)(tkz@c)
+ \pgfnodealias{tkz@tgtc}{tkzPointResult}
+ \tkzInterLL(#1,tkz@tgta)(#3,tkz@tgtc)
\endpgfinterruptboundingbox
\endgroup
}
@@ -459,7 +460,31 @@
\pgfnodealias{\csname tkz@ppt3\endcsname\csname tkz@pt3\endcsname}{tkzPointResult}
\endgroup
}
-
-
+%<--------------------------------------------------------------------------–>
+% Point on circle
+%<--------------------------------------------------------------------------–>
+\pgfkeys{/tkzptcircle/.cd,
+ angle/.store in = \tkz@angle,
+ angle = 0 ,
+ center/.store in = \tkz@center,
+ radius/.store in = \tkz@radius
+}
+\def\tkzDefPointOnCircle{\pgfutil@ifnextchar[{\tkz@DefPointOnCircle}{\tkz@DefPointOnCircle[]}}
+\def\tkz@DefPointOnCircle[#1]{%
+\begingroup
+\pgfqkeys{/tkzptcircle}{#1}
+\path (\tkz@center) --++(\tkz@angle:\tkz@radius) coordinate(tkzPointResult);
+\endgroup
+}
+%<--------------------------------------------------------------------------–>
+% Point on line
+%<--------------------------------------------------------------------------–>
+\def\tkzDefPointOnLine{\pgfutil@ifnextchar[{\tkz@DefPointOnLine}{\tkz@DefPointOnLine[]}}
+\def\tkz@DefPointOnLine[#1](#2,#3){%
+\begingroup
+\path (#2) to [#1] coordinate (tkzPointResult) (#3);
+\endgroup
+}
+
\makeatother
\endinput \ No newline at end of file