diff options
Diffstat (limited to 'Master/texmf-dist/tex')
-rw-r--r-- | Master/texmf-dist/tex/latex/fancynum/fancynum.sty | 87 |
1 files changed, 87 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/latex/fancynum/fancynum.sty b/Master/texmf-dist/tex/latex/fancynum/fancynum.sty new file mode 100644 index 00000000000..7d2e8494809 --- /dev/null +++ b/Master/texmf-dist/tex/latex/fancynum/fancynum.sty @@ -0,0 +1,87 @@ +%% +%% This is file `fancynum.sty', +%% generated with the docstrip utility. +%% +%% The original source files were: +%% +%% fancynum.dtx (with options: `package') +%% +%% fancynum.dtx Copyright (C) J.J.Green 1999, 2000. +%% $Id: fancynum.dtx,v 1.8 2000/08/08 22:28:38 jjg Exp $ +%% +%% This file is part of the fancynum package. +%% +%% It may be distributed under the terms of the LaTeX Project Public +%% License, as described in lppl.txt in the base LaTeX distribution. +%% Either version 1.0 or, at your option, any later version. +%% +\NeedsTeXFormat{LaTeX2e}[1995/12/01] +\ProvidesPackage{fancynum} + [2000/08/08 0.92 Fancynum package] +\def\setfnumdsym#1{\gdef\fn@decimalsym{#1}} +\def\setfnumgsym#1{\gdef\fn@groupsym{#1}} +\def\setfnummsym#1{\gdef\fn@multsym{#1}} +\DeclareOption{english}{\setfnumdsym{{\cdot}}\setfnumgsym{{,}}} +\DeclareOption{french}{\setfnumdsym{{,}}\setfnumgsym{{.}}} +\DeclareOption{tight}{\setfnummsym{{\times}}} +\DeclareOption{loose}{\setfnummsym{\times}} +\DeclareOption{commas}{\setfnumgsym{{,}}} +\DeclareOption{thinspaces}{\setfnumgsym{\,}} +\DeclareOption{plain}{\setfnumgsym{\relax}} +\ExecuteOptions{english,loose} +\ProcessOptions\relax +\newcount\fn@strlen +\def\fn@length#1{\fn@strlen=0 \fn@getlength#1\end} +\def\fn@getlength#1{\ifx #1\end \let\next=\relax \else + \advance\fn@strlen by1 + \ifnum\fn@strlen=3 \fn@strlen=0 \fi + \let\next=\fn@getlength\fi \next} +\def\fn@fracpunct#1{\fn@fpa#1@ } +\def\fn@fpa#1#2#3 {#1\if #2@ \else \fn@fpb#2#3 \fi} +\def\fn@fpb#1#2#3 {#1\if #2@ \else \fn@fpc#2#3 \fi} +\def\fn@fpc#1#2#3 {#1\if #2@ \else \fn@groupsym\fn@fpa#2#3 \fi} +\def\fn@intpunct#1{\fn@ipa#1 } +\def\fn@ipa#1#2 {% + \if +#1 +\fn@ipb#2 \else + \if -#1 -\fn@ipb#2 \else + \fn@ipb#1#2 \fi \fi} +\def\fn@ipb#1 {\fn@length{#1} + \ifcase\fn@strlen + \fn@ipc#1 \or + \fn@ipd#1 \or + \fn@ipe#1 \fi} +\def\fn@ipc#1#2#3#4 {#1#2#3\fn@ipf#4@ } +\def\fn@ipd#1#2 {#1\fn@ipf#2@ } +\def\fn@ipe#1#2#3 {#1#2\fn@ipf#3@ } +\def\fn@ipf#1#2 {\if #1@ \else \fn@groupsym\fn@fpa#1#2 \fi} +\def\fn@propdecimal#1#2{\fn@intpunct{#1}\fn@decimalsym\fn@fracpunct{#2}} +\def\fn@impropdecimal#1#2{\fn@intpunct{#1}} +\def\fn@decimalsplit#1.#2.#3#4#5{#4{#1}{#2}} +\def\fn@decimal#1{\fn@decimalsplit#1..\fn@propdecimal\fn@impropdecimal\empty} +\def\fn@signedint#1#2 {% + \if +#1 + \fn@unsignedint#2\relax + \else + \if -#1 + -\fn@unsignedint#2\relax + \else + \fn@unsignedint#1#2\relax + \fi + \fi} +\def\fn@unsignedint#1#2{% + \ifx #2\relax \let\next=#1 + \else + \ifx 0#1 \let\next=\fn@unsignedint + \else + \let\next=#1 + \fi + \fi + \next #2} +\def\fn@exp#1#2{\fn@decimal{#1}\fn@multsym10^{\fn@signedint#2 }} +\def\fn@noexp#1#2{\fn@decimal{#1}} +\def\fn@realsplit#1e#2e#3#4#5{#4{#1}{#2}} +\def\fnum#1{\fn@realsplit#1ee\fn@exp\fn@noexp\empty} + +\endinput +%% +%% End of file `fancynum.sty'. |