summaryrefslogtreecommitdiff
path: root/macros/latex/contrib/tkz/tkz-euclide/latex/tkz-obj-eu-polygons.tex
diff options
context:
space:
mode:
authorNorbert Preining <norbert@preining.info>2023-01-24 03:02:57 +0000
committerNorbert Preining <norbert@preining.info>2023-01-24 03:02:57 +0000
commitb06c6695162b493aeec3b594c6beb518c15c98ba (patch)
tree0c1dc3cfc73ea789d6bdc4673d776f3ef652d6d8 /macros/latex/contrib/tkz/tkz-euclide/latex/tkz-obj-eu-polygons.tex
parent4451a2090261307c963209bc65fea9fde4eceeea (diff)
CTAN sync 202301240302
Diffstat (limited to 'macros/latex/contrib/tkz/tkz-euclide/latex/tkz-obj-eu-polygons.tex')
-rw-r--r--macros/latex/contrib/tkz/tkz-euclide/latex/tkz-obj-eu-polygons.tex113
1 files changed, 0 insertions, 113 deletions
diff --git a/macros/latex/contrib/tkz/tkz-euclide/latex/tkz-obj-eu-polygons.tex b/macros/latex/contrib/tkz/tkz-euclide/latex/tkz-obj-eu-polygons.tex
deleted file mode 100644
index 79fd6e561a..0000000000
--- a/macros/latex/contrib/tkz/tkz-euclide/latex/tkz-obj-eu-polygons.tex
+++ /dev/null
@@ -1,113 +0,0 @@
-% tkz-obj-eu-polygons.tex
-% Copyright 2022 Alain Matthes
-% This work may be distributed and/or modified under the
-% conditions of the LaTeX Project Public License, either version 1.3
-% of this license or (at your option) any later version.
-% The latest version of this license is in
-% http://www.latex-project.org/lppl.txt
-% and version 1.3 or later is part of all distributions of LaTeX
-% version 2005/12/01 or later.
-% This work has the LPPL maintenance status “maintained”.
-% The Current Maintainer of this work is Alain Matthes.
-
-\def\fileversion{4.25c}
-\def\filedate{2022/09/23}
-\typeout{2022/09/23 4.25c tkz-obj-eu-polygons.tex}
-% bug in regular polygon side 2020/03/09
-\makeatletter
-%<--------------------------------------------------------------------------–>
-% Polygon
-%<--------------------------------------------------------------------------–>
-%<--------------------------- square ------------------------------------–>
-%
-%<--------------------------------------------------------------------------–>
-\def\tkzDefSquare(#1,#2){
-\begingroup
- \tkzURotateAngle(#2,-90)(#1)
- \pgfnodealias{tkzFirstPointResult}{tkzPointResult}
- \tkzURotateAngle(#1, 90)(#2)
- \pgfnodealias{tkzSecondPointResult}{tkzPointResult}
-\endgroup
-}
-%<--------------------- parallélogramme ---------------------------------–>
-%
-%<--------------------------------------------------------------------------–>
-\def\tkzDefParallelogram(#1,#2,#3){
-\begingroup
-\tkzDefPointWith[colinear= at #3](#2,#1)
-\endgroup
-}
-%<--------------------- rectangle ---------------------------------–>
-%
-%<--------------------------------------------------------------------------–>
-\def\tkzDefRectangle{\pgfutil@ifnextchar[{\tkz@DefRectangle}%
- {\tkz@DefRectangle[]}}
-\def\tkz@DefRectangle[#1](#2,#3){%
-\begingroup
- \path[#1](#2) -| coordinate (tkzFirstPointResult) (#3) -| coordinate (tkzSecondPointResult) (#2);
-\endgroup
-}
-%<-------------------------- gold rectangle -------------------------------–>
-%
-%<--------------------------------------------------------------------------–>
-\def\tkzDefGoldRectangle(#1,#2){
-\begingroup
- \tkzDefPointWith[K=-\tkzInvPhi](#2,#1)
- \pgfnodealias{tkzFirstPointResult}{tkzPointResult}
- \tkzDefPointWith[K=\tkzInvPhi](#1,#2)
- \pgfnodealias{tkzSecondPointResult}{tkzPointResult}
-\endgroup
-}
-\let\tkzDefGoldenRectangle\tkzDefGoldRectangle
-%<---------------------------- Regular Polygon -------------------------–>
-\def\tkz@numregpol{0}
-\pgfkeys{/defregpoly/.cd,
- name/.store in = \tkz@regpolname,
- sides/.store in = \tkz@regpolsides,
- center/.code = \def\tkz@numregpol{0},
- side/.code = \def\tkz@numregpol{1},
- name/.default = P,
- sides/.default = 5,
- center
-}
-\def\tkzDefRegPolygon{\pgfutil@ifnextchar[{\tkz@DefRegPolygon}{\tkz@DefRegPolygon[]}}
-\def\tkz@DefRegPolygon[#1](#2,#3){%
-\begingroup
-\pgfqkeys{/defregpoly}{#1}
-\ifcase\tkz@numregpol%
- \tkzRegPolygonCenter(#2,#3)
- \or%
- \tkzRegPolygonSide(#2,#3)
- \fi
-\endgroup
-}
-\def\tkzRegPolygonCenter(#1,#2){
-\begingroup
- \foreach \v in {1,2,...,\tkz@regpolsides}
- {%
- \pgfmathsetmacro{\tkz@regangle}{360/\tkz@regpolsides*(\v-1)}
- \tkzDefPointBy[rotation= center #1 angle \tkz@regangle](#2)
- \pgfnodealias{\tkz@regpolname\v}{tkzPointResult}
- }
-\endgroup
-}
-\def\tkzRegPolygonSide(#1,#2){
-\begingroup
-% get the center
-\pgfmathsetmacro{\tkz@regangle}{360/\tkz@regpolsides*(\tkz@regpolsides-1)}
-\pgfmathsetmacro{\tkz@regangleside}{(180-\tkz@regangle)/2}
-\tkzDefMidPoint(#1,#2)
-\pgfnodealias{tkz@tempPt}{tkzPointResult}
-\tkz@@CalcLengthcm(tkz@tempPt,#1){tkz@len}
-\pgfmathsetmacro{\tkz@inscriberadius}{%
- \tkz@len*tan(90*(\tkz@regpolsides-2)/\tkz@regpolsides)}
-\tkzDefPointWith[orthogonal normed,K=\tkz@inscriberadius](tkz@tempPt,#2)
-\pgfnodealias{tkz@RegPolCenter}{tkzPointResult}
-\tkzRegPolygonCenter(tkz@RegPolCenter,#1)
-\pgfnodealias{tkzPointResult}{tkz@RegPolCenter}
-\endgroup
-}
-
-
-\makeatother
-\endinput \ No newline at end of file