#
# qed Krzel-Datei fr Modula2
#
a=AND 
ab=ABS(~)
ac=ARRAY ~OF CHAR;
ad=ADDRESS;
ai=ARRAY ~OF INTEGER;
al=ARRAY OF LOC
ar=ARRAY [~..] OF 
b=BEGIN
bl=BOOLEAN;
bs=BITSET;
bt=BYTE;
cp=CAP(~)
cd=CARDINAL;
cs=CASE ~ OF
c=CHAR;
cr=CHR(~)
cn=CONST
dc=DEC(~)
dm=DEFINITION MODULE ~;
dp=DISPOSE(~);
dv=DIV 
e=ELSE
es=ELSIF 
en=END ~;
ec=END(*CASE*);
ef=END(*FOR*);
ei=END(*IF*);
el=END(*LOOP*);
er=END(*RECORD*);
ew=END(*WHILE*);
eh=END(*WITH*);
et=EXIT;
ex=EXPORT ;
eq=EXPORT QUALIFIED ~;
f=FALSE
fi=FROM ~IMPORT 
fl=FLOAT(~)
fo=FOR ~:= TO DO
gm=GD.Msg("~");
i=IF ~ THEN
im=IMPLEMENTATION MODULE ~;
in=IN 
ic=INC(~);
il=INCL(~);
ip=IMPORT ~;
it=INTEGER;
iwc=IO.WriteChar(~);
iwi=IO.WriteInt(~);
iwl=IO.WriteLn;
iwr=IO.WriteReal(~);
iws=IO.WriteString("~");
lb=LONGBITSET;
lc=LONGCARD;
li=LONGINT; 
lr=LONGREAL;
l=LOOP
m=MOD 
mo=MODULE ~;
ne=NEW(~);
ni=NIL
n=NOT 
od=ODD(~);
of=OF 
o=OR 
or=ORD(~);
pt=POINTER TO 
pr=PROC;
p=PROCEDURE 
ra=REAL;
re=RECORD
rp=REPEAT
r=RETURN ~;
rd=Read(~);
rc=ReadCard(~);
ri=ReadInt(~);
rr=ReadReal(~);
rs=ReadStr(~);
s=SET OF 
si=SIZE(~);
st=String;
to=TO 
t=TRUE
tc=TRUNC(~);
th=THEN
ts=TSIZE(~);
ty=TYPE
u=UNTIL 
v=VAR 
w=WHILE ~ DO
wh=WITH ~ DO
wo=WORD;
we=Write(~);
wc=WriteCard(~,0);
wi=WriteInt(~,0);
wl=WriteLn;
wr=WriteReal(~,,);
ws=WriteString("~");