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