undertilde

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

1 files changed, 34 insertions, 0 deletions

diff --git a/Master/texmf-dist/tex/latex/undertilde/undertilde.sty b/Master/texmf-dist/tex/latex/undertilde/undertilde.sty
new file mode 100644
index 00000000000..adec6ad57b7
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/undertilde/undertilde.sty
@@ -0,0 +1,34 @@
+%%
+%% This is file `undertilde.sty',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% undertilde.dtx  (with options: `package')
+%% 
+%% IMPORTANT NOTICE:
+%% 
+%% For the copyright see the source file.
+%% 
+%% Any modified versions of this file must be renamed
+%% with new filenames distinct from undertilde.sty.
+%% 
+%% For distribution of the original source see the terms
+%% for copying and modification in the file undertilde.dtx.
+%% 
+%% This generated file may be distributed as long as the
+%% original source files, as listed above, are part of the
+%% same distribution. (The sources need not necessarily be
+%% in the same archive or directory.)
+\ProvidesPackage{undertilde}[2000/08/08 v1.0 Tilde under a math object]
+\newlength\knuthian@fdfive
+\def\mathpal@save#1{\let\was@math@style=#1\relax}
+\def\utilde#1{\mathpalette\mathpal@save
+              {\setbox124=\hbox{$\was@math@style#1$}%
+\setbox125=\hbox{$\fam=3\global\knuthian@fdfive=\fontdimen5\font$}
+\setbox125=\hbox{$\widetilde{\vrule height 0pt depth 0pt width \wd124}$}%
+               \baselineskip=1pt\relax
+               \vtop{\copy124\copy125\vskip -\knuthian@fdfive}}}
+\endinput
+%%
+%% End of file `undertilde.sty'.