summaryrefslogtreecommitdiff
path: root/macros/latex209/contrib/misc/regel.sty
blob: fa9023136c76d844eed489dca5d8783d403b278d (plain)
ofshex dumpascii
0000 25 25 25 20 7b 20 42 52 41 43 45 20 4d 41 54 43 48 49 4e 47 20 48 41 43 4b 0d 00 0a 25 2d 2d 2d %%%.{.BRACE.MATCHING.HACK...%---
0020 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d --------------------------------
0040 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d --------------------------------
0060 2d 2d 2d 2d 2d 2d 2d 0d 00 0a 25 20 43 72 65 61 74 65 64 20 62 79 20 54 2e 42 69 72 6e 74 68 61 -------...%.Created.by.T.Birntha
0080 6c 65 72 20 28 46 41 55 20 45 72 6c 61 6e 67 65 6e 2d 4e 75 65 72 6e 62 65 72 67 2c 20 49 4d 4d ler.(FAU.Erlangen-Nuernberg,.IMM
00a0 44 35 20 28 4d 75 73 74 65 72 65 72 6b 65 6e 6e 75 6e 67 29 29 0d 00 0a 25 2d 2d 2d 2d 2d 2d 2d D5.(Mustererkennung))...%-------
00c0 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d --------------------------------
00e0 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d --------------------------------
0100 2d 2d 2d 0d 00 0a 5c 6d 65 73 73 61 67 65 7b 44 6f 63 75 6d 65 6e 74 20 53 74 79 6c 65 20 4f 70 ---...\message{Document.Style.Op
0120 74 69 6f 6e 20 60 72 65 67 65 6c 27 20 56 65 72 73 69 6f 6e 20 31 2e 30 2c 20 61 73 20 6f 66 20 tion.`regel'.Version.1.0,.as.of.
0140 33 30 2e 20 4e 6f 76 65 6d 62 65 72 20 31 39 38 39 7d 0d 00 0a 25 0d 00 0a 25 20 42 65 66 65 68 30..November.1989}...%...%.Befeh
0160 6c 65 20 7a 75 6d 20 45 72 7a 65 75 67 65 6e 20 76 6f 6e 20 52 65 67 65 6c 6e 0d 00 0a 25 20 28 le.zum.Erzeugen.von.Regeln...%.(
0180 77 65 72 64 65 6e 20 7a 75 73 61 6d 6d 65 6e 20 6d 69 74 20 64 65 6e 20 46 6f 72 6d 65 6c 6e 20 werden.zusammen.mit.den.Formeln.
01a0 64 75 72 63 68 6e 75 6d 65 72 69 65 72 74 29 3a 0d 00 0a 25 0d 00 0a 25 20 45 72 7a 65 75 67 75 durchnumeriert):...%...%.Erzeugu
01c0 6e 67 3a 0d 00 0a 25 20 20 20 5c 62 65 67 69 6e 7b 72 65 67 65 6c 7d 20 20 20 20 20 20 20 20 20 ng:...%...\begin{regel}.........
01e0 20 20 20 20 5c 62 65 67 69 6e 7b 72 65 67 65 6c 2a 7d 0d 00 0a 25 20 20 20 20 20 41 6e 77 65 69 ....\begin{regel*}...%.....Anwei
0200 73 75 6e 67 65 6e 20 20 20 20 20 62 7a 77 2e 20 20 20 20 20 20 41 6e 77 65 69 73 75 6e 67 65 6e sungen.....bzw.......Anweisungen
0220 0d 00 0a 25 20 20 20 5c 65 6e 64 7b 72 65 67 65 6c 7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ...%...\end{regel}..............
0240 20 5c 65 6e 64 7b 72 65 67 65 6c 2a 7d 20 20 20 20 20 20 0d 00 0a 25 20 0d 00 0a 25 0d 00 0a 25 .\end{regel*}.........%....%...%
0260 20 41 6e 77 65 69 73 75 6e 67 3a 0d 00 0a 25 20 20 20 5c 49 46 7b 42 65 64 69 6e 67 75 6e 67 31 .Anweisung:...%...\IF{Bedingung1
0280 20 5c 41 4e 44 20 42 65 64 69 6e 67 75 6e 67 32 20 5c 41 4e 44 20 2e 2e 2e 20 5c 41 4e 44 20 42 .\AND.Bedingung2.\AND.....\AND.B
02a0 65 64 69 6e 67 75 6e 67 4e 7d 5b 2c 2e 3b 5d 0d 00 0a 25 20 20 20 5c 54 48 45 4e 7b 46 6f 6c 67 edingungN}[,.;]...%...\THEN{Folg
02c0 65 72 75 6e 67 31 20 5c 4f 52 20 46 6f 6c 67 65 72 75 6e 67 32 20 5c 4f 52 20 2e 2e 2e 20 5c 4f erung1.\OR.Folgerung2.\OR.....\O
02e0 52 20 46 6f 6c 67 65 72 75 6e 67 4d 7d 5b 2c 2e 3b 5d 0d 00 0a 25 20 20 20 5c 6c 61 62 65 6c 7b R.FolgerungM}[,.;]...%...\label{
0300 2e 2e 2e 7d 0d 00 0a 25 20 20 20 5c 6e 6f 6e 75 6d 62 65 72 0d 00 0a 25 0d 00 0a 25 20 4d 61 73 ...}...%...\nonumber...%...%.Mas
0320 73 65 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 42 65 64 65 75 74 75 6e 67 3a 20 20 se:................(Bedeutung:..
0340 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 44 65 66 61 75 ...........................Defau
0360 6c 74 77 65 72 74 29 0d 00 0a 25 20 20 20 5c 61 62 6f 76 65 72 75 6c 65 73 6b 69 70 20 20 20 20 ltwert)...%...\aboveruleskip....
0380 20 20 28 41 62 73 74 61 6e 64 20 7a 75 20 76 6f 72 68 65 72 67 65 68 2e 20 61 62 67 65 74 72 2e ..(Abstand.zu.vorhergeh..abgetr.
03a0 20 41 62 73 61 74 7a 3a 20 20 20 20 20 20 20 20 31 2e 35 65 78 29 0d 00 0a 25 20 20 20 5c 62 65 .Absatz:........1.5ex)...%...\be
03c0 6c 6f 77 72 75 6c 65 73 6b 69 70 20 20 20 20 20 20 28 41 62 73 74 61 6e 64 20 7a 75 20 6e 61 63 lowruleskip......(Abstand.zu.nac
03e0 68 66 6f 6c 67 2e 20 61 62 67 65 74 72 2e 20 41 62 73 61 74 7a 3a 20 20 20 20 20 20 20 20 20 31 hfolg..abgetr..Absatz:.........1
0400 2e 35 65 78 29 0d 00 0a 25 20 20 20 5c 61 62 6f 76 65 72 75 6c 65 73 68 6f 72 74 73 6b 69 70 20 .5ex)...%...\aboveruleshortskip.
0420 28 41 62 73 74 61 6e 64 20 7a 75 20 76 6f 72 68 65 72 67 65 68 2e 20 61 6e 67 72 65 6e 7a 2e 20 (Abstand.zu.vorhergeh..angrenz..
0440 41 62 73 61 74 7a 3a 20 20 20 20 20 20 20 30 2e 35 65 78 29 0d 00 0a 25 20 20 20 5c 62 65 6c 6f Absatz:.......0.5ex)...%...\belo
0460 77 72 75 6c 65 73 68 6f 72 74 73 6b 69 70 20 28 41 62 73 74 61 6e 64 20 7a 75 20 6e 61 63 68 66 wruleshortskip.(Abstand.zu.nachf
0480 6f 6c 67 2e 20 61 6e 67 72 65 6e 7a 2e 20 41 62 73 61 74 7a 3a 20 20 20 20 20 20 20 20 30 2e 35 olg..angrenz..Absatz:........0.5
04a0 65 78 29 0d 00 0a 25 20 20 20 5c 72 75 6c 65 6c 65 66 74 69 6e 64 65 6e 74 20 20 20 20 20 28 6c ex)...%...\ruleleftindent.....(l
04c0 69 6e 6b 65 20 45 69 6e 72 75 65 63 6b 75 6e 67 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 inke.Einrueckung:...............
04e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31 63 6d 29 0d 00 0a 25 20 20 20 5c 72 75 6c 65 72 69 ..............1cm)...%...\ruleri
0500 67 68 74 69 6e 64 65 6e 74 20 20 20 20 28 72 65 63 68 74 65 20 45 69 6e 72 75 65 63 6b 75 6e 67 ghtindent....(rechte.Einrueckung
0520 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 32 63 6d :............................2cm
0540 29 0d 00 0a 25 20 20 20 5c 69 6e 72 75 6c 65 73 6b 69 70 20 20 20 20 20 20 20 20 20 28 41 62 73 )...%...\inruleskip.........(Abs
0560 74 61 6e 64 20 7a 77 2e 20 7a 75 73 2e 67 65 68 2e 20 49 46 2d 20 75 6e 64 20 54 48 45 4e 2d 54 tand.zw..zus.geh..IF-.und.THEN-T
0580 65 69 6c 3a 20 20 20 20 20 20 20 20 30 70 74 29 0d 00 0a 25 20 20 20 5c 62 65 74 77 65 65 6e 72 eil:........0pt)...%...\betweenr
05a0 75 6c 65 73 6b 69 70 20 20 20 20 28 41 62 73 74 61 6e 64 20 7a 77 2e 20 7a 77 65 69 20 52 65 67 uleskip....(Abstand.zw..zwei.Reg
05c0 65 6c 6e 20 69 6e 20 64 65 72 73 65 6c 62 65 6e 20 55 6d 67 65 62 75 6e 67 3a 20 31 65 78 29 0d eln.in.derselben.Umgebung:.1ex).
05e0 00 0a 25 20 20 20 5c 72 75 6c 65 68 73 6b 69 70 20 20 20 20 20 20 20 20 20 20 28 41 62 73 74 61 ..%...\rulehskip..........(Absta
0600 6e 64 20 7a 77 2e 20 54 48 45 4e 2c 41 4e 44 2c 4f 52 20 75 6e 64 20 66 6f 6c 67 2e 20 54 65 78 nd.zw..THEN,AND,OR.und.folg..Tex
0620 74 3a 20 20 20 20 20 20 20 20 31 65 78 29 0d 00 0a 25 0d 00 0a 25 20 42 65 64 69 6e 67 75 6e 67 t:........1ex)...%...%.Bedingung
0640 2c 20 46 6f 6c 67 65 72 75 6e 67 3a 0d 00 0a 25 20 20 20 62 65 6c 69 65 62 69 67 65 72 20 54 65 ,.Folgerung:...%...beliebiger.Te
0660 78 74 20 6d 69 74 20 54 65 58 2d 4b 6f 6d 6d 61 6e 64 6f 73 20 7a 75 6d 20 5a 65 69 6c 65 6e 75 xt.mit.TeX-Kommandos.zum.Zeilenu
0680 6d 62 72 75 63 68 2c 0d 00 0a 25 20 20 20 53 63 68 72 69 66 74 61 72 74 77 65 63 68 73 65 6c 2c mbruch,...%...Schriftartwechsel,
06a0 20 2e 2e 2e 0d 00 0a 25 0d 00 0a 25 20 48 69 6e 77 65 69 73 65 3a 0d 00 0a 25 20 20 20 2d 2d 20 .......%...%.Hinweise:...%...--.
06c0 5c 6c 61 62 65 6c 2d 4b 6f 6d 6d 61 6e 64 6f 73 20 2a 64 75 65 72 66 65 6e 20 6e 75 72 2a 20 64 \label-Kommandos.*duerfen.nur*.d
06e0 69 72 65 6b 74 20 76 6f 72 20 64 65 6d 20 61 62 73 63 68 6c 69 65 73 73 65 6e 64 65 6e 0d 00 0a irekt.vor.dem.abschliessenden...
0700 25 20 20 20 20 20 20 5c 65 6e 64 7b 72 65 67 65 6c 7d 2d 4b 6f 6d 6d 61 6e 64 6f 20 76 6f 6e 20 %......\end{regel}-Kommando.von.
0720 52 65 67 65 6c 6e 20 61 6e 67 65 67 65 62 65 6e 20 77 65 72 64 65 6e 2e 0d 00 0a 25 0d 00 0a 25 Regeln.angegeben.werden....%...%
0740 20 20 20 2d 2d 20 44 69 65 20 72 65 67 65 6c 2a 2d 55 6d 67 65 62 75 6e 67 20 65 72 7a 65 75 67 ...--.Die.regel*-Umgebung.erzeug
0760 74 20 2a 6b 65 69 6e 65 2a 20 4e 75 6d 65 72 69 65 72 75 6e 67 20 64 65 72 20 52 65 67 65 6c 28 t.*keine*.Numerierung.der.Regel(
0780 6e 29 2e 0d 00 0a 25 20 20 20 20 20 20 41 6c 74 65 72 6e 61 74 69 76 20 6b 61 6e 6e 20 61 75 63 n)....%......Alternativ.kann.auc
07a0 68 20 69 6e 20 64 65 72 20 72 65 67 65 6c 2d 55 6d 67 65 62 75 6e 67 20 64 69 65 20 4e 75 6d 65 h.in.der.regel-Umgebung.die.Nume
07c0 72 69 65 72 75 6e 67 0d 00 0a 25 20 20 20 20 20 20 6d 69 74 20 5c 6e 6f 6e 75 6d 62 65 72 20 75 rierung...%......mit.\nonumber.u
07e0 6e 74 65 72 64 72 75 65 63 6b 74 20 77 65 72 64 65 6e 2e 0d 00 0a 25 0d 00 0a 25 20 20 20 2d 2d nterdrueckt.werden....%...%...--
0800 20 6e 61 63 68 20 64 65 6d 20 41 72 67 75 6d 65 6e 74 20 76 6f 6e 20 5c 49 46 2d 20 6f 64 65 72 .nach.dem.Argument.von.\IF-.oder
0820 20 5c 54 48 45 4e 2d 41 6e 77 65 69 73 75 6e 67 65 6e 20 2a 64 61 72 66 20 6f 70 74 69 6f 6e 61 .\THEN-Anweisungen.*darf.optiona
0840 6c 2a 0d 00 0a 25 20 20 20 20 20 20 65 69 6e 65 73 20 64 65 72 20 53 61 74 7a 7a 65 69 63 68 65 l*...%......eines.der.Satzzeiche
0860 6e 20 2c 3b 2e 20 66 6f 6c 67 65 6e 2c 20 64 61 73 20 64 61 6e 6e 20 69 6d 20 54 65 78 74 20 6e n.,;..folgen,.das.dann.im.Text.n
0880 61 63 68 20 64 65 6d 20 0d 00 0a 25 20 20 20 20 20 20 41 72 67 75 6d 65 6e 74 74 65 78 74 20 75 ach.dem....%......Argumenttext.u
08a0 6e 64 20 64 65 72 20 61 62 73 63 68 6c 69 65 73 73 65 6e 64 65 6e 20 72 65 63 68 74 65 6e 20 4b nd.der.abschliessenden.rechten.K
08c0 6c 61 6d 6d 65 72 20 65 72 73 63 68 65 69 6e 74 2e 0d 00 0a 25 0d 00 0a 25 20 20 20 2d 2d 20 44 lammer.erscheint....%...%...--.D
08e0 69 65 20 4d 61 73 73 65 20 2a 6b 6f 65 6e 6e 65 6e 2a 20 64 75 72 63 68 20 5a 75 77 65 69 73 75 ie.Masse.*koennen*.durch.Zuweisu
0900 6e 67 20 65 69 6e 65 72 20 62 65 6c 69 65 62 69 67 65 6e 20 4c 61 65 6e 67 65 20 6d 69 74 20 64 ng.einer.beliebigen.Laenge.mit.d
0920 65 6d 0d 00 0a 25 20 20 20 20 20 20 4b 6f 6d 6d 61 6e 64 6f 20 20 0d 00 0a 25 20 20 20 20 20 20 em...%......Kommando.....%......
0940 20 20 20 20 20 20 20 20 20 20 20 20 20 5c 73 65 74 6c 65 6e 67 74 68 7b 5c 6d 61 73 73 7d 7b 6c .............\setlength{\mass}{l
0960 61 65 6e 67 65 7d 0d 00 0a 25 0d 00 0a 25 20 20 20 20 20 20 6e 61 63 68 20 47 65 73 63 68 6d 61 aenge}...%...%......nach.Geschma
0980 63 6b 20 76 65 72 61 65 6e 64 65 72 74 20 77 65 72 64 65 6e 2e 0d 00 0a 25 0d 00 0a 25 20 20 20 ck.veraendert.werden....%...%...
09a0 2d 2d 20 4c 65 65 72 7a 65 69 63 68 65 6e 20 61 6d 20 41 6e 66 61 6e 67 20 65 69 6e 65 72 20 5a --.Leerzeichen.am.Anfang.einer.Z
09c0 65 69 6c 65 20 77 65 72 64 65 6e 20 76 6f 6e 20 54 65 58 20 62 69 73 20 7a 75 6d 20 65 72 73 74 eile.werden.von.TeX.bis.zum.erst
09e0 65 6e 0d 00 0a 25 20 20 20 20 20 20 65 63 68 74 65 6e 20 5a 65 69 63 68 65 6e 20 2a 6e 69 63 68 en...%......echten.Zeichen.*nich
0a00 74 2a 20 62 65 61 63 68 74 65 74 20 28 64 2e 68 20 45 69 6e 72 75 65 63 6b 65 6e 20 69 73 74 20 t*.beachtet.(d.h.Einruecken.ist.
0a20 65 72 6c 61 75 62 74 29 2e 0d 00 0a 25 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d erlaubt)....%-------------------
0a40 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d --------------------------------
0a60 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0d 00 0a 0d 00 0a 25 20 69 6e 74 65 --------------------......%.inte
0a80 72 6e 65 20 42 6f 78 65 6e 0d 00 0a 5c 6e 65 77 62 6f 78 5c 72 75 6c 65 40 74 68 65 6e 40 62 6f rne.Boxen...\newbox\rule@then@bo
0aa0 78 0d 00 0a 5c 6e 65 77 62 6f 78 5c 72 75 6c 65 40 69 66 40 62 6f 78 0d 00 0a 5c 6e 65 77 62 6f x...\newbox\rule@if@box...\newbo
0ac0 78 5c 72 75 6c 65 40 61 6e 64 40 62 6f 78 0d 00 0a 5c 6e 65 77 62 6f 78 5c 72 75 6c 65 40 6f 72 x\rule@and@box...\newbox\rule@or
0ae0 40 62 6f 78 0d 00 0a 5c 6e 65 77 62 6f 78 5c 72 75 6c 65 40 72 65 67 65 6c 40 62 6f 78 0d 00 0a @box...\newbox\rule@regel@box...
0b00 0d 00 0a 25 20 4d 61 73 73 65 0d 00 0a 5c 6e 65 77 64 69 6d 65 6e 5c 61 62 6f 76 65 72 75 6c 65 ...%.Masse...\newdimen\aboverule
0b20 73 6b 69 70 0d 00 0a 5c 6e 65 77 64 69 6d 65 6e 5c 62 65 6c 6f 77 72 75 6c 65 73 6b 69 70 0d 00 skip...\newdimen\belowruleskip..
0b40 0a 5c 6e 65 77 64 69 6d 65 6e 5c 61 62 6f 76 65 72 75 6c 65 73 68 6f 72 74 73 6b 69 70 0d 00 0a .\newdimen\aboveruleshortskip...
0b60 5c 6e 65 77 64 69 6d 65 6e 5c 62 65 6c 6f 77 72 75 6c 65 73 68 6f 72 74 73 6b 69 70 0d 00 0a 5c \newdimen\belowruleshortskip...\
0b80 6e 65 77 64 69 6d 65 6e 5c 72 75 6c 65 6c 65 66 74 69 6e 64 65 6e 74 0d 00 0a 5c 6e 65 77 64 69 newdimen\ruleleftindent...\newdi
0ba0 6d 65 6e 5c 72 75 6c 65 72 69 67 68 74 69 6e 64 65 6e 74 0d 00 0a 5c 6e 65 77 64 69 6d 65 6e 5c men\rulerightindent...\newdimen\
0bc0 69 6e 72 75 6c 65 73 6b 69 70 0d 00 0a 5c 6e 65 77 64 69 6d 65 6e 5c 62 65 74 77 65 65 6e 72 75 inruleskip...\newdimen\betweenru
0be0 6c 65 73 6b 69 70 0d 00 0a 5c 6e 65 77 64 69 6d 65 6e 5c 72 75 6c 65 68 73 6b 69 70 0d 00 0a 5c leskip...\newdimen\rulehskip...\
0c00 6e 65 77 64 69 6d 65 6e 5c 72 75 6c 65 40 64 65 70 74 68 20 20 20 25 25 25 20 69 6e 74 65 72 6e newdimen\rule@depth...%%%.intern
0c20 20 76 65 72 77 65 6e 64 65 74 0d 00 0a 0d 00 0a 25 20 44 65 66 61 75 6c 74 77 65 72 74 65 20 66 .verwendet......%.Defaultwerte.f
0c40 75 65 72 20 4d 61 73 73 65 0d 00 0a 5c 61 62 6f 76 65 72 75 6c 65 73 6b 69 70 20 20 20 20 20 20 uer.Masse...\aboveruleskip......
0c60 3d 20 31 2e 35 65 78 0d 00 0a 5c 62 65 6c 6f 77 72 75 6c 65 73 6b 69 70 20 20 20 20 20 20 3d 20 =.1.5ex...\belowruleskip......=.
0c80 31 2e 35 65 78 0d 00 0a 5c 61 62 6f 76 65 72 75 6c 65 73 68 6f 72 74 73 6b 69 70 20 3d 20 30 2e 1.5ex...\aboveruleshortskip.=.0.
0ca0 35 65 78 0d 00 0a 5c 62 65 6c 6f 77 72 75 6c 65 73 68 6f 72 74 73 6b 69 70 20 3d 20 30 2e 35 65 5ex...\belowruleshortskip.=.0.5e
0cc0 78 0d 00 0a 5c 72 75 6c 65 6c 65 66 74 69 6e 64 65 6e 74 20 20 20 20 20 3d 20 31 63 6d 0d 00 0a x...\ruleleftindent.....=.1cm...
0ce0 5c 72 75 6c 65 72 69 67 68 74 69 6e 64 65 6e 74 20 20 20 20 3d 20 32 63 6d 0d 00 0a 5c 69 6e 72 \rulerightindent....=.2cm...\inr
0d00 75 6c 65 73 6b 69 70 20 20 20 20 20 20 20 20 20 3d 20 30 70 74 0d 00 0a 5c 62 65 74 77 65 65 6e uleskip.........=.0pt...\between
0d20 72 75 6c 65 73 6b 69 70 20 20 20 20 3d 20 31 65 78 0d 00 0a 5c 72 75 6c 65 68 73 6b 69 70 20 20 ruleskip....=.1ex...\rulehskip..
0d40 20 20 20 20 20 20 20 20 3d 20 31 65 78 0d 00 0a 0d 00 0a 25 20 66 75 65 72 20 46 6f 6c 67 65 6e ........=.1ex......%.fuer.Folgen
0d60 20 76 6f 6e 20 52 65 67 65 6c 6e 0d 00 0a 5c 6e 65 77 69 66 5c 69 66 40 66 69 72 73 74 72 75 6c .von.Regeln...\newif\if@firstrul
0d80 65 20 5c 40 66 69 72 73 74 72 75 6c 65 74 72 75 65 0d 00 0a 0d 00 0a 25 20 41 6c 74 65 72 6e 61 e.\@firstruletrue......%.Alterna
0da0 74 69 76 65 20 72 65 67 65 6c 2a 2d 55 6d 67 65 62 75 6e 67 2c 20 2a 75 6e 2a 6e 75 6d 65 72 69 tive.regel*-Umgebung,.*un*numeri
0dc0 65 72 74 0d 00 0a 5c 40 6e 61 6d 65 64 65 66 7b 72 65 67 65 6c 2a 7d 7b 5c 72 65 67 65 6c 7d 0d ert...\@namedef{regel*}{\regel}.
0de0 00 0a 5c 40 6e 61 6d 65 64 65 66 7b 65 6e 64 72 65 67 65 6c 2a 7d 7b 5c 6e 6f 6e 75 6d 62 65 72 ..\@namedef{endregel*}{\nonumber
0e00 5c 65 6e 64 72 65 67 65 6c 7d 0d 00 0a 0d 00 0a 25 20 4e 6f 72 6d 61 6c 65 20 72 65 67 65 6c 2d \endregel}......%.Normale.regel-
0e20 55 6d 67 65 62 75 6e 67 2c 20 6e 75 6d 65 72 69 65 72 74 0d 00 0a 5c 64 65 66 5c 72 65 67 65 6c Umgebung,.numeriert...\def\regel
0e40 7b 25 0d 00 0a 25 0d 00 0a 25 20 41 62 73 74 61 6e 64 20 7a 75 6d 20 76 6f 72 68 65 72 67 65 68 {%...%...%.Abstand.zum.vorhergeh
0e60 65 6e 64 65 6e 20 54 65 78 74 20 62 65 73 74 69 6d 6d 65 6e 0d 00 0a 20 20 5c 69 66 68 6d 6f 64 enden.Text.bestimmen.....\ifhmod
0e80 65 0d 00 0a 20 20 20 20 5c 69 66 69 6e 6e 65 72 20 5c 65 72 72 6d 65 73 73 61 67 65 7b 72 65 67 e.......\ifinner.\errmessage{reg
0ea0 65 6c 2d 55 6d 67 65 62 75 6e 67 20 69 6e 20 5c 73 74 72 69 6e 67 5c 68 62 6f 78 20 6e 69 63 68 el-Umgebung.in.\string\hbox.nich
0ec0 74 20 65 72 6c 61 75 62 74 7d 25 0d 00 0a 20 20 20 20 5c 65 6c 73 65 0d 00 0a 25 25 25 20 20 20 t.erlaubt}%.......\else...%%%...
0ee0 5c 6d 65 73 73 61 67 65 7b 20 72 65 67 65 6c 3a 20 68 6d 6f 64 65 2d 3e 61 62 6f 76 65 73 68 6f \message{.regel:.hmode->abovesho
0f00 72 74 7d 25 0d 00 0a 20 20 20 20 20 20 5c 76 73 6b 69 70 5c 61 62 6f 76 65 72 75 6c 65 73 68 6f rt}%.........\vskip\aboverulesho
0f20 72 74 73 6b 69 70 0d 00 0a 20 20 20 20 5c 66 69 0d 00 0a 20 20 5c 65 6c 73 65 0d 00 0a 20 20 20 rtskip.......\fi.....\else......
0f40 20 5c 69 66 76 6d 6f 64 65 0d 00 0a 20 20 20 20 20 20 5c 69 66 40 66 69 72 73 74 72 75 6c 65 0d .\ifvmode.........\if@firstrule.
0f60 00 0a 25 25 25 20 20 20 20 20 5c 6d 65 73 73 61 67 65 7b 20 72 65 67 65 6c 3a 20 76 6d 6f 64 65 ..%%%.....\message{.regel:.vmode
0f80 2c 66 69 72 73 74 74 72 75 65 2d 3e 61 62 6f 76 65 7d 25 0d 00 0a 20 20 20 20 20 20 20 20 5c 69 ,firsttrue->above}%...........\i
0fa0 66 64 69 6d 20 5c 6c 61 73 74 73 6b 69 70 20 3c 20 5c 61 62 6f 76 65 72 75 6c 65 73 6b 69 70 0d fdim.\lastskip.<.\aboveruleskip.
0fc0 00 0a 20 20 20 20 20 20 20 20 20 20 5c 76 73 6b 69 70 20 2d 5c 6c 61 73 74 73 6b 69 70 0d 00 0a ............\vskip.-\lastskip...
0fe0 20 20 20 20 20 20 20 20 20 20 5c 76 73 6b 69 70 5c 61 62 6f 76 65 72 75 6c 65 73 6b 69 70 0d 00 ..........\vskip\aboveruleskip..
1000 0a 20 20 20 20 20 20 20 20 5c 66 69 0d 00 0a 20 20 20 20 20 20 5c 65 6c 73 65 0d 00 0a 25 25 25 .........\fi.........\else...%%%
1020 20 20 20 20 20 5c 6d 65 73 73 61 67 65 7b 20 72 65 67 65 6c 3a 20 76 6d 6f 64 65 2c 66 69 72 73 .....\message{.regel:.vmode,firs
1040 74 66 61 6c 73 65 2d 3e 62 65 74 77 65 65 6e 7d 25 0d 00 0a 20 20 20 20 20 20 20 20 5c 40 72 65 tfalse->between}%...........\@re
1060 73 74 6f 72 65 70 61 72 0d 00 0a 20 20 20 20 20 20 20 20 5c 65 76 65 72 79 70 61 72 7b 7d 25 0d storepar...........\everypar{}%.
1080 00 0a 20 20 20 20 20 20 20 20 5c 69 66 64 69 6d 20 5c 6c 61 73 74 73 6b 69 70 20 3c 20 5c 62 65 ..........\ifdim.\lastskip.<.\be
10a0 74 77 65 65 6e 72 75 6c 65 73 6b 69 70 0d 00 0a 20 20 20 20 20 20 20 20 20 20 5c 76 73 6b 69 70 tweenruleskip.............\vskip
10c0 20 2d 5c 6c 61 73 74 73 6b 69 70 0d 00 0a 20 20 20 20 20 20 20 20 20 20 5c 76 73 6b 69 70 5c 62 .-\lastskip.............\vskip\b
10e0 65 74 77 65 65 6e 72 75 6c 65 73 6b 69 70 0d 00 0a 20 20 20 20 20 20 20 20 5c 66 69 0d 00 0a 20 etweenruleskip...........\fi....
1100 20 20 20 20 20 5c 66 69 0d 00 0a 20 20 20 20 5c 65 6c 73 65 20 5c 65 72 72 6d 65 73 73 61 67 65 .....\fi.......\else.\errmessage
1120 7b 72 65 67 65 6c 2d 55 6d 67 65 62 75 6e 67 20 69 6e 20 6d 61 74 68 2d 6d 6f 64 65 20 6e 69 63 {regel-Umgebung.in.math-mode.nic
1140 68 74 20 65 72 6c 61 75 62 74 7d 25 0d 00 0a 20 20 20 20 5c 66 69 0d 00 0a 20 20 5c 66 69 0d 00 ht.erlaubt}%.......\fi.....\fi..
1160 0a 25 0d 00 0a 25 20 47 6c 65 69 63 68 75 6e 67 73 6e 75 6d 6d 65 72 20 61 6b 74 75 61 6c 69 73 .%...%.Gleichungsnummer.aktualis
1180 69 65 72 65 6e 0d 00 0a 20 20 5c 73 74 65 70 63 6f 75 6e 74 65 72 7b 65 71 75 61 74 69 6f 6e 7d ieren.....\stepcounter{equation}
11a0 25 0d 00 0a 20 20 5c 6c 65 74 5c 40 63 75 72 72 65 6e 74 6c 61 62 65 6c 3d 5c 74 68 65 65 71 75 %.....\let\@currentlabel=\theequ
11c0 61 74 69 6f 6e 0d 00 0a 20 20 5c 67 6c 6f 62 61 6c 5c 40 65 71 6e 73 77 74 72 75 65 0d 00 0a 25 ation.....\global\@eqnswtrue...%
11e0 0d 00 0a 25 20 68 69 65 72 20 77 65 67 65 6e 20 53 63 68 72 69 66 74 67 72 6f 65 73 73 65 0d 00 ...%.hier.wegen.Schriftgroesse..
1200 0a 20 20 5c 73 65 74 62 6f 78 5c 72 75 6c 65 40 74 68 65 6e 40 62 6f 78 3d 5c 68 62 6f 78 7b 54 ...\setbox\rule@then@box=\hbox{T
1220 48 45 4e 5c 68 73 6b 69 70 5c 72 75 6c 65 68 73 6b 69 70 28 7d 25 20 20 20 20 20 20 20 20 6c 65 HEN\hskip\rulehskip(}%........le
1240 66 74 20 70 61 72 65 6e 74 68 65 73 65 73 0d 00 0a 20 20 5c 73 65 74 62 6f 78 5c 72 75 6c 65 40 ft.parentheses.....\setbox\rule@
1260 69 66 40 62 6f 78 3d 5c 68 62 6f 78 20 74 6f 20 5c 77 64 5c 72 75 6c 65 40 74 68 65 6e 40 62 6f if@box=\hbox.to.\wd\rule@then@bo
1280 78 7b 49 46 5c 68 66 69 6c 6c 28 7d 25 20 6c 65 66 74 20 70 61 72 65 6e 74 68 65 73 65 73 0d 00 x{IF\hfill(}%.left.parentheses..
12a0 0a 20 20 5c 73 65 74 62 6f 78 5c 72 75 6c 65 40 61 6e 64 40 62 6f 78 3d 5c 68 62 6f 78 7b 41 4e ...\setbox\rule@and@box=\hbox{AN
12c0 44 5c 68 73 6b 69 70 5c 72 75 6c 65 68 73 6b 69 70 7d 25 0d 00 0a 20 20 5c 73 65 74 62 6f 78 5c D\hskip\rulehskip}%.....\setbox\
12e0 72 75 6c 65 40 6f 72 40 62 6f 78 3d 5c 68 62 6f 78 7b 4f 52 5c 68 73 6b 69 70 5c 72 75 6c 65 68 rule@or@box=\hbox{OR\hskip\ruleh
1300 73 6b 69 70 7d 25 0d 00 0a 25 0d 00 0a 25 20 4b 6f 6d 6d 61 6e 64 6f 73 20 6e 75 72 20 6c 6f 6b skip}%...%...%.Kommandos.nur.lok
1320 61 6c 20 65 72 6c 61 75 62 65 6e 0d 00 0a 20 20 5c 64 65 66 5c 49 46 7b 5c 52 55 4c 45 40 49 46 al.erlauben.....\def\IF{\RULE@IF
1340 7d 25 0d 00 0a 20 20 5c 64 65 66 5c 54 48 45 4e 7b 5c 52 55 4c 45 40 54 48 45 4e 7d 25 0d 00 0a }%.....\def\THEN{\RULE@THEN}%...
1360 20 20 5c 64 65 66 5c 4f 52 7b 5c 52 55 4c 45 40 4f 52 7d 25 0d 00 0a 20 20 5c 64 65 66 5c 41 4e ..\def\OR{\RULE@OR}%.....\def\AN
1380 44 7b 5c 52 55 4c 45 40 41 4e 44 7d 25 0d 00 0a 25 0d 00 0a 25 20 52 65 67 65 6c 6b 6f 65 72 70 D{\RULE@AND}%...%...%.Regelkoerp
13a0 65 72 20 73 65 74 7a 65 6e 0d 00 0a 20 20 5c 73 65 74 62 6f 78 5c 72 75 6c 65 40 72 65 67 65 6c er.setzen.....\setbox\rule@regel
13c0 40 62 6f 78 5c 76 74 6f 70 5c 62 67 72 6f 75 70 20 20 20 25 20 62 65 67 69 6e 20 6f 66 20 76 74 @box\vtop\bgroup...%.begin.of.vt
13e0 6f 70 0d 00 0a 20 20 20 20 5c 61 64 76 61 6e 63 65 5c 68 73 69 7a 65 20 62 79 20 2d 5c 72 75 6c op.......\advance\hsize.by.-\rul
1400 65 6c 65 66 74 69 6e 64 65 6e 74 0d 00 0a 20 20 20 20 5c 61 64 76 61 6e 63 65 5c 68 73 69 7a 65 eleftindent.......\advance\hsize
1420 20 62 79 20 2d 5c 72 75 6c 65 72 69 67 68 74 69 6e 64 65 6e 74 0d 00 0a 20 20 20 20 5c 40 70 61 .by.-\rulerightindent.......\@pa
1440 72 62 6f 78 72 65 73 74 6f 72 65 0d 00 0a 7d 0d 00 0a 0d 00 0a 5c 64 65 66 5c 65 6e 64 72 65 67 rboxrestore...}......\def\endreg
1460 65 6c 7b 25 0d 00 0a 20 20 5c 65 67 72 6f 75 70 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 el{%.....\egroup................
1480 20 20 20 20 20 20 20 20 20 20 20 20 09 20 25 20 65 6e 64 20 6f 66 20 76 74 6f 70 0d 00 0a 25 0d ..............%.end.of.vtop...%.
14a0 00 0a 25 20 52 65 67 65 6c 68 6f 65 68 65 20 62 65 73 74 69 6d 6d 65 6e 0d 00 0a 20 20 5c 72 75 ..%.Regelhoehe.bestimmen.....\ru
14c0 6c 65 40 64 65 70 74 68 3d 5c 68 74 5c 72 75 6c 65 40 72 65 67 65 6c 40 62 6f 78 0d 00 0a 20 20 le@depth=\ht\rule@regel@box.....
14e0 5c 61 64 76 61 6e 63 65 5c 72 75 6c 65 40 64 65 70 74 68 20 62 79 20 5c 64 70 5c 72 75 6c 65 40 \advance\rule@depth.by.\dp\rule@
1500 72 65 67 65 6c 40 62 6f 78 0d 00 0a 20 20 5c 61 64 76 61 6e 63 65 5c 72 75 6c 65 40 64 65 70 74 regel@box.....\advance\rule@dept
1520 68 20 62 79 20 2d 5c 64 70 5c 73 74 72 75 74 62 6f 78 0d 00 0a 25 0d 00 0a 25 20 52 65 67 65 6c h.by.-\dp\strutbox...%...%.Regel
1540 6b 6f 65 72 70 65 72 20 6d 69 74 20 52 61 65 6e 64 65 72 6e 20 75 6e 64 20 52 65 67 65 6c 6e 75 koerper.mit.Raendern.und.Regelnu
1560 6d 6d 65 72 20 70 6c 61 7a 69 65 72 65 6e 0d 00 0a 20 20 5c 68 62 6f 78 7b 25 0d 00 0a 20 20 20 mmer.plazieren.....\hbox{%......
1580 20 5c 68 73 6b 69 70 5c 72 75 6c 65 6c 65 66 74 69 6e 64 65 6e 74 0d 00 0a 20 20 20 20 5c 62 6f .\hskip\ruleleftindent.......\bo
15a0 78 5c 72 75 6c 65 40 72 65 67 65 6c 40 62 6f 78 0d 00 0a 20 20 20 20 5c 68 73 6b 69 70 5c 72 75 x\rule@regel@box.......\hskip\ru
15c0 6c 65 72 69 67 68 74 69 6e 64 65 6e 74 0d 00 0a 25 0d 00 0a 20 20 20 20 5c 76 74 6f 70 20 74 6f lerightindent...%.......\vtop.to
15e0 20 5c 72 75 6c 65 40 64 65 70 74 68 20 7b 25 0d 00 0a 20 20 20 20 20 20 5c 68 62 6f 78 7b 5c 73 .\rule@depth.{%.........\hbox{\s
1600 74 72 75 74 7d 25 0d 00 0a 20 20 20 20 20 20 5c 76 73 73 0d 00 0a 20 20 20 20 20 20 5c 69 66 40 trut}%.........\vss.........\if@
1620 65 71 6e 73 77 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 25 20 52 65 eqnsw.......................%.Re
1640 67 65 6c 6e 75 6d 6d 65 72 20 61 75 73 67 65 62 65 6e 20 3f 0d 00 0a 20 20 20 20 20 20 20 20 5c gelnummer.ausgeben.?...........\
1660 6c 6c 61 70 7b 5c 40 65 71 6e 6e 75 6d 7d 25 0d 00 0a 20 20 20 20 20 20 5c 65 6c 73 65 0d 00 0a llap{\@eqnnum}%.........\else...
1680 20 20 20 20 20 20 20 20 5c 67 6c 6f 62 61 6c 5c 61 64 76 61 6e 63 65 5c 63 40 65 71 75 61 74 69 ........\global\advance\c@equati
16a0 6f 6e 5c 6d 40 6e 65 0d 00 0a 20 20 20 20 20 20 5c 66 69 0d 00 0a 20 20 20 20 7d 25 0d 00 0a 20 on\m@ne.........\fi.......}%....
16c0 20 7d 25 0d 00 0a 25 0d 00 0a 0d 00 0a 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 .}%...%......%%%%%%%%%%%%%%%%%%%
16e0 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1700 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 0d 00 0a 25 %%%%%%%%%%%%%%%%%%%%%%%%%%%%...%
1720 25 25 20 74 72 69 63 6b 79 2c 20 74 72 69 63 6b 79 2c 20 2e 2e 2e 20 20 20 20 20 20 20 20 20 20 %%.tricky,.tricky,..............
1740 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
1760 20 20 20 20 20 20 20 20 20 20 20 25 25 25 0d 00 0a 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 ...........%%%...%%%%%%%%%%%%%%%
1780 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
17a0 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
17c0 0d 00 0a 25 20 41 62 73 74 61 6e 64 20 7a 75 6d 20 6e 61 63 68 66 6f 6c 67 65 6e 64 65 6e 20 54 ...%.Abstand.zum.nachfolgenden.T
17e0 65 78 74 20 62 65 73 74 69 6d 6d 65 6e 0d 00 0a 5c 64 65 66 5c 40 64 6f 65 6e 64 70 65 7b 25 0d ext.bestimmen...\def\@doendpe{%.
1800 00 0a 25 0d 00 0a 20 20 5c 40 66 69 72 73 74 72 75 6c 65 66 61 6c 73 65 0d 00 0a 20 20 5c 40 69 ..%.....\@firstrulefalse.....\@i
1820 67 6e 6f 72 65 74 72 75 65 0d 00 0a 25 0d 00 0a 20 20 5c 64 65 66 5c 70 61 72 7b 25 0d 00 0a 25 gnoretrue...%.....\def\par{%...%
1840 25 25 20 5c 6d 65 73 73 61 67 65 7b 20 2a 74 6d 70 20 70 61 72 7d 25 0d 00 0a 20 20 20 20 5c 40 %%.\message{.*tmp.par}%.......\@
1860 72 65 73 74 6f 72 65 70 61 72 0d 00 0a 20 20 20 20 5c 65 76 65 72 79 70 61 72 7b 7d 25 0d 00 0a restorepar.......\everypar{}%...
1880 20 20 20 20 5c 76 73 6b 69 70 5c 62 65 6c 6f 77 72 75 6c 65 73 6b 69 70 0d 00 0a 20 20 20 20 5c ....\vskip\belowruleskip.......\
18a0 40 66 69 72 73 74 72 75 6c 65 74 72 75 65 0d 00 0a 20 20 20 20 5c 40 65 6e 64 70 65 66 61 6c 73 @firstruletrue.......\@endpefals
18c0 65 0d 00 0a 20 20 7d 25 0d 00 0a 25 0d 00 0a 20 20 5c 65 76 65 72 79 70 61 72 3d 7b 25 0d 00 0a e.....}%...%.....\everypar={%...
18e0 25 25 25 20 5c 6d 65 73 73 61 67 65 7b 20 2a 74 6d 70 20 65 76 65 72 79 70 61 72 7d 25 0d 00 0a %%%.\message{.*tmp.everypar}%...
1900 20 20 20 20 5c 40 72 65 73 74 6f 72 65 70 61 72 0d 00 0a 20 20 20 20 5c 65 76 65 72 79 70 61 72 ....\@restorepar.......\everypar
1920 7b 7d 25 0d 00 0a 20 20 20 20 5c 73 65 74 62 6f 78 30 3d 5c 6c 61 73 74 62 6f 78 20 20 20 25 25 {}%.......\setbox0=\lastbox...%%
1940 25 20 61 6e 73 74 61 74 74 20 5c 75 6e 73 6b 69 70 20 21 21 21 0d 00 0a 20 20 20 20 5c 76 73 6b %.anstatt.\unskip.!!!.......\vsk
1960 69 70 5c 62 65 6c 6f 77 72 75 6c 65 73 68 6f 72 74 73 6b 69 70 0d 00 0a 20 20 20 20 5c 6e 6f 69 ip\belowruleshortskip.......\noi
1980 6e 64 65 6e 74 0d 00 0a 20 20 20 20 5c 40 66 69 72 73 74 72 75 6c 65 74 72 75 65 0d 00 0a 20 20 ndent.......\@firstruletrue.....
19a0 20 20 5c 40 65 6e 64 70 65 66 61 6c 73 65 0d 00 0a 20 20 7d 25 0d 00 0a 7d 25 0d 00 0a 25 0d 00 ..\@endpefalse.....}%...}%...%..
19c0 0a 20 20 5c 40 65 6e 64 70 65 74 72 75 65 0d 00 0a 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 ...\@endpetrue...%%%%%%%%%%%%%%%
19e0 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1a00 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1a20 0d 00 0a 25 25 25 20 2e 2e 2e 20 74 72 69 63 6b 79 2c 20 74 72 69 63 6b 79 2e 20 20 20 20 20 20 ...%%%.....tricky,.tricky.......
1a40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ................................
1a60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 25 25 25 0d 00 0a 25 25 25 25 25 25 25 25 25 25 25 ...............%%%...%%%%%%%%%%%
1a80 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1aa0 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 25 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1ac0 25 25 25 25 0d 00 0a 7d 0d 00 0a 0d 00 0a 0d 00 0a 25 20 5c 49 46 20 6d 69 74 20 6f 70 74 69 6f %%%%...}.........%.\IF.mit.optio
1ae0 6e 61 6c 65 6d 20 53 61 74 7a 7a 65 69 63 68 65 6e 20 5b 2c 3b 2e 5d 0d 00 0a 25 0d 00 0a 5c 6c nalem.Satzzeichen.[,;.]...%...\l
1b00 6f 6e 67 5c 64 65 66 5c 52 55 4c 45 40 49 46 23 31 7b 25 0d 00 0a 20 20 5c 40 69 66 6e 65 78 74 ong\def\RULE@IF#1{%.....\@ifnext
1b20 63 68 61 72 2c 7b 5c 52 55 4c 45 40 40 49 46 7b 23 31 7d 7d 7b 25 0d 00 0a 20 20 5c 40 69 66 6e char,{\RULE@@IF{#1}}{%.....\@ifn
1b40 65 78 74 63 68 61 72 3b 7b 5c 52 55 4c 45 40 40 49 46 7b 23 31 7d 7d 7b 25 0d 00 0a 20 20 5c 40 extchar;{\RULE@@IF{#1}}{%.....\@
1b60 69 66 6e 65 78 74 63 68 61 72 2e 7b 5c 52 55 4c 45 40 40 49 46 7b 23 31 7d 7d 7b 5c 52 55 4c 45 ifnextchar.{\RULE@@IF{#1}}{\RULE
1b80 40 40 49 46 7b 23 31 7d 7b 7d 7d 25 0d 00 0a 7d 7d 7d 0d 00 0a 0d 00 0a 5c 6c 6f 6e 67 5c 64 65 @@IF{#1}{}}%...}}}......\long\de
1ba0 66 5c 52 55 4c 45 40 40 49 46 23 31 23 32 7b 25 0d 00 0a 20 20 5c 68 62 6f 78 20 74 6f 20 5c 68 f\RULE@@IF#1#2{%.....\hbox.to.\h
1bc0 73 69 7a 65 7b 25 0d 00 0a 20 20 20 20 5c 63 6f 70 79 5c 72 75 6c 65 40 69 66 40 62 6f 78 0d 00 size{%.......\copy\rule@if@box..
1be0 0a 20 20 20 20 5c 76 74 6f 70 7b 25 0d 00 0a 20 20 20 20 20 20 5c 61 64 76 61 6e 63 65 5c 68 73 .....\vtop{%.........\advance\hs
1c00 69 7a 65 20 62 79 20 2d 5c 77 64 5c 72 75 6c 65 40 74 68 65 6e 40 62 6f 78 0d 00 0a 20 20 20 20 ize.by.-\wd\rule@then@box.......
1c20 20 20 5c 76 74 6f 70 5c 62 67 72 6f 75 70 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..\vtop\bgroup..................
1c40 20 20 20 20 20 25 20 62 65 67 69 6e 20 6f 66 20 66 69 72 73 74 20 76 74 6f 70 0d 00 0a 20 20 20 .....%.begin.of.first.vtop......
1c60 20 20 20 20 20 5c 6e 6f 69 6e 64 65 6e 74 5c 73 74 72 75 74 5c 69 67 6e 6f 72 65 73 70 61 63 65 .....\noindent\strut\ignorespace
1c80 73 20 23 31 5c 75 6e 73 6b 69 70 5c 73 74 72 75 74 29 23 32 25 20 72 69 67 68 74 20 70 61 72 65 s.#1\unskip\strut)#2%.right.pare
1ca0 6e 74 68 65 73 65 73 0d 00 0a 20 20 20 20 20 20 5c 65 67 72 6f 75 70 20 20 20 20 20 20 20 20 20 ntheses.........\egroup.........
1cc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 25 20 65 6e 64 20 6f 66 20 6c 61 73 74 ...................%.end.of.last
1ce0 20 76 74 6f 70 0d 00 0a 20 20 20 20 7d 25 0d 00 0a 20 20 7d 25 0d 00 0a 20 20 5c 76 73 6b 69 70 .vtop.......}%.....}%.....\vskip
1d00 5c 69 6e 72 75 6c 65 73 6b 69 70 0d 00 0a 20 20 5c 69 67 6e 6f 72 65 73 70 61 63 65 73 0d 00 0a \inruleskip.....\ignorespaces...
1d20 7d 0d 00 0a 0d 00 0a 0d 00 0a 25 20 5c 54 48 45 4e 20 6d 69 74 20 6f 70 74 69 6f 6e 61 6c 65 6d }.........%.\THEN.mit.optionalem
1d40 20 53 61 74 7a 7a 65 69 63 68 65 6e 20 5b 2c 3b 2e 5d 0d 00 0a 25 0d 00 0a 5c 6c 6f 6e 67 5c 64 .Satzzeichen.[,;.]...%...\long\d
1d60 65 66 5c 52 55 4c 45 40 54 48 45 4e 23 31 7b 25 0d 00 0a 20 20 5c 40 69 66 6e 65 78 74 63 68 61 ef\RULE@THEN#1{%.....\@ifnextcha
1d80 72 2c 7b 5c 52 55 4c 45 40 40 54 48 45 4e 7b 23 31 7d 7d 7b 25 0d 00 0a 20 20 5c 40 69 66 6e 65 r,{\RULE@@THEN{#1}}{%.....\@ifne
1da0 78 74 63 68 61 72 3b 7b 5c 52 55 4c 45 40 40 54 48 45 4e 7b 23 31 7d 7d 7b 25 0d 00 0a 20 20 5c xtchar;{\RULE@@THEN{#1}}{%.....\
1dc0 40 69 66 6e 65 78 74 63 68 61 72 2e 7b 5c 52 55 4c 45 40 40 54 48 45 4e 7b 23 31 7d 7d 7b 5c 52 @ifnextchar.{\RULE@@THEN{#1}}{\R
1de0 55 4c 45 40 40 54 48 45 4e 7b 23 31 7d 7b 7d 7d 25 0d 00 0a 7d 7d 7d 0d 00 0a 0d 00 0a 5c 6c 6f ULE@@THEN{#1}{}}%...}}}......\lo
1e00 6e 67 5c 64 65 66 5c 52 55 4c 45 40 40 54 48 45 4e 23 31 23 32 7b 25 0d 00 0a 20 20 5c 68 62 6f ng\def\RULE@@THEN#1#2{%.....\hbo
1e20 78 20 74 6f 20 5c 68 73 69 7a 65 7b 25 0d 00 0a 20 20 20 20 5c 63 6f 70 79 5c 72 75 6c 65 40 74 x.to.\hsize{%.......\copy\rule@t
1e40 68 65 6e 40 62 6f 78 0d 00 0a 20 20 20 20 5c 76 74 6f 70 7b 25 0d 00 0a 20 20 20 20 20 20 5c 61 hen@box.......\vtop{%.........\a
1e60 64 76 61 6e 63 65 5c 68 73 69 7a 65 20 62 79 20 2d 5c 77 64 5c 72 75 6c 65 40 74 68 65 6e 40 62 dvance\hsize.by.-\wd\rule@then@b
1e80 6f 78 0d 00 0a 20 20 20 20 20 20 5c 76 74 6f 70 5c 62 67 72 6f 75 70 20 20 20 20 20 20 20 20 20 ox.........\vtop\bgroup.........
1ea0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 25 20 62 65 67 69 6e 20 6f 66 20 66 69 72 73 74 20 76 ..............%.begin.of.first.v
1ec0 74 6f 70 0d 00 0a 20 20 20 20 20 20 20 20 5c 6e 6f 69 6e 64 65 6e 74 5c 73 74 72 75 74 5c 69 67 top...........\noindent\strut\ig
1ee0 6e 6f 72 65 73 70 61 63 65 73 20 23 31 5c 75 6e 73 6b 69 70 5c 73 74 72 75 74 29 23 32 25 20 72 norespaces.#1\unskip\strut)#2%.r
1f00 69 67 68 74 20 70 61 72 65 6e 74 68 65 73 65 73 0d 00 0a 20 20 20 20 20 20 5c 65 67 72 6f 75 70 ight.parentheses.........\egroup
1f20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 25 20 65 6e ............................%.en
1f40 64 20 6f 66 20 6c 61 73 74 20 76 74 6f 70 0d 00 0a 20 20 20 20 7d 25 0d 00 0a 20 20 7d 25 0d 00 d.of.last.vtop.......}%.....}%..
1f60 0a 20 20 5c 69 67 6e 6f 72 65 73 70 61 63 65 73 0d 00 0a 7d 0d 00 0a 0d 00 0a 0d 00 0a 5c 64 65 ...\ignorespaces...}.........\de
1f80 66 5c 52 55 4c 45 40 41 4e 44 7b 25 0d 00 0a 20 20 20 20 20 20 20 20 5c 75 6e 73 6b 69 70 5c 73 f\RULE@AND{%...........\unskip\s
1fa0 74 72 75 74 0d 00 0a 20 20 20 20 20 20 5c 65 67 72 6f 75 70 20 20 20 20 20 20 20 20 20 20 20 20 trut.........\egroup............
1fc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 25 20 65 6e 64 20 6f 66 20 70 72 65 76 ...................%.end.of.prev
1fe0 69 6f 75 73 20 76 74 6f 70 0d 00 0a 20 20 20 20 20 20 5c 76 74 6f 70 5c 62 67 72 6f 75 70 20 20 ious.vtop.........\vtop\bgroup..
2000 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 25 20 62 65 67 69 6e 20 ........................%.begin.
2020 6f 66 20 6e 65 78 74 20 76 74 6f 70 0d 00 0a 20 20 20 20 20 20 20 20 5c 6e 6f 69 6e 64 65 6e 74 of.next.vtop...........\noindent
2040 5c 63 6f 70 79 5c 72 75 6c 65 40 61 6e 64 40 62 6f 78 5c 73 74 72 75 74 20 20 20 25 20 41 4e 44 \copy\rule@and@box\strut...%.AND
2060 20 6b 65 79 77 6f 72 64 0d 00 0a 7d 0d 00 0a 0d 00 0a 0d 00 0a 5c 64 65 66 5c 52 55 4c 45 40 4f .keyword...}.........\def\RULE@O
2080 52 7b 25 0d 00 0a 20 20 20 20 20 20 20 20 5c 75 6e 73 6b 69 70 5c 73 74 72 75 74 0d 00 0a 20 20 R{%...........\unskip\strut.....
20a0 20 20 20 20 5c 65 67 72 6f 75 70 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ....\egroup.....................
20c0 20 20 20 20 20 20 20 20 20 20 25 20 65 6e 64 20 6f 66 20 70 72 65 76 69 6f 75 73 20 76 74 6f 70 ..........%.end.of.previous.vtop
20e0 0d 00 0a 20 20 20 20 20 20 5c 76 74 6f 70 5c 62 67 72 6f 75 70 20 20 20 20 20 20 20 20 20 20 20 .........\vtop\bgroup...........
2100 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 25 20 62 65 67 69 6e 20 6f 66 20 6e 65 78 74 20 76 ...............%.begin.of.next.v
2120 74 6f 70 0d 00 0a 20 20 20 20 20 20 20 20 5c 6e 6f 69 6e 64 65 6e 74 5c 63 6f 70 79 5c 72 75 6c top...........\noindent\copy\rul
2140 65 40 6f 72 40 62 6f 78 5c 73 74 72 75 74 20 20 20 20 25 20 4f 52 20 6b 65 79 77 6f 72 64 0d 00 e@or@box\strut....%.OR.keyword..
2160 0a 7d 0d 00 0a 0d 00 0a 25 25 25 20 7d 20 42 52 41 43 45 20 4d 41 54 43 48 49 4e 47 20 48 41 43 .}......%%%.}.BRACE.MATCHING.HAC
2180 4b 0d 00 0a K...