summaryrefslogtreecommitdiff
path: root/texmf-dist/tex/latex/lucold/lucold.sty
diff options
context:
space:
mode:
Diffstat (limited to 'texmf-dist/tex/latex/lucold/lucold.sty')
-rw-r--r--texmf-dist/tex/latex/lucold/lucold.sty62
1 files changed, 62 insertions, 0 deletions
diff --git a/texmf-dist/tex/latex/lucold/lucold.sty b/texmf-dist/tex/latex/lucold/lucold.sty
new file mode 100644
index 00000000..1426b8cb
--- /dev/null
+++ b/texmf-dist/tex/latex/lucold/lucold.sty
@@ -0,0 +1,62 @@
+\NeedsTeXFormat{LaTeX2e}
+\ProvidesPackage{lucold}[1999/05/25 Old-Style Digits for Lucida fonts]
+
+% Author: Maurizio Loreti, aka MLO or (HAM) I3NOO
+% Work: University of Padova - Department of Physics
+% Via F. Marzolo, 8 - 35131 PADOVA - Italy
+% Phone: +39 (049) 827-7216 FAX: +39 (049) 827-7102
+% EMail: loreti@padova.infn.it
+% WWW: http://wwwcdf.pd.infn.it/~loreti/mlo.html
+%
+% $Id: lucold.sty,v 1.1 1999/05/25 12:16:26 loreti Exp $
+%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%
+% Options for \usepackage{lucold} :
+%
+% text (notext) : switch (do not switch) all text numerals to
+% old-style digits;
+% math (nomath) : switch (do not switch) all math numerals
+% to old-style digits.
+%
+% The default: \usepackage{lucold} is equivalent to
+% \usepackage[text,nomath]{lucold} .
+%
+% Since I think that it has no sense to require old-style
+% digits in math and not in text, with [notext,math] a
+% warning is printed and the setup is changed to [text,math].
+
+\newif\ifluc@ldtext
+\newif\ifluc@ldmath
+
+\DeclareOption{text}{\luc@ldtexttrue}
+\DeclareOption{notext}{\luc@ldtextfalse}
+\DeclareOption{math}{\luc@ldmathtrue}
+\DeclareOption{nomath}{\luc@ldmathfalse}
+
+\ExecuteOptions{text,nomath}
+\ProcessOptions
+
+\ifluc@ldmath
+\ifluc@ldtext\relax\else%
+ \luc@ldtexttrue\PackageWarningNoLine{lucold}{Old style
+ digits in math and not in text? Ugh!\MessageBreak
+ Also the `text' option has been set}\fi
+
+\DeclareMathSymbol{0}{\mathalpha}{letters}{'060}
+\DeclareMathSymbol{1}{\mathalpha}{letters}{'061}
+\DeclareMathSymbol{2}{\mathalpha}{letters}{'062}
+\DeclareMathSymbol{3}{\mathalpha}{letters}{'063}
+\DeclareMathSymbol{4}{\mathalpha}{letters}{'064}
+\DeclareMathSymbol{5}{\mathalpha}{letters}{'065}
+\DeclareMathSymbol{6}{\mathalpha}{letters}{'066}
+\DeclareMathSymbol{7}{\mathalpha}{letters}{'067}
+\DeclareMathSymbol{8}{\mathalpha}{letters}{'070}
+\DeclareMathSymbol{9}{\mathalpha}{letters}{'071}
+\fi
+
+\ifluc@ldtext
+\renewcommand{\rmdefault}{hlos}
+\fi
+
+\endinput