summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/latex/tkz-base/tkz-tools-print.tex
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/tex/latex/tkz-base/tkz-tools-print.tex')
-rw-r--r--Master/texmf-dist/tex/latex/tkz-base/tkz-tools-print.tex79
1 files changed, 79 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/latex/tkz-base/tkz-tools-print.tex b/Master/texmf-dist/tex/latex/tkz-base/tkz-tools-print.tex
new file mode 100644
index 00000000000..72aa8e8f7c2
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/tkz-base/tkz-tools-print.tex
@@ -0,0 +1,79 @@
+% tkz-tool-print.tex
+% 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{3.01c}
+\def\filedate{2020/01/23}
+\typeout{2020/01/23 3.01c tkz-tools-print.tex}
+\makeatletter
+%<------------- tkzPrintFrac ---------------------------------->
+\def\tkzPrintFrac#1#2{%
+\begingroup
+\tkzReducFrac{#1}{#2}
+\xdef\tkzprintfrac{$ \frac{\tkzMathFirstResult}{\tkzMathSecondResult}$}%
+ \ifnum\tkzMathFirstResult=0%
+ \xdef\tkzprintfrac{$0$}%
+ \else
+ \ifnum\tkzMathSecondResult=1 %
+ \ifnum\tkzMathFirstResult=1 %
+ \xdef\tkzprintfrac{$1$}%
+ \else
+ \ifnum\tkzMathFirstResult=-1%
+ \xdef\tkzprintfrac{$-1$}%
+ \else
+ \xdef\tkzprintfrac{$\tkzMathFirstResult$}%
+ \fi\fi
+ \else
+ \ifnum\tkzMathFirstResult=1 %
+ \xdef\tkzprintfrac{$\tkzmathstyle\frac{1}{\tkzMathSecondResult}$}%
+ \else
+ \ifnum\tkzMathFirstResult=-1 %
+ \xdef\tkzprintfrac{$\tkzmathstyle\frac{-1}{\tkzMathSecondResult}$}%
+ \else
+ \xdef\tkzprintfrac{$\tkzmathstyle\frac{\tkzMathFirstResult}{%
+ \tkzMathSecondResult}$}%
+ \fi\fi\fi\fi
+\endgroup}
+%<------------- tkzPrintFracWithPi ---------------------------------->
+\def\tkzPrintFracWithPi#1#2{%
+\begingroup
+\tkzReducFrac{#1}{#2}
+\xdef\tkzprintfrac{%
+ $\tkzmathstyle\frac{\tkzMathFirstResult\pi}{\tkzMathSecondResult}$}%
+\ifnum\tkzMathFirstResult=0%
+ \xdef\tkzprintfrac{$0$}%
+\else
+ \ifnum\tkzMathSecondResult=1 %
+ \ifnum\tkzMathFirstResult=1 %
+ \xdef\tkzprintfrac{$\pi$}%
+ \else
+ \ifnum\tkzMathFirstResult=-1%
+ \xdef\tkzprintfrac{$-\pi$}%
+ \else
+ \xdef\tkzprintfrac{$\tkzMathFirstResult\pi$}%
+ \fi
+ \fi
+ \else
+ \ifnum\tkzMathFirstResult=1 %
+ \xdef\tkzprintfrac{%
+ $\tkzmathstyle\frac{\pi}{\tkzMathSecondResult}$
+ }%
+ \else
+ \ifnum\tkzMathFirstResult=-1 %
+ \xdef\tkzprintfrac{$\tkzmathstyle\frac{-\pi}{%
+ \tkzMathSecondResult}$}%
+ \else
+ \xdef\tkzprintfrac{$\tkzmathstyle\frac{%
+ \tkzMathFirstResult\pi}{%
+ \tkzMathSecondResult}$
+ }%
+ \fi
+ \fi
+ \fi
+\fi
+\endgroup
+}%
+
+\makeatother
+\endinput