/ APDL Public Domain 1 / APDL_PD1A.iso / textutil / tex / source / latex_2e_1 / ifthen.sty

< prev

next >

MacOS 8.1

Win98

DOS

browse contents

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 25 25 20 0a 25 25 20 54 | 68 69 73 20 69 73 20 66 |%% .%% T|his is f|
|00000010| 69 6c 65 20 60 69 66 74 | 68 65 6e 2e 73 74 79 27 |ile `ift|hen.sty'|
|00000020| 2c 20 67 65 6e 65 72 61 | 74 65 64 20 0a 25 25 20 |, genera|ted .%% |
|00000030| 6f 6e 20 3c 31 39 39 34 | 2f 39 2f 32 36 3e 20 77 |on <1994|/9/26> w|
|00000040| 69 74 68 20 74 68 65 20 | 64 6f 63 73 74 72 69 70 |ith the |docstrip|
|00000050| 20 75 74 69 6c 69 74 79 | 20 28 32 2e 32 68 29 2e | utility| (2.2h).|
|00000060| 0a 25 25 20 0a 25 25 20 | 54 68 65 20 6f 72 69 67 |.%% .%% |The orig|
|00000070| 69 6e 61 6c 20 73 6f 75 | 72 63 65 20 66 69 6c 65 |inal sou|rce file|
|00000080| 73 20 77 65 72 65 3a 0a | 25 25 20 0a 25 25 20 69 |s were:.|%% .%% i|
|00000090| 66 74 68 65 6e 2e 64 74 | 78 20 20 28 77 69 74 68 |fthen.dt|x  (with|
|000000a0| 20 6f 70 74 69 6f 6e 73 | 3a 20 60 70 61 63 6b 61 | options|: `packa|
|000000b0| 67 65 27 29 0a 25 25 20 | 0a 25 25 20 43 6f 70 79 |ge').%% |.%% Copy|
|000000c0| 72 69 67 68 74 20 31 39 | 39 34 20 74 68 65 20 4c |right 19|94 the L|
|000000d0| 61 54 65 58 33 20 70 72 | 6f 6a 65 63 74 20 61 6e |aTeX3 pr|oject an|
|000000e0| 64 20 74 68 65 20 69 6e | 64 69 76 69 64 75 61 6c |d the in|dividual|
|000000f0| 20 61 75 74 68 6f 72 73 | 2e 20 0a 25 25 20 41 6c | authors|. .%% Al|
|00000100| 6c 20 72 69 67 68 74 73 | 20 72 65 73 65 72 76 65 |l rights| reserve|
|00000110| 64 2e 20 46 6f 72 20 66 | 75 72 74 68 65 72 20 63 |d. For f|urther c|
|00000120| 6f 70 79 72 69 67 68 74 | 20 69 6e 66 6f 72 6d 61 |opyright| informa|
|00000130| 74 69 6f 6e 20 73 65 65 | 20 74 68 65 20 66 69 6c |tion see| the fil|
|00000140| 65 20 0a 25 25 20 6c 65 | 67 61 6c 2e 74 78 74 2c |e .%% le|gal.txt,|
|00000150| 20 61 6e 64 20 61 6e 79 | 20 6f 74 68 65 72 20 63 | and any| other c|
|00000160| 6f 70 79 72 69 67 68 74 | 20 69 6e 64 69 63 61 74 |opyright| indicat|
|00000170| 65 64 20 69 6e 20 74 68 | 69 73 20 66 69 6c 65 2e |ed in th|is file.|
|00000180| 20 0a 25 25 20 0a 25 25 | 20 54 68 69 73 20 66 69 | .%% .%%| This fi|
|00000190| 6c 65 20 69 73 20 70 61 | 72 74 20 6f 66 20 74 68 |le is pa|rt of th|
|000001a0| 65 20 4c 61 54 65 58 32 | 65 20 73 79 73 74 65 6d |e LaTeX2|e system|
|000001b0| 2e 20 0a 25 25 20 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |. .%% --|--------|
|000001c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000001d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 20 0a |--------|------ .|
|000001e0| 25 25 20 0a 25 25 20 54 | 68 69 73 20 73 79 73 74 |%% .%% T|his syst|
|000001f0| 65 6d 20 69 73 20 64 69 | 73 74 72 69 62 75 74 65 |em is di|stribute|
|00000200| 64 20 69 6e 20 74 68 65 | 20 68 6f 70 65 20 74 68 |d in the| hope th|
|00000210| 61 74 20 69 74 20 77 69 | 6c 6c 20 62 65 20 75 73 |at it wi|ll be us|
|00000220| 65 66 75 6c 2c 20 0a 25 | 25 20 62 75 74 20 57 49 |eful, .%|% but WI|
|00000230| 54 48 4f 55 54 20 41 4e | 59 20 57 41 52 52 41 4e |THOUT AN|Y WARRAN|
|00000240| 54 59 3b 20 77 69 74 68 | 6f 75 74 20 65 76 65 6e |TY; with|out even|
|00000250| 20 74 68 65 20 69 6d 70 | 6c 69 65 64 20 77 61 72 | the imp|lied war|
|00000260| 72 61 6e 74 79 20 6f 66 | 20 0a 25 25 20 4d 45 52 |ranty of| .%% MER|
|00000270| 43 48 41 4e 54 41 42 49 | 4c 49 54 59 20 6f 72 20 |CHANTABI|LITY or |
|00000280| 46 49 54 4e 45 53 53 20 | 46 4f 52 20 41 20 50 41 |FITNESS |FOR A PA|
|00000290| 52 54 49 43 55 4c 41 52 | 20 50 55 52 50 4f 53 45 |RTICULAR| PURPOSE|
|000002a0| 2e 20 0a 25 25 20 0a 25 | 25 20 0a 25 25 20 49 4d |. .%% .%|% .%% IM|
|000002b0| 50 4f 52 54 41 4e 54 20 | 4e 4f 54 49 43 45 3a 20 |PORTANT |NOTICE: |
|000002c0| 0a 25 25 20 0a 25 25 20 | 46 6f 72 20 65 72 72 6f |.%% .%% |For erro|
|000002d0| 72 20 72 65 70 6f 72 74 | 73 20 69 6e 20 63 61 73 |r report|s in cas|
|000002e0| 65 20 6f 66 20 55 4e 43 | 48 41 4e 47 45 44 20 76 |e of UNC|HANGED v|
|000002f0| 65 72 73 69 6f 6e 73 20 | 73 65 65 20 62 75 67 73 |ersions |see bugs|
|00000300| 2e 74 78 74 2e 20 0a 25 | 25 20 0a 25 25 20 50 6c |.txt. .%|% .%% Pl|
|00000310| 65 61 73 65 20 64 6f 20 | 6e 6f 74 20 72 65 71 75 |ease do |not requ|
|00000320| 65 73 74 20 75 70 64 61 | 74 65 73 20 66 72 6f 6d |est upda|tes from|
|00000330| 20 75 73 20 64 69 72 65 | 63 74 6c 79 2e 20 44 69 | us dire|ctly. Di|
|00000340| 73 74 72 69 62 75 74 69 | 6f 6e 20 69 73 20 0a 25 |stributi|on is .%|
|00000350| 25 20 64 6f 6e 65 20 74 | 68 72 6f 75 67 68 20 4d |% done t|hrough M|
|00000360| 61 69 6c 2d 53 65 72 76 | 65 72 73 20 61 6e 64 20 |ail-Serv|ers and |
|00000370| 54 65 58 20 6f 72 67 61 | 6e 69 7a 61 74 69 6f 6e |TeX orga|nization|
|00000380| 73 2e 20 0a 25 25 20 0a | 25 25 20 59 6f 75 20 61 |s. .%% .|%% You a|
|00000390| 72 65 20 6e 6f 74 20 61 | 6c 6c 6f 77 65 64 20 74 |re not a|llowed t|
|000003a0| 6f 20 63 68 61 6e 67 65 | 20 74 68 69 73 20 66 69 |o change| this fi|
|000003b0| 6c 65 2e 20 0a 25 25 20 | 0a 25 25 20 59 6f 75 20 |le. .%% |.%% You |
|000003c0| 61 72 65 20 61 6c 6c 6f | 77 65 64 20 74 6f 20 64 |are allo|wed to d|
|000003d0| 69 73 74 72 69 62 75 74 | 65 20 74 68 69 73 20 66 |istribut|e this f|
|000003e0| 69 6c 65 20 75 6e 64 65 | 72 20 74 68 65 20 63 6f |ile unde|r the co|
|000003f0| 6e 64 69 74 69 6f 6e 20 | 74 68 61 74 20 0a 25 25 |ndition |that .%%|
|00000400| 20 69 74 20 69 73 20 64 | 69 73 74 72 69 62 75 74 | it is d|istribut|
|00000410| 65 64 20 74 6f 67 65 74 | 68 65 72 20 77 69 74 68 |ed toget|her with|
|00000420| 20 61 6c 6c 20 66 69 6c | 65 73 20 6d 65 6e 74 69 | all fil|es menti|
|00000430| 6f 6e 65 64 20 69 6e 20 | 6d 61 6e 69 66 65 73 74 |oned in |manifest|
|00000440| 2e 74 78 74 2e 20 0a 25 | 25 20 0a 25 25 20 49 66 |.txt. .%|% .%% If|
|00000450| 20 79 6f 75 20 72 65 63 | 65 69 76 65 20 6f 6e 6c | you rec|eive onl|
|00000460| 79 20 73 6f 6d 65 20 6f | 66 20 74 68 65 73 65 20 |y some o|f these |
|00000470| 66 69 6c 65 73 20 66 72 | 6f 6d 20 73 6f 6d 65 6f |files fr|om someo|
|00000480| 6e 65 2c 20 63 6f 6d 70 | 6c 61 69 6e 21 20 0a 25 |ne, comp|lain! .%|
|00000490| 25 20 0a 25 25 20 59 6f | 75 20 61 72 65 20 4e 4f |% .%% Yo|u are NO|
|000004a0| 54 20 41 4c 4c 4f 57 45 | 44 20 74 6f 20 64 69 73 |T ALLOWE|D to dis|
|000004b0| 74 72 69 62 75 74 65 20 | 74 68 69 73 20 66 69 6c |tribute |this fil|
|000004c0| 65 20 61 6c 6f 6e 65 2e | 20 59 6f 75 20 61 72 65 |e alone.| You are|
|000004d0| 20 4e 4f 54 20 0a 25 25 | 20 41 4c 4c 4f 57 45 44 | NOT .%%| ALLOWED|
|000004e0| 20 74 6f 20 74 61 6b 65 | 20 6d 6f 6e 65 79 20 66 | to take| money f|
|000004f0| 6f 72 20 74 68 65 20 64 | 69 73 74 72 69 62 75 74 |or the d|istribut|
|00000500| 69 6f 6e 20 6f 72 20 75 | 73 65 20 6f 66 20 65 69 |ion or u|se of ei|
|00000510| 74 68 65 72 20 74 68 69 | 73 20 0a 25 25 20 66 69 |ther thi|s .%% fi|
|00000520| 6c 65 20 6f 72 20 61 20 | 63 68 61 6e 67 65 64 20 |le or a |changed |
|00000530| 76 65 72 73 69 6f 6e 2c | 20 65 78 63 65 70 74 20 |version,| except |
|00000540| 66 6f 72 20 61 20 6e 6f | 6d 69 6e 61 6c 20 63 68 |for a no|minal ch|
|00000550| 61 72 67 65 20 66 6f 72 | 20 63 6f 70 79 69 6e 67 |arge for| copying|
|00000560| 20 0a 25 25 20 65 74 63 | 2e 20 0a 25 25 0a 25 25 | .%% etc|. .%%.%%|
|00000570| 20 46 69 6c 65 20 60 69 | 66 74 68 65 6e 2e 64 74 | File `i|fthen.dt|
|00000580| 78 27 2e 0a 25 25 20 43 | 6f 70 79 72 69 67 68 74 |x'..%% C|opyright|
|00000590| 20 28 43 29 20 31 39 39 | 31 20 62 79 20 4c 65 73 | (C) 199|1 by Les|
|000005a0| 6c 69 65 20 4c 61 6d 70 | 6f 72 74 0a 25 25 20 43 |lie Lamp|ort.%% C|
|000005b0| 6f 70 79 72 69 67 68 74 | 20 28 43 29 20 31 39 39 |opyright| (C) 199|
|000005c0| 34 2c 20 31 39 39 34 20 | 4c 61 54 65 58 33 20 70 |4, 1994 |LaTeX3 p|
|000005d0| 72 6f 6a 65 63 74 2c 20 | 44 61 76 69 64 20 43 61 |roject, |David Ca|
|000005e0| 72 6c 69 73 6c 65 0a 25 | 25 20 20 20 20 20 20 20 |rlisle.%|%       |
|000005f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000600| 61 6c 6c 20 72 69 67 68 | 74 73 20 72 65 73 65 72 |all righ|ts reser|
|00000610| 76 65 64 2e 0a 25 25 0a | 5c 4e 65 65 64 73 54 65 |ved..%%.|\NeedsTe|
|00000620| 58 46 6f 72 6d 61 74 7b | 4c 61 54 65 58 32 65 7d |XFormat{|LaTeX2e}|
|00000630| 5b 31 39 39 34 2f 30 35 | 2f 32 32 5d 0a 5c 50 72 |[1994/05|/22].\Pr|
|00000640| 6f 76 69 64 65 73 50 61 | 63 6b 61 67 65 7b 69 66 |ovidesPa|ckage{if|
|00000650| 74 68 65 6e 7d 0a 20 20 | 20 20 20 20 20 20 5b 31 |then}.  |      [1|
|00000660| 39 39 34 2f 30 35 2f 32 | 37 20 76 31 2e 30 69 20 |994/05/2|7 v1.0i |
|00000670| 53 74 61 6e 64 61 72 64 | 20 4c 61 54 65 58 20 69 |Standard| LaTeX i|
|00000680| 66 74 68 65 6e 20 70 61 | 63 6b 61 67 65 20 28 44 |fthen pa|ckage (D|
|00000690| 50 43 29 5d 0a 5c 64 65 | 66 5c 54 45 40 74 68 72 |PC)].\de|f\TE@thr|
|000006a0| 6f 77 7b 5c 40 6e 65 3d | 5c 40 6e 65 5c 6e 6f 65 |ow{\@ne=|\@ne\noe|
|000006b0| 78 70 61 6e 64 5c 66 69 | 7d 0a 5c 64 65 66 5c 62 |xpand\fi|}.\def\b|
|000006c0| 6f 6f 6c 65 61 6e 23 31 | 23 32 7b 25 0a 20 20 5c |oolean#1|#2{%.  \|
|000006d0| 54 45 40 74 68 72 6f 77 | 5c 65 78 70 61 6e 64 61 |TE@throw|\expanda|
|000006e0| 66 74 65 72 5c 6e 6f 65 | 78 70 61 6e 64 5c 63 73 |fter\noe|xpand\cs|
|000006f0| 6e 61 6d 65 20 69 66 23 | 31 5c 65 6e 64 63 73 6e |name if#|1\endcsn|
|00000700| 61 6d 65 23 32 7d 0a 5c | 64 65 66 5c 54 45 40 6c |ame#2}.\|def\TE@l|
|00000710| 65 6e 67 74 68 23 31 23 | 32 7b 5c 54 45 40 74 68 |ength#1#|2{\TE@th|
|00000720| 72 6f 77 5c 6e 6f 65 78 | 70 61 6e 64 5c 69 66 64 |row\noex|pand\ifd|
|00000730| 69 6d 23 31 23 32 7d 0a | 5c 64 65 66 5c 54 45 40 |im#1#2}.|\def\TE@|
|00000740| 6f 64 64 23 31 23 32 7b | 25 0a 20 20 5c 54 45 40 |odd#1#2{|%.  \TE@|
|00000750| 74 68 72 6f 77 5c 6e 6f | 65 78 70 61 6e 64 5c 54 |throw\no|expand\T|
|00000760| 45 40 40 6f 64 64 23 31 | 5c 6e 6f 65 78 70 61 6e |E@@odd#1|\noexpan|
|00000770| 64 5c 40 6e 69 6c 5c 6e | 6f 65 78 70 61 6e 64 5c |d\@nil\n|oexpand\|
|00000780| 69 66 6f 64 64 5c 63 6f | 75 6e 74 40 23 32 7d 0a |ifodd\co|unt@#2}.|
|00000790| 5c 64 65 66 5c 54 45 40 | 40 6f 64 64 23 31 23 32 |\def\TE@|@odd#1#2|
|000007a0| 5c 40 6e 69 6c 7b 25 0a | 20 20 5c 40 64 65 66 61 |\@nil{%.|  \@defa|
|000007b0| 75 6c 74 75 6e 69 74 73 | 0a 20 20 5c 63 6f 75 6e |ultunits|.  \coun|
|000007c0| 74 40 5c 69 66 2d 23 31 | 2d 30 5c 65 6c 73 65 30 |t@\if-#1|-0\else0|
|000007d0| 5c 65 78 70 61 6e 64 61 | 66 74 65 72 23 31 5c 66 |\expanda|fter#1\f|
|000007e0| 69 23 32 5c 72 65 6c 61 | 78 5c 40 6e 6e 69 6c 7d |i#2\rela|x\@nnil}|
|000007f0| 0a 5c 64 65 66 5c 54 45 | 40 72 65 70 6c 23 31 23 |.\def\TE|@repl#1#|
|00000800| 32 7b 25 0a 20 20 5c 6c | 6f 6e 67 5c 64 65 66 5c |2{%.  \l|ong\def\|
|00000810| 40 74 65 6d 70 63 23 23 | 31 23 31 23 23 32 7b 25 |@tempc##|1#1##2{%|
|00000820| 0a 20 20 20 20 5c 64 65 | 66 5c 40 74 65 6d 70 61 |.    \de|f\@tempa|
|00000830| 7b 23 23 32 7d 5c 64 65 | 66 5c 40 74 65 6d 70 62 |{##2}\de|f\@tempb|
|00000840| 7b 5c 40 74 65 6d 70 63 | 7d 25 0a 20 20 20 20 5c |{\@tempc|}%.    \|
|00000850| 69 66 78 5c 40 74 65 6d | 70 61 5c 40 74 65 6d 70 |ifx\@tem|pa\@temp|
|00000860| 62 0a 20 20 20 20 20 5c | 74 6f 6b 73 40 5c 65 78 |b.     \|toks@\ex|
|00000870| 70 61 6e 64 61 66 74 65 | 72 7b 5c 74 68 65 5c 74 |pandafte|r{\the\t|
|00000880| 6f 6b 73 40 23 23 31 7d | 25 0a 20 20 20 20 20 5c |oks@##1}|%.     \|
|00000890| 65 78 70 61 6e 64 61 66 | 74 65 72 5c 40 67 6f 62 |expandaf|ter\@gob|
|000008a0| 62 6c 65 0a 20 20 20 20 | 5c 65 6c 73 65 0a 20 20 |ble.    |\else.  |
|000008b0| 20 20 20 20 5c 74 6f 6b | 73 40 5c 65 78 70 61 6e |    \tok|s@\expan|
|000008c0| 64 61 66 74 65 72 7b 5c | 74 68 65 5c 74 6f 6b 73 |dafter{\|the\toks|
|000008d0| 40 23 23 31 23 32 7d 25 | 0a 20 20 20 20 5c 65 78 |@##1#2}%|.    \ex|
|000008e0| 70 61 6e 64 61 66 74 65 | 72 5c 40 74 65 6d 70 63 |pandafte|r\@tempc|
|000008f0| 0a 20 20 20 20 5c 66 69 | 0a 20 20 20 20 23 23 32 |.    \fi|.    ##2|
|00000900| 7d 25 0a 20 20 5c 65 78 | 70 61 6e 64 61 66 74 65 |}%.  \ex|pandafte|
|00000910| 72 5c 74 6f 6b 73 40 5c | 65 78 70 61 6e 64 61 66 |r\toks@\|expandaf|
|00000920| 74 65 72 7b 5c 65 78 70 | 61 6e 64 61 66 74 65 72 |ter{\exp|andafter|
|00000930| 7d 25 0a 20 20 5c 65 78 | 70 61 6e 64 61 66 74 65 |}%.  \ex|pandafte|
|00000940| 72 5c 40 74 65 6d 70 63 | 5c 74 68 65 5c 74 6f 6b |r\@tempc|\the\tok|
|00000950| 73 40 23 31 5c 40 74 65 | 6d 70 63 7d 0a 5c 6c 6f |s@#1\@te|mpc}.\lo|
|00000960| 6e 67 5c 64 65 66 5c 69 | 66 74 68 65 6e 65 6c 73 |ng\def\i|fthenels|
|00000970| 65 23 31 7b 25 0a 5c 74 | 6f 6b 73 40 7b 23 31 7d |e#1{%.\t|oks@{#1}|
|00000980| 25 0a 5c 54 45 40 72 65 | 70 6c 5c 6f 72 5c 54 45 |%.\TE@re|pl\or\TE|
|00000990| 40 6f 72 0a 5c 54 45 40 | 72 65 70 6c 5c 61 6e 64 |@or.\TE@|repl\and|
|000009a0| 5c 54 45 40 61 6e 64 0a | 5c 54 45 40 72 65 70 6c |\TE@and.|\TE@repl|
|000009b0| 5c 6e 6f 74 5c 54 45 40 | 6e 65 67 0a 20 20 20 20 |\not\TE@|neg.    |
|000009c0| 5c 62 67 72 6f 75 70 0a | 20 20 20 20 20 20 20 20 |\bgroup.|        |
|000009d0| 5c 64 65 66 5c 70 72 6f | 74 65 63 74 7b 5c 6e 6f |\def\pro|tect{\no|
|000009e0| 65 78 70 61 6e 64 5c 70 | 72 6f 74 65 63 74 5c 6e |expand\p|rotect\n|
|000009f0| 6f 65 78 70 61 6e 64 7d | 25 0a 20 20 20 20 20 20 |oexpand}|%.      |
|00000a00| 20 20 5c 64 65 66 5c 76 | 61 6c 75 65 23 23 31 7b |  \def\v|alue##1{|
|00000a10| 5c 74 68 65 5c 63 73 6e | 61 6d 65 20 63 40 23 23 |\the\csn|ame c@##|
|00000a20| 31 5c 65 6e 64 63 73 6e | 61 6d 65 7d 25 0a 20 20 |1\endcsn|ame}%.  |
|00000a30| 20 20 20 20 20 20 5c 6c | 65 74 5c 65 71 75 61 6c |      \l|et\equal|
|00000a40| 5c 54 45 40 65 71 75 61 | 6c 20 5c 6c 65 74 5c 28 |\TE@equa|l \let\(|
|00000a50| 5c 54 45 40 6c 70 61 72 | 65 6e 20 5c 6c 65 74 5c |\TE@lpar|en \let\|
|00000a60| 29 5c 54 45 40 72 70 61 | 72 65 6e 0a 20 20 20 20 |)\TE@rpa|ren.    |
|00000a70| 20 20 20 20 5c 6c 65 74 | 5c 69 73 6f 64 64 5c 54 |    \let|\isodd\T|
|00000a80| 45 40 6f 64 64 20 5c 6c | 65 74 5c 6c 65 6e 67 74 |E@odd \l|et\lengt|
|00000a90| 68 74 65 73 74 5c 54 45 | 40 6c 65 6e 67 74 68 0a |htest\TE|@length.|
|00000aa0| 20 20 20 20 20 20 20 20 | 7b 5c 6c 65 74 5c 40 74 |        |{\let\@t|
|00000ab0| 65 6d 70 61 5c 72 65 6c | 61 78 5c 6c 65 74 5c 40 |empa\rel|ax\let\@|
|00000ac0| 74 65 6d 70 62 5c 72 65 | 6c 61 78 0a 20 20 20 20 |tempb\re|lax.    |
|00000ad0| 20 20 20 20 5c 78 64 65 | 66 5c 40 67 74 65 6d 70 |    \xde|f\@gtemp|
|00000ae0| 61 7b 5c 65 78 70 61 6e | 64 61 66 74 65 72 5c 54 |a{\expan|dafter\T|
|00000af0| 45 40 65 76 61 6c 5c 74 | 68 65 5c 74 6f 6b 73 40 |E@eval\t|he\toks@|
|00000b00| 5c 54 45 40 65 6e 64 65 | 76 61 6c 7d 7d 25 0a 20 |\TE@ende|val}}%. |
|00000b10| 20 20 20 20 20 20 20 5c | 40 67 74 65 6d 70 61 0a |       \|@gtempa.|
|00000b20| 20 20 20 20 20 20 20 20 | 5c 65 78 70 61 6e 64 61 |        |\expanda|
|00000b30| 66 74 65 72 5c 65 67 72 | 6f 75 70 5c 69 66 54 45 |fter\egr|oup\ifTE|
|00000b40| 40 76 61 6c 0a 20 20 20 | 20 20 20 20 20 20 20 5c |@val.   |       \|
|00000b50| 65 78 70 61 6e 64 61 66 | 74 65 72 5c 40 66 69 72 |expandaf|ter\@fir|
|00000b60| 73 74 6f 66 74 77 6f 0a | 20 20 20 20 20 20 20 20 |stoftwo.|        |
|00000b70| 5c 65 6c 73 65 0a 20 20 | 20 20 20 20 20 20 20 20 |\else.  |        |
|00000b80| 5c 65 78 70 61 6e 64 61 | 66 74 65 72 5c 40 73 65 |\expanda|fter\@se|
|00000b90| 63 6f 6e 64 6f 66 74 77 | 6f 0a 20 20 20 20 20 20 |condoftw|o.      |
|00000ba0| 20 20 5c 66 69 7d 0a 5c | 64 65 66 5c 54 45 40 65 |  \fi}.\|def\TE@e|
|00000bb0| 76 61 6c 7b 5c 6e 6f 65 | 78 70 61 6e 64 5c 54 45 |val{\noe|xpand\TE|
|00000bc0| 40 6e 65 67 61 74 65 66 | 61 6c 73 65 5c 6e 6f 65 |@negatef|alse\noe|
|00000bd0| 78 70 61 6e 64 5c 69 66 | 74 72 75 65 5c 6e 6f 65 |xpand\if|true\noe|
|00000be0| 78 70 61 6e 64 5c 69 66 | 6e 75 6d 7d 0a 5c 6e 65 |xpand\if|num}.\ne|
|00000bf0| 77 69 66 5c 69 66 54 45 | 40 76 61 6c 0a 5c 6e 65 |wif\ifTE|@val.\ne|
|00000c00| 77 69 66 5c 69 66 54 45 | 40 6e 65 67 61 74 65 0a |wif\ifTE|@negate.|
|00000c10| 5c 64 65 66 5c 54 45 40 | 65 6e 64 65 76 61 6c 7b |\def\TE@|endeval{|
|00000c20| 5c 72 65 6c 61 78 0a 20 | 20 20 20 20 20 5c 6e 6f |\relax. |     \no|
|00000c30| 65 78 70 61 6e 64 5c 54 | 45 40 73 65 74 76 61 6c |expand\T|E@setval|
|00000c40| 74 72 75 65 5c 6e 6f 65 | 78 70 61 6e 64 0a 20 20 |true\noe|xpand.  |
|00000c50| 20 20 5c 65 6c 73 65 0a | 20 20 20 20 20 20 5c 6e |  \else.|      \n|
|00000c60| 6f 65 78 70 61 6e 64 5c | 54 45 40 73 65 74 76 61 |oexpand\|TE@setva|
|00000c70| 6c 66 61 6c 73 65 5c 6e | 6f 65 78 70 61 6e 64 0a |lfalse\n|oexpand.|
|00000c80| 20 20 20 20 5c 66 69 0a | 20 20 20 20 5c 6e 6f 65 |    \fi.|    \noe|
|00000c90| 78 70 61 6e 64 5c 54 45 | 40 6e 65 67 61 74 65 66 |xpand\TE|@negatef|
|00000ca0| 61 6c 73 65 5c 6e 6f 65 | 78 70 61 6e 64 0a 20 20 |alse\noe|xpand.  |
|00000cb0| 5c 66 69 7d 0a 5c 64 65 | 66 5c 54 45 40 73 65 74 |\fi}.\de|f\TE@set|
|00000cc0| 76 61 6c 74 72 75 65 7b | 25 0a 20 20 5c 69 66 54 |valtrue{|%.  \ifT|
|00000cd0| 45 40 6e 65 67 61 74 65 | 5c 54 45 40 76 61 6c 66 |E@negate|\TE@valf|
|00000ce0| 61 6c 73 65 5c 65 6c 73 | 65 5c 54 45 40 76 61 6c |alse\els|e\TE@val|
|00000cf0| 74 72 75 65 5c 66 69 7d | 0a 5c 64 65 66 5c 54 45 |true\fi}|.\def\TE|
|00000d00| 40 73 65 74 76 61 6c 66 | 61 6c 73 65 7b 5c 6c 65 |@setvalf|alse{\le|
|00000d10| 74 5c 69 66 54 45 40 76 | 61 6c 5c 69 66 54 45 40 |t\ifTE@v|al\ifTE@|
|00000d20| 6e 65 67 61 74 65 7d 0a | 5c 64 65 66 5c 54 45 40 |negate}.|\def\TE@|
|00000d30| 6f 72 7b 5c 54 45 40 65 | 6e 64 65 76 61 6c 5c 6e |or{\TE@e|ndeval\n|
|00000d40| 6f 65 78 70 61 6e 64 5c | 69 66 54 45 40 76 61 6c |oexpand\|ifTE@val|
|00000d50| 5c 6e 6f 65 78 70 61 6e | 64 5c 65 6c 73 65 5c 6e |\noexpan|d\else\n|
|00000d60| 6f 65 78 70 61 6e 64 5c | 69 66 6e 75 6d 7d 0a 5c |oexpand\|ifnum}.\|
|00000d70| 64 65 66 5c 54 45 40 61 | 6e 64 7b 5c 54 45 40 65 |def\TE@a|nd{\TE@e|
|00000d80| 6e 64 65 76 61 6c 5c 6e | 6f 65 78 70 61 6e 64 5c |ndeval\n|oexpand\|
|00000d90| 69 66 54 45 40 76 61 6c | 5c 6e 6f 65 78 70 61 6e |ifTE@val|\noexpan|
|00000da0| 64 5c 69 66 6e 75 6d 7d | 0a 5c 64 65 66 5c 54 45 |d\ifnum}|.\def\TE|
|00000db0| 40 6e 65 67 7b 5c 54 45 | 40 74 68 72 6f 77 5c 6e |@neg{\TE|@throw\n|
|00000dc0| 6f 65 78 70 61 6e 64 5c | 54 45 40 6e 65 67 73 77 |oexpand\|TE@negsw|
|00000dd0| 69 74 63 68 5c 6e 6f 65 | 78 70 61 6e 64 5c 69 66 |itch\noe|xpand\if|
|00000de0| 6e 75 6d 7d 0a 5c 64 65 | 66 5c 54 45 40 6e 65 67 |num}.\de|f\TE@neg|
|00000df0| 73 77 69 74 63 68 7b 5c | 69 66 54 45 40 6e 65 67 |switch{\|ifTE@neg|
|00000e00| 61 74 65 5c 54 45 40 6e | 65 67 61 74 65 66 61 6c |ate\TE@n|egatefal|
|00000e10| 73 65 5c 65 6c 73 65 5c | 54 45 40 6e 65 67 61 74 |se\else\|TE@negat|
|00000e20| 65 74 72 75 65 5c 66 69 | 7d 0a 5c 64 65 66 5c 54 |etrue\fi|}.\def\T|
|00000e30| 45 40 6c 70 61 72 65 6e | 23 31 7b 5c 54 45 40 74 |E@lparen|#1{\TE@t|
|00000e40| 68 72 6f 77 5c 62 65 67 | 69 6e 67 72 6f 75 70 5c |hrow\beg|ingroup\|
|00000e50| 54 45 40 65 76 61 6c 23 | 31 7d 0a 5c 64 65 66 5c |TE@eval#|1}.\def\|
|00000e60| 54 45 40 72 70 61 72 65 | 6e 23 31 7b 25 0a 20 20 |TE@rpare|n#1{%.  |
|00000e70| 5c 54 45 40 65 6e 64 65 | 76 61 6c 0a 20 20 5c 6e |\TE@ende|val.  \n|
|00000e80| 6f 65 78 70 61 6e 64 5c | 65 78 70 61 6e 64 61 66 |oexpand\|expandaf|
|00000e90| 74 65 72 5c 65 6e 64 67 | 72 6f 75 70 5c 6e 6f 65 |ter\endg|roup\noe|
|00000ea0| 78 70 61 6e 64 5c 69 66 | 54 45 40 76 61 6c 23 31 |xpand\if|TE@val#1|
|00000eb0| 7d 0a 5c 6c 6f 6e 67 5c | 64 65 66 5c 54 45 40 65 |}.\long\|def\TE@e|
|00000ec0| 71 75 61 6c 23 31 23 32 | 23 33 7b 5c 54 45 40 74 |qual#1#2|#3{\TE@t|
|00000ed0| 68 72 6f 77 0a 20 20 20 | 20 20 20 5c 64 65 66 5c |hrow.   |   \def\|
|00000ee0| 40 74 65 6d 70 61 7b 23 | 31 7d 5c 64 65 66 5c 40 |@tempa{#|1}\def\@|
|00000ef0| 74 65 6d 70 62 7b 23 32 | 7d 25 0a 20 20 20 20 20 |tempb{#2|}%.     |
|00000f00| 20 5c 6e 6f 65 78 70 61 | 6e 64 5c 69 66 78 5c 40 | \noexpa|nd\ifx\@|
|00000f10| 74 65 6d 70 61 5c 40 74 | 65 6d 70 62 23 33 7d 0a |tempa\@t|empb#3}.|
|00000f20| 5c 64 65 66 5c 73 65 74 | 62 6f 6f 6c 65 61 6e 23 |\def\set|boolean#|
|00000f30| 31 23 32 7b 25 0a 20 20 | 5c 6c 6f 77 65 72 63 61 |1#2{%.  |\lowerca|
|00000f40| 73 65 7b 5c 64 65 66 5c | 40 74 65 6d 70 61 7b 23 |se{\def\|@tempa{#|
|00000f50| 32 7d 7d 25 0a 20 20 5c | 40 69 66 75 6e 64 65 66 |2}}%.  \|@ifundef|
|00000f60| 69 6e 65 64 7b 40 74 65 | 6d 70 73 77 61 5c 40 74 |ined{@te|mpswa\@t|
|00000f70| 65 6d 70 61 7d 25 0a 20 | 20 20 20 7b 5c 50 61 63 |empa}%. |   {\Pac|
|00000f80| 6b 61 67 65 45 72 72 6f | 72 7b 69 66 74 68 65 6e |kageErro|r{ifthen|
|00000f90| 7d 25 0a 20 20 20 20 20 | 20 20 7b 59 6f 75 20 63 |}%.     |  {You c|
|00000fa0| 61 6e 20 6f 6e 6c 79 20 | 73 65 74 20 61 20 62 6f |an only |set a bo|
|00000fb0| 6f 6c 65 61 6e 20 74 6f | 20 60 74 72 75 65 27 20 |olean to| `true' |
|00000fc0| 6f 72 20 60 66 61 6c 73 | 65 27 7d 5c 40 65 68 63 |or `fals|e'}\@ehc|
|00000fd0| 7d 25 0a 20 20 20 20 7b | 5c 40 69 66 75 6e 64 65 |}%.    {|\@ifunde|
|00000fe0| 66 69 6e 65 64 7b 23 31 | 5c 40 74 65 6d 70 61 7d |fined{#1|\@tempa}|
|00000ff0| 25 0a 20 20 20 20 20 20 | 7b 5c 50 61 63 6b 61 67 |%.      |{\Packag|
|00001000| 65 45 72 72 6f 72 7b 69 | 66 74 68 65 6e 7d 7b 42 |eError{i|fthen}{B|
|00001010| 6f 6f 6c 65 61 6e 20 23 | 31 20 75 6e 64 65 66 69 |oolean #|1 undefi|
|00001020| 6e 65 64 7d 5c 40 65 68 | 63 7d 25 0a 20 20 20 20 |ned}\@eh|c}%.    |
|00001030| 20 20 7b 5c 63 73 6e 61 | 6d 65 23 31 5c 40 74 65 |  {\csna|me#1\@te|
|00001040| 6d 70 61 5c 65 6e 64 63 | 73 6e 61 6d 65 7d 7d 7d |mpa\endc|sname}}}|
|00001050| 0a 5c 64 65 66 5c 6e 65 | 77 62 6f 6f 6c 65 61 6e |.\def\ne|wboolean|
|00001060| 23 31 7b 25 0a 20 20 5c | 63 73 6e 61 6d 65 20 6e |#1{%.  \|csname n|
|00001070| 65 77 69 66 5c 65 78 70 | 61 6e 64 61 66 74 65 72 |ewif\exp|andafter|
|00001080| 5c 65 6e 64 63 73 6e 61 | 6d 65 5c 63 73 6e 61 6d |\endcsna|me\csnam|
|00001090| 65 20 69 66 23 31 5c 65 | 6e 64 63 73 6e 61 6d 65 |e if#1\e|ndcsname|
|000010a0| 7d 0a 5c 6c 6f 6e 67 5c | 64 65 66 5c 77 68 69 6c |}.\long\|def\whil|
|000010b0| 65 64 6f 23 31 23 32 7b | 25 0a 20 20 5c 69 66 74 |edo#1#2{|%.  \ift|
|000010c0| 68 65 6e 65 6c 73 65 7b | 23 31 7d 7b 5c 40 77 68 |henelse{|#1}{\@wh|
|000010d0| 69 6c 65 64 6f 74 72 75 | 65 20 5c 40 77 68 69 6c |iledotru|e \@whil|
|000010e0| 65 73 77 5c 69 66 40 77 | 68 69 6c 65 64 6f 5c 66 |esw\if@w|hiledo\f|
|000010f0| 69 0a 20 20 20 20 20 7b | 23 32 5c 69 66 74 68 65 |i.     {|#2\ifthe|
|00001100| 6e 65 6c 73 65 7b 23 31 | 7d 7b 5c 40 77 68 69 6c |nelse{#1|}{\@whil|
|00001110| 65 64 6f 74 72 75 65 7d | 7b 5c 40 77 68 69 6c 65 |edotrue}|{\@while|
|00001120| 64 6f 66 61 6c 73 65 7d | 7d 7d 7b 7d 7d 0a 5c 6e |dofalse}|}}{}}.\n|
|00001130| 65 77 69 66 5c 69 66 40 | 77 68 69 6c 65 64 6f 0a |ewif\if@|whiledo.|
|00001140| 25 25 20 0a 25 25 20 45 | 6e 64 20 6f 66 20 66 69 |%% .%% E|nd of fi|
|00001150| 6c 65 20 60 69 66 74 68 | 65 6e 2e 73 74 79 27 2e |le `ifth|en.sty'.|
|00001160| 20 0a                   |                         | .      |        |
+--------+-------------------------+-------------------------+--------+--------+