lucold

git-svn-id: svn://tug.org/texlive/trunk@1058 c570f23f-e606-0410-a88d-b1316a301751

3 files changed, 162 insertions, 0 deletions

diff --git a/Master/texmf-dist/tex/latex/lucold/lucold.sty b/Master/texmf-dist/tex/latex/lucold/lucold.sty
new file mode 100644
index 00000000000..1426b8cbe4a
--- /dev/null
+++ b/Master/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
diff --git a/Master/texmf-dist/tex/latex/lucold/ot1hlos.fd b/Master/texmf-dist/tex/latex/lucold/ot1hlos.fd
new file mode 100644
index 00000000000..b6ecb79b7a3
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/lucold/ot1hlos.fd
@@ -0,0 +1,51 @@
+%Filename: ot1hlos.fd
+
+%THIS FILE SHOULD BE PUT IN A TEX INPUTS DIRECTORY
+
+\ProvidesFile{ot1hlos.fd}[Lucida Bright with Old Style numerals]
+
+\@ifundefined{DeclareLucidaFontShape}{%
+\def\DeclareLucidaFontShape#1#2#3#4#5#6{%
+\DeclareFontShape{#1}{#2}{#3}{#4}{<->#5}{#6}}}{}
+\DeclareFontFamily{OT1}{hlos}{}
+
+\DeclareLucidaFontShape{OT1}{hlos}{m}{n}{
+hlor7t
+}{}
+
+\DeclareLucidaFontShape{OT1}{hlos}{m}{sc}{
+hlhrc7t
+}{}
+
+\DeclareLucidaFontShape{OT1}{hlos}{m}{sl}{
+hlhro7t
+}{}
+
+\DeclareLucidaFontShape{OT1}{hlos}{m}{it}{
+hlhri7t
+}{}
+
+\DeclareLucidaFontShape{OT1}{hlos}{b}{n}{
+hlob7t
+}{}
+
+\DeclareLucidaFontShape{OT1}{hlos}{b}{sc}{
+hlhbc7t
+}{}
+
+\DeclareLucidaFontShape{OT1}{hlos}{b}{sl}{
+hlhbo7t
+}{}
+
+\DeclareLucidaFontShape{OT1}{hlos}{b}{it}{
+hlhbi7t
+}{}
+
+\DeclareFontShape{OT1}{hlos}{bx}{n}{<->ssub * hlos/b/n}{}
+\DeclareFontShape{OT1}{hlos}{bx}{sc}{<->ssub * hlh/b/sc}{}
+\DeclareFontShape{OT1}{hlos}{bx}{sl}{<->ssub * hlh/b/sl}{}
+\DeclareFontShape{OT1}{hlos}{bx}{it}{<->ssub * hlh/b/it}{}
+
+\DeclareFontShape{OT1}{hlos}{m}{ui}{<->ssub * hlh/m/it}{}
+\DeclareFontShape{OT1}{hlos}{b}{ui}{<->ssub * hlh/b/it}{}
+\endinput
diff --git a/Master/texmf-dist/tex/latex/lucold/t1hlos.fd b/Master/texmf-dist/tex/latex/lucold/t1hlos.fd
new file mode 100644
index 00000000000..621748875ba
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/lucold/t1hlos.fd
@@ -0,0 +1,49 @@
+%Filename: t1hlos.fd
+
+%THIS FILE SHOULD BE PUT IN A TEX INPUTS DIRECTORY
+
+\ProvidesFile{t1hlos.fd}[Lucida Bright with Old Style numerals]
+
+\@ifundefined{DeclareLucidaFontShape}{%
+\def\DeclareLucidaFontShape#1#2#3#4#5#6{%
+\DeclareFontShape{#1}{#2}{#3}{#4}{<->#5}{#6}}}{}
+\DeclareFontFamily{T1}{hlos}{}
+
+\DeclareLucidaFontShape{T1}{hlos}{m}{n}{
+hlor8t
+}{}
+
+\DeclareLucidaFontShape{T1}{hlos}{m}{sc}{
+hlhrc8t
+}{}
+
+\DeclareLucidaFontShape{T1}{hlos}{m}{sl}{
+hlhro8t
+}{}
+
+\DeclareLucidaFontShape{T1}{hlos}{m}{it}{
+hlhri8t
+}{}
+
+\DeclareLucidaFontShape{T1}{hlos}{b}{n}{
+hlob8t
+}{}
+
+\DeclareLucidaFontShape{T1}{hlos}{b}{sc}{
+hlhbc8t
+}{}
+
+\DeclareLucidaFontShape{T1}{hlos}{b}{sl}{
+hlhbo8t
+}{}
+
+\DeclareLucidaFontShape{T1}{hlos}{b}{it}{
+hlhbi8t
+}{}
+
+\DeclareFontShape{T1}{hlos}{bx}{n}{<->ssub * hlos/b/n}{}
+\DeclareFontShape{T1}{hlos}{bx}{sc}{<->ssub * hlh/b/sc}{}
+\DeclareFontShape{T1}{hlos}{bx}{sl}{<->ssub * hlh/b/sl}{}
+\DeclareFontShape{T1}{hlos}{bx}{it}{<->ssub * hlh/b/it}{}
+
+\endinput