summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/latex/tkz-euclide/tkz-obj-arcs.tex
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/tex/latex/tkz-euclide/tkz-obj-arcs.tex')
-rw-r--r--Master/texmf-dist/tex/latex/tkz-euclide/tkz-obj-arcs.tex272
1 files changed, 0 insertions, 272 deletions
diff --git a/Master/texmf-dist/tex/latex/tkz-euclide/tkz-obj-arcs.tex b/Master/texmf-dist/tex/latex/tkz-euclide/tkz-obj-arcs.tex
deleted file mode 100644
index fef8c6e81e1..00000000000
--- a/Master/texmf-dist/tex/latex/tkz-euclide/tkz-obj-arcs.tex
+++ /dev/null
@@ -1,272 +0,0 @@
-% Copyright 2011 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{1.16 c}
-\def\filedate{2011/06/01}
-
- %<--------------------------------------------------------------------------–>
-%<------------------------------ Arcs -------------------------------------–>
-%<--------------------------------------------------------------------------–>
-% options : delta
-\def\tkz@delta{0}
-\tikzset{arc style/.style={#1}}
-\pgfkeys{/tikz/.cd,delta/.code={\def\tkz@delta{#1}}}
-
-\global\def\tkz@numa{0}
-\pgfkeys{/drawarc/.cd,
-towards/.code = {\global\def\tkz@numa{0}},
-rotate/.code = {\global\def\tkz@numa{1}},
-angles/.code = {\global\def\tkz@numa{2}},
-R/.code = {\global\def\tkz@numa{3}},
-R with nodes/.code = {\global\def\tkz@numa{4}},
-/drawarc/.unknown/.code = {\let\searchname=\pgfkeyscurrentname
- \pgfkeysalso{\searchname/.try=#1,
- /tikz/\searchname/.retry=#1,%
- /pgf/\searchname/.retry=#1}}
-}
-
-\def\tkzDrawArc{\pgfutil@ifnextchar[{\tkz@DrawArc}{\tkz@DrawArc[]}}
-\def\tkz@DrawArc[#1](#2,#3)(#4){%
-\begingroup
-\pgfkeys{/drawarc/.cd,towards,delta=0}
-\pgfqkeys{/drawarc}{#1}
-\ifcase\tkz@numa%
- \tkzDrawArcN[#1](#2,#3)(#4)
-\or% 1
- \tkzDrawArcRotate[#1](#2,#3)(#4)
-\or% 2
- \tkzDrawArcAngles[#1](#2,#3)(#4)
- \or% 3
- \tkzDrawArcRAngles[#1](#2,#3)(#4)
- \or% 4
- \tkzDrawArcR[#1](#2,#3)(#4)
-\fi
-\endgroup
-}
-
-%<--------------------------------------------------------------------------–>
-% #1 center #2 radius #4 first angle (degree) #5 second angle (degree)
-% angles 0 .. 180 or -180 .. 0
-%<--------------------------------------------------------------------------–>
-% example : \tkzDrawArc(A,2 cm)(30,90)
-\def\tkzDrawArcRAngles{\pgfutil@ifnextchar[{\tkz@DrawArcRAngles}{%
- \tkz@DrawArcRAngles[]}}
-\def\tkz@DrawArcRAngles[#1](#2,#3)(#4,#5){%
- \begingroup
- \pgfmathparse{#4}\edef\tkz@FirstAngle{\pgfmathresult}%
- \pgfmathparse{#5}\edef\tkz@SecondAngle{\pgfmathresult}%
- \pgfmathgreaterthan{\tkz@FirstAngle}{0}
- \ifdim\pgfmathresult pt=1 pt\relax%
- \pgfmathgreaterthan{\tkz@FirstAngle}{\tkz@SecondAngle}
- \ifdim\pgfmathresult pt=1 pt\relax%
- \pgfmathsubtract{\tkz@FirstAngle}{360}
- \edef\tkz@FirstAngle{\pgfmathresult}%
- \fi
- \else
- \pgfmathgreaterthan{\tkz@FirstAngle}{\tkz@SecondAngle}
- \ifdim\pgfmathresult pt=1 pt\relax%
- \pgfmathadd{\tkz@SecondAngle}{360}
- \edef\tkz@SecondAngle{\pgfmathresult}%
- \fi
- \fi
- \pgfmathsubtract{\tkz@FirstAngle}{\tkz@delta}
- \edef\tkz@FirstAngle{\pgfmathresult}%
- \pgfmathadd{\tkz@SecondAngle}{\tkz@delta}
- \edef\tkz@SecondAngle{\pgfmathresult}
- \draw[shift = {(#2)},compass style,/drawarc/.cd,#1]%
- (\tkz@FirstAngle:#3) arc (\tkz@FirstAngle:\tkz@SecondAngle:#3);
-\endgroup
-}
-%<--------------------------------------------------------------------------–>
-% ARC nodes #2 center #3 first point last point #4
-% delta un peu plus à chaque extrémité
-% example : \tkzDrawArc(A,B)(C)
-%<--------------------------------------------------------------------------–>
-\def\tkzDrawArcN{\pgfutil@ifnextchar[{\tkz@DrawArcN}{\tkz@DrawArcN[]}}
-\def\tkz@DrawArcN[#1](#2,#3)(#4){%
-\begingroup
- \tkzCalcLength(#2,#3)\tkzGetLength{tkz@radius}
- \tkzFindSlopeAngle(#2,#3)\tkzGetAngle{tkz@FirstAngle}
- \tkzFindSlopeAngle(#2,#4)\tkzGetAngle{tkz@SecondAngle}
- \tkz@DrawArcRAngles[#1](#2,\tkz@radius pt)(\tkz@FirstAngle,\tkz@SecondAngle)
-\endgroup
-}
-%<--------------------------------------------------------------------------–>
-% nodes #2 center #3 first point rotate #3 with Angle
-% delta un peu plus à chaque extrémité
-% tkzDrawArcRotate(O,A)(60)
-%<--------------------------------------------------------------------------–>
-\def\tkzDrawArcRotate{\pgfutil@ifnextchar[{\tkz@DrawArcRotate}{%
- \tkz@DrawArcRotate[]}}
-\def\tkz@DrawArcRotate[#1](#2,#3)(#4){%
-\begingroup
- \tkzCalcLength(#2,#3)\tkzGetLength{tkz@radius}
- \tkzFindSlopeAngle(#2,#3)\tkzGetAngle{tkz@FirstA}
- \pgfmathadd{\tkz@FirstA}{#4}
- \edef\tkz@SecondA{\pgfmathresult}
- \pgfmathgreaterthan{#4}{0}
- \ifdim\pgfmathresult pt=1 pt\relax%
- \tkz@DrawArcRAngles[#1](#2,\tkz@radius pt)(\tkz@FirstA,\tkz@SecondA)
- \else
- \tkz@DrawArcRAngles[#1](#2,\tkz@radius pt)(\tkz@SecondA,\tkz@FirstA)
- \fi
- \endgroup
-}
-%<--------------------------------------------------------------------------–>
-% deux angles
-% \tkzDrawArcAngles(O,A)(0,60)
-%<--------------------------------------------------------------------------–>
-\def\tkzDrawArcAngles{\pgfutil@ifnextchar[{\tkz@DrawArcAngles}{%
- \tkz@DrawArcAngles[]}}
-\def\tkz@DrawArcAngles[#1](#2,#3)(#4,#5){%
-\begingroup
- \tkzCalcLength(#2,#3)
- \tkz@DrawArcRAngles[#1](#2,\tkzLengthResult pt)(#4,#5)
-\endgroup
-}
-%<--------------------------------------------------------------------------–>
-% Degree #2 center #4 - #3 radius from #5 (degree) to #6(degree)
-%<--------------------------------------------------------------------------–>
-\def\tkzDrawArcRwithNodesAngles{\pgfutil@ifnextchar[{%
- \tkz@DrawArcRwithNodesAngles}{%
- \tkz@DrawArcRwithNodesAngles[]}} \def\tkz@DrawArcRwithNodesAngles[#1](#2,#3,#4)(#5,#6){%
-\begingroup
- \tkzCalcLength(#3,#4)
- \tkz@DrawArcRAngles[#1](#2,\tkzLengthResult pt)(#5,#6)
-\endgroup
-}
-%<--------------------------------------------------------------------------–>
-%<--------------------------------------------------------------------------–>
-\def\tkzDrawArcRwithNodes{\pgfutil@ifnextchar[{\tkz@DrawArcRwithNodes}{%
- \tkz@DrawArcRwithNodes[]}}
-\def\tkz@DrawArcRwithNodes[#1](#2,#3,#4)(#5,#6){%
-\begingroup
- \tkzCalcLength(#3,#4)
- \tkzFindSlopeAngle(#2,#5)\tkzGetAngle{tkz@FirstAngle}
- \tkzFindSlopeAngle(#2,#6)\tkzGetAngle{tkz@SecondAngle}
- \tkz@DrawArcRAngles[#1](#2,\tkzLengthResult)%
- (\tkz@FirstAngle,\tkz@SecondAngle)
-\endgroup
-}
-%<--------------------------------------------------------------------------–>
-% Nodes R #2 center #3 radius en cm from #4(node) to #5(node)
-% \tkzDrawArcR(O,2 cm)(A,B)
-%<--------------------------------------------------------------------------–>
-\def\tkzDrawArcR{\pgfutil@ifnextchar[{\tkz@DrawArcR}{\tkz@DrawArcR[]}}
-\def\tkz@DrawArcR[#1](#2,#3)(#4,#5){%
-\begingroup
- \tkzFindSlopeAngle(#2,#4)\tkzGetAngle{tkz@FirstAngle}
- \tkzFindSlopeAngle(#2,#5)\tkzGetAngle{tkz@SecondAngle}
- \tkz@DrawArcRAngles[#1](#2,#3)(\tkz@FirstAngle,\tkz@SecondAngle)
-\endgroup
-}
-%<--------------------------------------------------------------------------–>
-%<--------------------------------------------------------------------------–>
-% Author Alain Matthes
-% idea from Y. Combe %<--------------------------------------------------------------------------–>
-%<--------------------------------------------------------------------------–>
-% Utilisation du Compas : Compass
-%<--------------------------------------------------------------------------–>
-% Setup Compass
-%<--------------------------------------------------------------------------–>
-\pgfkeys{%
-setupcompass/.cd,
-line width/.code = {\global\edef\tkz@compass@lw{#1}},
-color/.code = {\global\edef\tkz@compass@color{#1}},
-style/.code = {\global\edef\tkz@compass@style{#1}},
-}
-%<--------------------------------------------------------------------------–>
-%<--------------------------------------------------------------------------–>
-\def\tkzSetUpCompass{\pgfutil@ifnextchar[{\tkzActivOff\tkz@SetUpCompass}{%
- \tkzActivOff\tkz@SetUpCompass[]}}
-%<--------------------------------------------------------------------------–>
-\def\tkz@SetUpCompass[#1]{%
-\tkzActivOff
-\pgfkeys{%
-setupcompass/.cd,
-line width = \tkz@euc@compasswidth,
-color = \tkz@euc@compasscolor,
-style = \tkz@euc@compassstyle
-}
-\pgfqkeys{/setupcompass}{#1}
-\tikzset{compass style/.style={color = \tkz@compass@color,
- line width = \tkz@compass@lw,
- style = \tkz@compass@style
- }}
-}
-%<--------------------------------------------------------------------------–>
-% \tkzCompass(A, B)
-%
-% Marque de compas auto-ajustée en longueur
-% #2 center #3 le point
-% Par défaut:
-% longueur : 1cm, mais avec un maximum d'un angle de 180°
-% angle calculé pour la longueur
-% style traits pleins
-%
-% Paramètres (optionnels, gérés par xkeyval)
-% length : longueur de l'arc (ignoré si delta est différent de 0)
-% delta : angle sous-tendant l'arc
-
-%<--------------------------------------------------------------------------–>
- \pgfkeys{
- /compass/delta/.code = {\def\tkz@delta{#1}},
- /compass/length/.code = {\def\tkz@length{#1}},
- /compass/ratio/.code = {\def\tkz@ratio{#1}},
- /compass/.unknown/.code = {\let\searchname=\pgfkeyscurrentname
- \pgfkeysalso{\searchname/.try=#1,
- /tikz/\searchname/.retry=#1}}
-}
-
-% \def\tkz@length{2}
-% \pgfkeys{/tikz/.cd,length/.code={\def\tkz@length{#1}}}
-
-\def\tkzCompass{\pgfutil@ifnextchar[{\tkz@Compass}{\tkz@Compass[]}}
-\def\tkz@Compass[#1](#2,#3){%
-\begingroup
-\pgfkeys{%
- compass/.cd,
- length = 0.75,
- delta = 0,
- ratio = .5
- }
-\pgfkeys{compass/.cd,#1}
- \tkzCalcLength(#2,#3)\tkzGetLength{tkz@tempLen}
-\ifnum\tkz@delta=0 %
- \pgfmathsetmacro{\tkz@delta}{min(deg(\tkz@length cm/ \tkz@tempLen pt),180)/2}
-\fi
- \tkzFindSlopeAngle(#2,#3)\tkzGetAngle{tkz@angle}%
- \draw[shift ={(#2)},/compass/.cd,compass style,#1]%
- (\tkz@angle-\tkz@delta:\tkz@tempLen pt)%
- arc (\tkz@angle-\tkz@delta:\tkz@angle+\tkz@delta:\tkz@tempLen pt);
- %};
-\endgroup}
-%<--------------------------------------------------------------------------–>
-\def\tkz@multiCompass#1 #2\@nil{%
- \protected@edef\tkz@temp{
- \noexpand \tkzCompass[\tkz@optcompass](#1)}\tkz@temp%
- \def\tkz@nextArg{#2}%
- \ifx\tkzutil@empty\tkz@nextArg
- \let\next\@gobble
- \fi
- \next#2\@nil
-}
-\def\tkzCompasss{\pgfutil@ifnextchar[{\tkz@Compasss}{\tkz@Compasss[]}}
-
-\def\tkz@Compasss[#1](#2){%
-\global\edef\tkz@optcompass{#1}
-\begingroup
- \let\next\tkz@multiCompass
- \next#2 \@nil %
-\endgroup
-}%
-
-%<--------------------------------------------------------------------------–>
-% fin de \tkzCompass
-%<--------------------------------------------------------------------------–>\endinput
- \ No newline at end of file