From
[email protected] 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: <
[email protected]>
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" <
[email protected]>
To:
[email protected]
Cc:
[email protected]
Message-Id: <
[email protected]>
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
