From helmut@eichow.tuwien.ac.at Thu Aug 12 11:31 MES 1993
Received: from eichow.tuwien.ac.at by eiunix.tuwien.ac.at with SMTP
	(16.8/16.2) id AA29128; Thu, 12 Aug 93 11:31:42 +0200
Return-Path: <helmut@eichow.tuwien.ac.at>
Received: by eichow.tuwien.ac.at (MX V3.3 VAX) id 9761; Thu, 12 Aug 1993
          11:29:25 EDT
Date: Thu, 12 Aug 1993 11:29:23 EDT
From: "Steiner Helmut, Tel. 58801/4073" <helmut@eichow.tuwien.ac.at>
To: heinz@eichow.tuwien.ac.at
Cc: helmut@eichow.tuwien.ac.at
Message-Id: <00970E8C.653CC200.9761@eichow.tuwien.ac.at>
Subject: File: german_sty.cha
Status: RO

@x
\gdef\umlauthigh{\def\"##1{{\accent127 ##1}}}
\gdef\umlautlow{\def\"{\protect\newumlaut}}
\gdef\newumlaut#1{\leavevmode\allowhyphens
     \vbox{\baselineskip\z@skip \lineskip.25ex
@y
% \gdef\umlauthigh{\def\"##1{{\accent127 ##1}}}
\gdef\umlauthigh{\def\"##1{{\dirtyumlaut##1}}}

%\gdef\umlautlow{\def\"{\protect\newumlaut}}

\gdef\umlautlow{\def\"{\protect\dirtyumlautlow}}

\gdef\dirtyumlautlow#1{\if#1A{\discretionary
{\kern 4321sp m\kern 
196sp\kern-4517sp\kern-1em}{}{\protect\newumlaut#1}}\else
\if#1O{\discretionary
{\kern 4321sp m\kern 
214sp\kern-4535sp\kern-1em}{}{\protect\newumlaut#1}}\else
\if#1U{\discretionary
{\kern 4321sp m\kern 
220sp\kern-4541sp\kern-1em}{}{\protect\newumlaut#1}}\else
\if#1a{\discretionary
{\kern 4321sp m\kern 
228sp\kern-4549sp\kern-1em}{}{\protect\newumlaut#1}}\else
\if#1o{\discretionary
{\kern 4321sp m\kern 
246sp\kern-4567sp\kern-1em}{}{\protect\newumlaut#1}}\else
\if#1u{\discretionary
{\kern 4321sp m\kern 
252sp\kern-4573sp\kern-1em}{}{\protect\newumlaut#1}}\else
\if#1s{\discretionary
{\kern 4321sp m\kern 255sp\kern-4573sp\kern-1em}{}
{\ss}}\else{\protect\newumlaut#1}\fi\fi\fi\fi\fi\fi\fi}


\gdef\newumlaut#1{\leavevmode
     \vbox{\baselineskip\z@skip \lineskip.25ex
@z

@x
     {\hbox{\char127}\vss}\hidewidth\crcr#1\crcr}}\allowhyphens}
\gdef\highumlaut#1{\leavevmode\allowhyphens
     \accent127 #1\allowhyphens}

\gdef\set@low@box#1{\setbox\tw@\hbox{,}\setbox\z@\hbox{#1}\dimen\
z@\ht\z@
@y
     {\hbox{\char127}\vss}\hidewidth\crcr#1\crcr}}}

\gdef\highumlaut#1{\leavevmode\dirtyumlaut#1}

\gdef\set@low@box#1{\setbox\tw@\hbox{,}\setbox\z@\hbox{#1}\dimen\
z@\ht\z@
@z