summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/latex/harpoon
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2006-01-12 23:56:40 +0000
committerKarl Berry <karl@freefriends.org>2006-01-12 23:56:40 +0000
commit754163d7156c4021b4108e3dbe0807c5357e6e22 (patch)
tree9112b4f7ea05354e6b1b6cf1dd5eb65b0cb71050 /Master/texmf-dist/tex/latex/harpoon
parentf5923d916808a1ecd3f9a46aeeea9539a7a804b3 (diff)
harpoon
git-svn-id: svn://tug.org/texlive/trunk@969 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/latex/harpoon')
-rw-r--r--Master/texmf-dist/tex/latex/harpoon/harpoon.sty42
1 files changed, 42 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/latex/harpoon/harpoon.sty b/Master/texmf-dist/tex/latex/harpoon/harpoon.sty
new file mode 100644
index 00000000000..2f87d140367
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/harpoon/harpoon.sty
@@ -0,0 +1,42 @@
+% harpoon.sty
+% by Tobias Kuipers {kuipers@fwi.uva.nl}
+% v1.0 of 1994/11/02
+% See harpoon.tex for documentation
+% If you modify this file, please redistribute it under another name
+% and send me a copy
+%
+% Permission is hereby granted to do anything with this file. No fitness
+% for any purpose is guaranteed or implied. We deny everything
+%
+\NeedsTeXFormat{LaTeX2e}
+\ProvidesPackage{harpoon}[1994/11/02 Harpoon drawing package by Tobias Kuipers]
+
+\DeclareOption*{%
+ \PassOptionsToPackage{\CurrentOption}{graphics}
+}
+\ProcessOptions
+\RequirePackage{graphics}[1994/05/30]
+
+
+
+\newcommand{\overleftharp}[1]{\overharp{\leftharpoonup}{#1}{.7}}
+\newcommand{\overrightharp}[1]{\overharp{\rightharpoonup}{#1}{.7}}
+\newcommand{\overleftharpdown}[1]{\overharp{\leftharpoondown}{#1}{.9}}
+\newcommand{\overrightharpdown}[1]{\overharp{\rightharpoondown}{#1}{.9}}
+\newcommand{\underleftharp}[1]{\overharp{\leftharpoonup}{#1}{-1}}
+\newcommand{\underrightharp}[1]{\overharp{\rightharpoonup}{#1}{-1}}
+\newcommand{\underleftharpdown}[1]{\overharp{\leftharpoondown}{#1}{-.8}}
+\newcommand{\underrightharpdown}[1]{\overharp{\rightharpoondown}{#1}{-.8}}
+
+\newlength{\argwd} \newlength{\arght}%-Two variables
+\newcommand{\overharp}[3]{% -The command name
+ \settowidth{\argwd}{#2}\settoheight{\arght}{#2}%
+ % -Set the variables
+ \raisebox{#3\arght}{% -Put the harp 6/10 of a line higher
+ \makebox[0pt][l]{% -Put everything in a box
+ \resizebox{\argwd}{.8\arght}{$#1$}%
+ % -Set harp to right length
+ }%
+ }%
+#2}% -Print the argument
+