summaryrefslogtreecommitdiff
path: root/macros/latex/contrib/jknappen/semtrans.sty
diff options
context:
space:
mode:
authorNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
committerNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
commite0c6872cf40896c7be36b11dcc744620f10adf1d (patch)
tree60335e10d2f4354b0674ec22d7b53f0f8abee672 /macros/latex/contrib/jknappen/semtrans.sty
Initial commit
Diffstat (limited to 'macros/latex/contrib/jknappen/semtrans.sty')
-rw-r--r--macros/latex/contrib/jknappen/semtrans.sty46
1 files changed, 46 insertions, 0 deletions
diff --git a/macros/latex/contrib/jknappen/semtrans.sty b/macros/latex/contrib/jknappen/semtrans.sty
new file mode 100644
index 0000000000..31968cc345
--- /dev/null
+++ b/macros/latex/contrib/jknappen/semtrans.sty
@@ -0,0 +1,46 @@
+% semtrans.sty
+% Transliteration of semitc languages (arabic, hebrew, ethiopian languages)
+
+% (\textcopyleft) Copyleft 1997 J"org Knappen
+% Licence: GNU licence version 2
+
+% The following commands are defined:
+% \Alif, \Ayn left and right half ring
+% \U breve below (e. g. \U h)
+% \D diaeresis below (e. g. \D d: Oromo retroflex d)
+% \T turn a letter (e. g. \T e: schwa)
+% For the turning of letters, the package fraphicx is required.
+
+\ProvidesPackage{semtrans}%
+ [1998/02/10 v 1.0 specials for transliterated semitic languages (jk)]
+\RequirePackage{graphicx}
+
+% Alif, Ayn and \U are from the exotex package by Peter S. Olivier
+% 1988/08/08
+
+% Definitions translated into LaTeX2e by JK
+
+% \mathchardef\lhook="012C \mathchardef\rhook="012D
+% \def\ain{\kern+1pt$\lhook$} \def\alef{\kern+1pt$\rhook$}
+
+\DeclareMathSymbol{\lhook}{\mathord}{letters}{"02C}
+\DeclareMathSymbol{\rhook}{\mathord}{letters}{"02D}
+
+\newcommand*\Alif{\kern.1ex$\rhook$}
+\newcommand*\Ayn{\kern.1ex$\lhook$}
+
+% \U: breve below character
+
+\newcommand*\U[1]{\oalign{#1\crcr\hidewidth
+ \vbox to .2ex{\hbox{\u{}}\vss}\hidewidth}}
+
+% \D: diaeresis below character (modelled after \U)
+
+\newcommand*\D[1]{\oalign{#1\crcr\hidewidth
+ \vbox to .2ex{\hbox{\"{}}\vss}\hidewidth}}
+
+% \T: turn (=rotate 180 degrees) character
+
+\newcommand*\T[1]{\rotatebox[origin=cc]{180}{#1}}
+
+\endinput