arcs

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

1 files changed, 94 insertions, 0 deletions

diff --git a/Master/texmf-dist/tex/latex/arcs/arcs.sty b/Master/texmf-dist/tex/latex/arcs/arcs.sty
new file mode 100644
index 00000000000..3b4a7a454fa
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/arcs/arcs.sty
@@ -0,0 +1,94 @@
+%%
+%% This is file `arcs.sty',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% arcs.dtx  (with options: `package')
+%% 
+%% This is a generated file.
+%% 
+%% Copyright 2004 Gianfranco Boggio-Togna
+%% 
+%% This file may be distributed and/or modified under the
+%% conditions of the LaTeX Project Public License, either
+%% version 1.2 of this license or (at your option) any
+%% later version. The latest version of this license is in
+%%    http://www.latex-project.org/lppl.txt
+%% and version 1.2 or later is part of all distributions
+%% of LaTeX version 1999/12/01 or later.
+%% 
+\NeedsTeXFormat {LaTeX2e}[2003/12/01]
+\ProvidesPackage {arcs}[2004/05/09]
+\RequirePackage {relsize}
+\newcommand{\overarc}[2][1]{\over@under@arc{#1}{#2}\z@}
+\newcommand{\underarc}[2][1]{\over@under@arc{#1}{#2}\@ne}
+\newcommand{\over@under@arc}[3]{%
+  \leavevmode
+  \hbox {%
+    \setbox\z@ = \hbox {#2}%
+    \ifdim \ht\z@ = \z@ %      arc over/under space
+      \ifdim \dp\z@ = \z@
+        \ht\z@ = 1ex\relax
+      \fi
+    \fi
+    \dimen@ = #1\wd\z@
+    \begingroup
+    \let \rs@size@warning = \@gobbletwo
+    \relsize{-10}%
+    \wd\@ne = \z@
+    \@whiledim \wd\@ne < .95\dimen@ \do {%
+      \ifx \@currsize \Huge
+        \dimen@ = \z@
+      \else
+        $%
+        \skip@ = \f@baselineskip
+        \fontencoding{OML}\fontfamily{cmm}\fontseries{m}%
+        \fontshape{it}\fontsize{\ssf@size}{\skip@}\selectfont
+        \global \setbox\@ne = \hbox {%
+           \hss\symbol{"5\ifnum #3=\z@ F\else E\fi}\hss}%
+        \ifdim \wd\@ne < \dimen@
+          \fontsize{\sf@size}{\skip@}\selectfont
+          \global \setbox\@ne = \hbox {%
+             \hss\symbol{"5\ifnum #3=\z@ F\else E\fi}\hss}%
+          \ifdim \wd\@ne < \dimen@
+            \fontsize{\tf@size}{\skip@}\selectfont
+            \global \setbox\@ne = \hbox {%
+              \hss\symbol{"5\ifnum #3=\z@ F\else E\fi}\hss}%
+          \fi
+        \fi
+        $%
+      \fi
+      \ifdim \wd\@ne < \dimen@
+        \relsize{+1}%
+      \fi
+      \global \dimen@i = \fontdimen5\the\font
+    }%
+    \endgroup
+    \ifnum #3 = \z@
+      \dimen@ii = 1.067\ht\z@
+      \global \divide \dimen@i by \tw@
+      \global \advance \dimen@i by -\ht\@ne
+      \advance \dimen@ii by .6\dimen@i
+    \else
+      \dimen@ii = -1.05\ht\@ne
+      \advance \dimen@ii by -.75pt
+      \ifdim \dp\z@ > \z@
+        \advance \dimen@ii by -\dp\z@
+      \fi
+    \fi
+    \copy\z@
+    \dimen@ = \wd\z@
+    \advance \dimen@ by \wd\@ne
+    \kern -.5\dimen@
+    \raisebox {\dimen@ii}[\z@][\z@]{\copy\@ne}%
+    \dimen@ = \wd\z@
+    \advance \dimen@ by -\wd\@ne
+    \dimen@ = .5\dimen@
+    \kern \dimen@
+  }%
+}
+%% \Finale
+\endinput
+%%
+%% End of file `arcs.sty'.