summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/latex/superiors
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2013-10-18 23:20:41 +0000
committerKarl Berry <karl@freefriends.org>2013-10-18 23:20:41 +0000
commit5221ec791539c333a1c02e27b695802891fe0da8 (patch)
treec3b6ebed32a732f930d4d7d919a05b4b470c4585 /Master/texmf-dist/tex/latex/superiors
parentb4775ec0da5d48800a6abad06e41a68fbe420292 (diff)
superiors (18oct13)
git-svn-id: svn://tug.org/texlive/trunk@31943 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/latex/superiors')
-rw-r--r--Master/texmf-dist/tex/latex/superiors/superiors.sty52
1 files changed, 52 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/latex/superiors/superiors.sty b/Master/texmf-dist/tex/latex/superiors/superiors.sty
new file mode 100644
index 00000000000..f37f3fbe1cc
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/superiors/superiors.sty
@@ -0,0 +1,52 @@
+\NeedsTeXFormat{LaTeX2e}
+\def\superiorsVersion{1.03}
+\def\superiorsDate{2013/10/17}
+\ProvidesPackage{superiors}[\superiorsDate\space-\space\superiorsVersion
+ superiors (License LPPL) Michael Sharpe]
+\RequirePackage{xkeyval}
+
+\def\supstfm{ntxsups}
+\newdimen\superiors@scale
+\def\superiors@raised{\z@}
+\def\superiors@spaced{\z@}
+\def\superiors@scaledval{1.0}
+\def\superiors@supscale{1.0}
+\define@key{superiors}{scaled}[1.0]{\def\superiors@scaledval{#1}}
+\define@key{superiors}{supscaled}[1.0]{\def\superiors@supscale{#1}}
+\define@key{superiors}{raised}[\z@]{\def\superiors@raised{#1}}
+\define@key{superiors}{supstfm}[ntxsups]{\def\supstfm{#1}}
+\define@key{superiors}{supspaced}[\z@]{\def\superiors@spaced{#1}}
+\DeclareOption*{%
+ \begingroup
+ \edef\x{\endgroup
+ \noexpand\setkeys{superiors}{\CurrentOption}}%
+ \x}
+
+\ProcessOptions*
+
+\setlength{\superiors@scale}{\superiors@scaledval\p@}
+\superiors@scale=\superiors@supscale\superiors@scale %
+\def\superiors@scaled{s*[\strip@pt\superiors@scale]}
+\let\superiors@makefnmark\@makefnmark
+
+\DeclareFontFamily{U}{zsups}{}%
+ \DeclareFontShape{U}{zsups}{m}{n}{%
+ <-> \superiors@scaled \supstfm
+}{}
+\DeclareRobustCommand{\sustyle}{%
+ \not@math@alphabet\sustyle\relax
+ \usefont{U}{zsups}{m}{n}}
+
+\def\textsu#1{\raisebox{\superiors@raised}{\hbox{{\sustyle#1}}}}
+
+%\def\@makefnmark{\hbox{\textsu{\hspace*{\superiors@spaced}\@thefnmark}}}
+\def\f@@tn@te{footnote}
+\def\@makefnmark{%
+ \ifx\@mpfn\f@@tn@te% we're not in a minipage
+ \hbox{\sustyle\hspace*{.04em}\@thefnmark}
+ \else% minipage---use original def
+ \superiors@makefnmark
+ \fi%
+}
+
+\endinput \ No newline at end of file