1%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2% hebtex.sty
3% ArabTeX
4% Modifications for Hebrew mode
5% 12.06.2000
6%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
7% (c) Klaus Lagally
8%     Institut fuer Informatik
9%     Universitaet Stuttgart
10%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
11
12\ifx \sethebrew \undefined \else \xpa \endinput \fi
13
14\ifx \ArabTeX \undefined
15\ifx \NeedsTeXFormat \undefined \input arabtex.sty
16\else \usepackage {arabtex}\fi \fi
17
18\let \h@wlog \wlog	\def \wlog #1{\relax }
19
20\a@ident {hebtex.sty} {3.10 modifications for Hebrew mode} {12.06.2000}
21
22\newif \ifhedc@de
23
24\ifx \LaTeX \undefined \else
25	\let \h@document \document
26	\def \document {\h@document \sethebrew \hedc@detrue }
27\fi
28
29%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
30
31\let \hebtext \arabtext	   \let \endhebtext \endarabtext
32\let \hebtex  \arabtext	   \let \endhebtex  \endarabtext % catch typo
33\let \hebfalse \arabfalse  \let \hebtrue \arabtrue
34
35\pdef \sethebrew {% switch to hebrew writing
36\all@false \@ssimtrue \yahd@tstrue \heb@output
37\def \a@defaultfont {\hc }\setarabfont \a@normalfont \hc }
38
39\let \setheb \sethebrew
40
41\def \set@hebfont {\setarabfont \heb@font }
42
43\def \heb@font {\protect \pheb }
44\def \a@defaultfont {\protect \pheb }
45
46\def \sethebfont #1{\def \pheb {\hebfont }\font \hebfont =#1\relax}
47
48\all@wcmd \sethebrew \all@wcmd \setheb \all@wcmd \sethebfont \all@wif \heb
49
50%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
51
52\def \heb@output {\ifx \a@lang \a@hebr \else
53\tr@ceoff % switch to Hebrew output conventions
54\def@hebchars % define character macros for Hebrew
55\def@hebvoc % define vowel parsing routines for Hebrew
56\def@hebstrut % define strut for Hebrew
57\global\let \a@write \heb@write \global\let \a@write@hook \relax
58\tr@heb	\tr@ceon \global\let \a@lang \a@hebr \fi }
59
60\def \a@hebr {HEBREW}
61\let \tr@heb \relax % if hetrans.sty is not loaded
62
63\def \def@hebstrut {\def \arab@strut
64%{\vrule height2.8ex depth0.7ex width0pt \relax }}
65{\vrule height1.9ex depth0.7ex width0pt \relax }}
66
67%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
68
69\UsePackage {hecmd}
70\UsePackage {hescan}
71\UsePackage {heparse}
72\UsePackage {hewrite}
73\UsePackage {hetrans}
74\ifx \LaTeX \undefined \else \UsePackage {hefonts}
75\fi
76
77%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
78\UsePackage {hepatch}	% must be at the end !!
79
80%\hc
81
82\let \wlog \h@wlog
83
84%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
85\endinput
86%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% EOF %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
87
88