% This is minimal level Hebrew support Version 1.0
% Jacques J. Goldberg, Technion, 1.14.88
 
%\tracingmacros=1
%\tracingonline=1
%\tolerance=10000
\font\ivrit=hebrew10
\hyphenchar\ivrit=-1
 
% The two lines below are taken from D.Knuth and P.MacKay
%     TuGBoat vol.8,#1,page 14.
\def\hebrew#1{{\ivrit \reflect#1\empty\tcelfer }}
\def\reflect#1#2\tcelfer{\ifx#1\empty\else\reflect#2\tcelfer#1\fi}
 
\let\ivrswch=|        % This is the Hebrew-Latin toggle
\def\ivrbar{\vrule height7pt width0.5pt}  % This makes the vertical bar printable.
 
\newbox\ivrbox  % The Hebrew box to test full line condition
\newbox\ivrstrbox  % The box to hold the current Hebrew string
\setbox\ivrbox=\hbox{}
\setbox\ivrstrbox=\hbox{}
 
\newif\ifivrmd         % Mode flag defaults to false
\def\ivrswitch{
       \ifivrmd \message{Latin }  % Toggle Hebrew on / Hebrew off
           \hbox to\hsize{\hfil \unhbox\ivrstrbox \unskip} \par   \ivrmdfalse
       \else \message{Hebrew } \unskip \par \setbox\ivrstrbox
