|
1 %% |
|
2 %% This is file `tabulary.sty', |
|
3 %% generated with the docstrip utility. |
|
4 %% |
|
5 %% The original source files were: |
|
6 %% |
|
7 %% tabulary.dtx (with options: `package') |
|
8 %% DRAFT VERSION |
|
9 %% |
|
10 %% File `tabulary.dtx'. |
|
11 %% Copyright (C) 1995 1996 2003 David Carlisle |
|
12 %% This file may be distributed under the terms of the LPPL. |
|
13 %% See 00readme.txt for details. |
|
14 %% |
|
15 \NeedsTeXFormat{LaTeX2e} |
|
16 \ProvidesPackage{tabulary} |
|
17 [2007/10/02 v0.9 tabulary package (DPC)] |
|
18 \RequirePackage{array} |
|
19 \catcode`\Z=14 |
|
20 \DeclareOption{debugshow}{\catcode`\Z=9\relax} |
|
21 \ProcessOptions |
|
22 \def\arraybackslash{\let\\=\@arraycr} |
|
23 \def\@finalstrut#1{% |
|
24 \unskip\ifhmode\nobreak\fi\vrule\@width\z@\@height\z@\@depth\dp#1} |
|
25 \newcount\TY@count |
|
26 \def\tabulary{% |
|
27 \let\TY@final\tabular |
|
28 \let\endTY@final\endtabular |
|
29 \TY@tabular} |
|
30 \def\TY@tabular#1{% |
|
31 \edef\TY@{\@currenvir}% |
|
32 {\ifnum0=`}\fi |
|
33 \@ovxx\TY@linewidth |
|
34 \@ovyy\TY@tablewidth |
|
35 \count@\z@ |
|
36 \@tempswatrue |
|
37 \@whilesw\if@tempswa\fi{% |
|
38 \advance\count@\@ne |
|
39 \expandafter\ifx\csname TY@F\the\count@\endcsname\relax |
|
40 \@tempswafalse |
|
41 \else |
|
42 \expandafter\let\csname TY@SF\the\count@\expandafter\endcsname |
|
43 \csname TY@F\the\count@\endcsname |
|
44 \global\expandafter\let\csname TY@F\the\count@\endcsname\relax |
|
45 \expandafter\let\csname TY@S\the\count@\expandafter\endcsname |
|
46 \csname TY@\the\count@\endcsname |
|
47 \fi}% |
|
48 \global\TY@count\@ne |
|
49 \TY@width\xdef{0pt}% |
|
50 \global\TY@tablewidth\z@ |
|
51 \global\TY@linewidth#1\relax |
|
52 Z\message{^^J^^JTable^^J% |
|
53 Z Target Width: \the\TY@linewidth^^J% |
|
54 Z \string\tabcolsep: \the\tabcolsep\space |
|
55 Z \string\arrayrulewidth: \the\arrayrulewidth\space |
|
56 Z \string\doublerulesep: \the\doublerulesep^^J% |
|
57 Z \string\tymin: \the\tymin\space |
|
58 Z \string\tymax: \the\tymax^^J}% |
|
59 \let\@classz\TY@classz |
|
60 \let\verb\TX@verb |
|
61 \toks@{}\TY@get@body} |
|
62 \let\TY@@mkpream\@mkpream |
|
63 \def\TY@mkpream{% |
|
64 \def\@addamp{% |
|
65 \if@firstamp \@firstampfalse \else |
|
66 \global\advance\TY@count\@ne |
|
67 \edef\@preamble{\@preamble &}\fi |
|
68 \TY@width\xdef{0pt}}% |
|
69 \def\@acol{% |
|
70 \TY@subwidth\col@sep |
|
71 \@addtopreamble{\hskip\col@sep}}% |
|
72 \let\@arrayrule\TY@arrayrule |
|
73 \let\@classvi\TY@classvi |
|
74 \def\@classv{\save@decl |
|
75 \expandafter\NC@ecs\@nextchar\extracolsep{}\extracolsep\@@@ |
|
76 \sbox\z@{\d@llarbegin\@nextchar\d@llarend}% |
|
77 \TY@subwidth{\wd\z@}% |
|
78 \@addtopreamble{\d@llarbegin\the@toks\the\count@\relax\d@llarend}% |
|
79 \prepnext@tok}% |
|
80 \global\let\@mkpream\TY@@mkpream |
|
81 \TY@@mkpream} |
|
82 \def\TY@arrayrule{% |
|
83 \TY@subwidth\arrayrulewidth |
|
84 \@addtopreamble \vline} |
|
85 \def\TY@classvi{\ifcase \@lastchclass |
|
86 \@acol \or |
|
87 \TY@subwidth\doublerulesep |
|
88 \@addtopreamble{\hskip \doublerulesep}\or |
|
89 \@acol \or |
|
90 \@classvii |
|
91 \fi} |
|
92 \def\TY@tab{% |
|
93 \setbox\z@\hbox\bgroup |
|
94 \let\[$\let\]$% |
|
95 \let\equation$\let\endequation$% |
|
96 \col@sep\tabcolsep |
|
97 \let\d@llarbegin\begingroup\let\d@llarend\endgroup |
|
98 \let\@mkpream\TY@mkpream |
|
99 \def\multicolumn##1##2##3{\multispan##1\relax}% |
|
100 \CT@start\TY@tabarray} |
|
101 \def\TY@tabarray{\@ifnextchar[{\TY@array}{\@array[t]}} |
|
102 \def\TY@array[#1]{\@array[t]} |
|
103 \def\TY@width#1{% |
|
104 \expandafter#1\csname TY@\the\TY@count\endcsname} |
|
105 \def\TY@subwidth#1{% |
|
106 \TY@width\dimen@ |
|
107 \advance\dimen@-#1\relax |
|
108 \TY@width\xdef{\the\dimen@}% |
|
109 \global\advance\TY@linewidth-#1\relax} |
|
110 \def\endtabulary{% |
|
111 \gdef\@halignto{}% |
|
112 \let\TY@footnote\footnote% |
|
113 \def\footnote{}% prevent footnotes from doing anything |
|
114 \expandafter\TY@tab\the\toks@ |
|
115 \crcr\omit |
|
116 {\xdef\TY@save@row{}% |
|
117 \loop |
|
118 \advance\TY@count\m@ne |
|
119 \ifnum\TY@count>\z@ |
|
120 \xdef\TY@save@row{\TY@save@row&\omit}% |
|
121 \repeat}\TY@save@row |
|
122 \endarray\global\setbox1=\lastbox\setbox0=\vbox{\unvbox1 |
|
123 \unskip\global\setbox1=\lastbox}\egroup |
|
124 \dimen@\TY@linewidth |
|
125 \divide\dimen@\TY@count |
|
126 \ifdim\dimen@<\tymin |
|
127 \TY@warn{tymin too large (\the\tymin), resetting to \the\dimen@}% |
|
128 \tymin\dimen@ |
|
129 \fi |
|
130 \setbox\tw@=\hbox{\unhbox\@ne |
|
131 \loop |
|
132 \@tempdima=\lastskip |
|
133 \ifdim\@tempdima>\z@ |
|
134 Z \message{ecs=\the\@tempdima^^J}% |
|
135 \global\advance\TY@linewidth-\@tempdima |
|
136 \fi |
|
137 \unskip |
|
138 \setbox\tw@=\lastbox |
|
139 \ifhbox\tw@ |
|
140 Z \message{Col \the\TY@count: Initial=\the\wd\tw@\space}% |
|
141 \ifdim\wd\tw@>\tymax |
|
142 \wd\tw@\tymax |
|
143 Z \message{> max\space}% |
|
144 Z \else |
|
145 Z \message{ \@spaces\space}% |
|
146 \fi |
|
147 \TY@width\dimen@ |
|
148 Z \message{\the\dimen@\space}% |
|
149 \advance\dimen@\wd\tw@ |
|
150 Z \message{Final=\the\dimen@\space}% |
|
151 \TY@width\xdef{\the\dimen@}% |
|
152 \ifdim\dimen@<\tymin |
|
153 Z \message{< tymin}% |
|
154 \global\advance\TY@linewidth-\dimen@ |
|
155 \expandafter\xdef\csname TY@F\the\TY@count\endcsname |
|
156 {\the\dimen@}% |
|
157 \else |
|
158 \expandafter\ifx\csname TY@F\the\TY@count\endcsname\z@ |
|
159 Z \message{***}% |
|
160 \global\advance\TY@linewidth-\dimen@ |
|
161 \expandafter\xdef\csname TY@F\the\TY@count\endcsname |
|
162 {\the\dimen@}% |
|
163 \else |
|
164 Z \message{> tymin}% |
|
165 \global\advance\TY@tablewidth\dimen@ |
|
166 \global\expandafter\let\csname TY@F\the\TY@count\endcsname |
|
167 \maxdimen |
|
168 \fi\fi |
|
169 \advance\TY@count\m@ne |
|
170 \repeat}% |
|
171 \TY@checkmin |
|
172 \TY@checkmin |
|
173 \TY@checkmin |
|
174 \TY@checkmin |
|
175 \TY@count\z@ |
|
176 \let\TY@box\TY@box@v |
|
177 \let\footnote\TY@footnote % restore footnotes |
|
178 {\expandafter\TY@final\the\toks@\endTY@final}% |
|
179 \count@\z@ |
|
180 \@tempswatrue |
|
181 \@whilesw\if@tempswa\fi{% |
|
182 \advance\count@\@ne |
|
183 \expandafter\ifx\csname TY@SF\the\count@\endcsname\relax |
|
184 \@tempswafalse |
|
185 \else |
|
186 \global\expandafter\let\csname TY@F\the\count@\expandafter\endcsname |
|
187 \csname TY@SF\the\count@\endcsname |
|
188 \global\expandafter\let\csname TY@\the\count@\expandafter\endcsname |
|
189 \csname TY@S\the\count@\endcsname |
|
190 \fi}% |
|
191 \TY@linewidth\@ovxx |
|
192 \TY@tablewidth\@ovyy |
|
193 \ifnum0=`{\fi}} |
|
194 \def\TY@checkmin{% |
|
195 \let\TY@checkmin\relax |
|
196 \ifdim\TY@tablewidth>\z@ |
|
197 \Gscale@div\TY@ratio\TY@linewidth\TY@tablewidth |
|
198 \ifdim\TY@tablewidth <\linewidth |
|
199 \def\TY@ratio{1}% |
|
200 \fi |
|
201 \else |
|
202 \TY@warn{No suitable columns!}% |
|
203 \def\TY@ratio{1}% |
|
204 \fi |
|
205 \count@\z@ |
|
206 Z \message{^^JLine Width: \the\TY@linewidth, |
|
207 Z Natural Width: \the\TY@tablewidth, |
|
208 Z Ratio: \TY@ratio^^J}% |
|
209 \@tempdima\z@ |
|
210 \loop |
|
211 \ifnum\count@<\TY@count |
|
212 \advance\count@\@ne |
|
213 \ifdim\csname TY@F\the\count@\endcsname>\tymin |
|
214 \dimen@\csname TY@\the\count@\endcsname |
|
215 \dimen@\TY@ratio\dimen@ |
|
216 \ifdim\dimen@<\tymin |
|
217 Z \message{Column \the\count@\space ->}% |
|
218 \global\expandafter\let\csname TY@F\the\count@\endcsname\tymin |
|
219 \global\advance\TY@linewidth-\tymin |
|
220 \global\advance\TY@tablewidth-\csname TY@\the\count@\endcsname |
|
221 \let\TY@checkmin\TY@@checkmin |
|
222 \else |
|
223 \expandafter\xdef\csname TY@F\the\count@\endcsname{\the\dimen@}% |
|
224 \advance\@tempdima\csname TY@F\the\count@\endcsname |
|
225 \fi |
|
226 \fi |
|
227 Z \dimen@\csname TY@F\the\count@\endcsname\message{\the\dimen@, }% |
|
228 \repeat |
|
229 Z \message{^^JTotal:\the\@tempdima^^J}% |
|
230 } |
|
231 \let\TY@@checkmin\TY@checkmin |
|
232 \newdimen\TY@linewidth |
|
233 \def\tyformat{\everypar{{\nobreak\hskip\z@skip}}} |
|
234 \newdimen\tymin |
|
235 \tymin=10pt |
|
236 \newdimen\tymax |
|
237 \tymax=2\textwidth |
|
238 \def\@testpach{\@chclass |
|
239 \ifnum \@lastchclass=6 \@ne \@chnum \@ne \else |
|
240 \ifnum \@lastchclass=7 5 \else |
|
241 \ifnum \@lastchclass=8 \tw@ \else |
|
242 \ifnum \@lastchclass=9 \thr@@ |
|
243 \else \z@ |
|
244 \ifnum \@lastchclass = 10 \else |
|
245 \edef\@nextchar{\expandafter\string\@nextchar}% |
|
246 \@chnum |
|
247 \if \@nextchar c\z@ \else |
|
248 \if \@nextchar l\@ne \else |
|
249 \if \@nextchar r\tw@ \else |
|
250 \if \@nextchar C7 \else |
|
251 \if \@nextchar L8 \else |
|
252 \if \@nextchar R9 \else |
|
253 \if \@nextchar J10 \else |
|
254 \z@ \@chclass |
|
255 \if\@nextchar |\@ne \else |
|
256 \if \@nextchar !6 \else |
|
257 \if \@nextchar @7 \else |
|
258 \if \@nextchar <8 \else |
|
259 \if \@nextchar >9 \else |
|
260 10 |
|
261 \@chnum |
|
262 \if \@nextchar m\thr@@\else |
|
263 \if \@nextchar p4 \else |
|
264 \if \@nextchar b5 \else |
|
265 \z@ \@chclass \z@ \@preamerr \z@ \fi \fi \fi \fi\fi \fi \fi\fi \fi |
|
266 \fi \fi \fi \fi \fi \fi \fi \fi \fi \fi \fi} |
|
267 \def\TY@classz{% |
|
268 \@classx |
|
269 \@tempcnta\count@ |
|
270 \ifx\TY@box\TY@box@v |
|
271 \global\advance\TY@count\@ne |
|
272 \fi |
|
273 \let\centering c% |
|
274 \let\raggedright\noindent |
|
275 \let\raggedleft\indent |
|
276 \let\arraybackslash\relax |
|
277 \prepnext@tok |
|
278 \ifnum\@chnum<4 |
|
279 \global\expandafter\let\csname TY@F\the\TY@count\endcsname\z@ |
|
280 \fi |
|
281 \ifnum\@chnum=6 |
|
282 \global\expandafter\let\csname TY@F\the\TY@count\endcsname\z@ |
|
283 \fi |
|
284 \@addtopreamble{% |
|
285 \ifcase\@chnum |
|
286 \hfil \d@llarbegin\insert@column\d@llarend \hfil \or |
|
287 \kern\z@ |
|
288 \d@llarbegin \insert@column \d@llarend \hfil \or |
|
289 \hfil\kern\z@ \d@llarbegin \insert@column \d@llarend \or |
|
290 $\vcenter\@startpbox{\@nextchar}\insert@column \@endpbox $\or |
|
291 \vtop \@startpbox{\@nextchar}\insert@column \@endpbox \or |
|
292 \vbox \@startpbox{\@nextchar}\insert@column \@endpbox \or |
|
293 \d@llarbegin \insert@column \d@llarend \or% dubious "s" case |
|
294 \TY@box\centering\or |
|
295 \TY@box\raggedright\or |
|
296 \TY@box\raggedleft\or |
|
297 \TY@box\relax |
|
298 \fi}\prepnext@tok} |
|
299 \def\TY@box#1{% |
|
300 \ifx\centering#1% |
|
301 \hfil \d@llarbegin\insert@column\d@llarend \hfil \else |
|
302 \ifx\raggedright#1% |
|
303 \kern\z@%<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< |
|
304 \d@llarbegin \insert@column \d@llarend \hfil \else |
|
305 \ifx\raggedleft#1% |
|
306 \hfil\kern\z@ \d@llarbegin \insert@column \d@llarend \else |
|
307 \ifx\relax#1% |
|
308 \d@llarbegin \insert@column \d@llarend |
|
309 \fi \fi \fi \fi} |
|
310 \def\TY@box@v#1{% |
|
311 \vtop \@startpbox{\csname TY@F\the\TY@count\endcsname}% |
|
312 #1\arraybackslash\tyformat |
|
313 \insert@column\@endpbox} |
|
314 \newdimen\TY@tablewidth |
|
315 \def\Gscale@div#1#2#3{% |
|
316 \setlength\dimen@{#3}% |
|
317 \ifdim\dimen@=\z@ |
|
318 \PackageError{graphics}{Division by 0}\@eha |
|
319 \dimen@#2% |
|
320 \fi |
|
321 \edef\@tempd{\the\dimen@}% |
|
322 \setlength\dimen@{#2}% |
|
323 \count@65536\relax |
|
324 \ifdim\dimen@<\z@ |
|
325 \dimen@-\dimen@ |
|
326 \count@-\count@ |
|
327 \fi |
|
328 \loop |
|
329 \ifdim\dimen@<8192\p@ |
|
330 \dimen@\tw@\dimen@ |
|
331 \divide\count@\tw@ |
|
332 \repeat |
|
333 \dimen@ii=\@tempd\relax |
|
334 \divide\dimen@ii\count@ |
|
335 \divide\dimen@\dimen@ii |
|
336 \edef#1{\strip@pt\dimen@}} |
|
337 \long\def\TY@get@body#1\end |
|
338 {\toks@\expandafter{\the\toks@#1}\TY@find@end} |
|
339 \def\TY@find@end#1{% |
|
340 \def\@tempa{#1}% |
|
341 \ifx\@tempa\TY@\def\@tempa{\end{#1}}\expandafter\@tempa |
|
342 \else\toks@\expandafter |
|
343 {\the\toks@\end{#1}}\expandafter\TY@get@body\fi} |
|
344 \def\TY@warn{% |
|
345 \PackageWarning{tabulary}} |
|
346 \catcode`\Z=11 |
|
347 \AtBeginDocument{ |
|
348 \@ifpackageloaded{colortbl}{% |
|
349 \expandafter\def\expandafter\@mkpream\expandafter#\expandafter1% |
|
350 \expandafter{% |
|
351 \expandafter\let\expandafter\CT@setup\expandafter\relax |
|
352 \expandafter\let\expandafter\CT@color\expandafter\relax |
|
353 \expandafter\let\expandafter\CT@do@color\expandafter\relax |
|
354 \expandafter\let\expandafter\color\expandafter\relax |
|
355 \expandafter\let\expandafter\CT@column@color\expandafter\relax |
|
356 \expandafter\let\expandafter\CT@row@color\expandafter\relax |
|
357 \@mkpream{#1}} |
|
358 \let\TY@@mkpream\@mkpream |
|
359 \def\TY@classz{% |
|
360 \@classx |
|
361 \@tempcnta\count@ |
|
362 \ifx\TY@box\TY@box@v |
|
363 \global\advance\TY@count\@ne |
|
364 \fi |
|
365 \let\centering c% |
|
366 \let\raggedright\noindent |
|
367 \let\raggedleft\indent |
|
368 \let\arraybackslash\relax |
|
369 \prepnext@tok |
|
370 \expandafter\CT@extract\the\toks\@tempcnta\columncolor!\@nil |
|
371 \ifnum\@chnum<4 |
|
372 \global\expandafter\let\csname TY@F\the\TY@count\endcsname\z@ |
|
373 \fi |
|
374 \ifnum\@chnum=6 |
|
375 \global\expandafter\let\csname TY@F\the\TY@count\endcsname\z@ |
|
376 \fi |
|
377 \@addtopreamble{% |
|
378 \setbox\z@\hbox\bgroup\bgroup |
|
379 \ifcase\@chnum |
|
380 \hskip\stretch{.5}\kern\z@ |
|
381 \d@llarbegin\insert@column\d@llarend\hskip\stretch{.5}\or |
|
382 \kern\z@%<<<<<<<<<<<<<<<<<<<<<<<<<<< |
|
383 \d@llarbegin \insert@column \d@llarend \hfill \or |
|
384 \hfill\kern\z@ \d@llarbegin \insert@column \d@llarend \or |
|
385 $\vcenter\@startpbox{\@nextchar}\insert@column \@endpbox $\or |
|
386 \vtop \@startpbox{\@nextchar}\insert@column \@endpbox \or |
|
387 \vbox \@startpbox{\@nextchar}\insert@column \@endpbox \or |
|
388 \d@llarbegin \insert@column \d@llarend \or% dubious s case |
|
389 \TY@box\centering\or |
|
390 \TY@box\raggedright\or |
|
391 \TY@box\raggedleft\or |
|
392 \TY@box\relax |
|
393 \fi |
|
394 \egroup\egroup |
|
395 \begingroup |
|
396 \CT@setup |
|
397 \CT@column@color |
|
398 \CT@row@color |
|
399 \CT@do@color |
|
400 \endgroup |
|
401 \@tempdima\ht\z@ |
|
402 \advance\@tempdima\minrowclearance |
|
403 \vrule\@height\@tempdima\@width\z@ |
|
404 \unhbox\z@ |
|
405 }\prepnext@tok}% |
|
406 \def\TY@arrayrule{% |
|
407 \TY@subwidth\arrayrulewidth |
|
408 \@addtopreamble{{\CT@arc@\vline}}}% |
|
409 \def\TY@classvi{\ifcase \@lastchclass |
|
410 \@acol \or |
|
411 \TY@subwidth\doublerulesep |
|
412 \ifx\CT@drsc@\relax |
|
413 \@addtopreamble{\hskip\doublerulesep}% |
|
414 \else |
|
415 \@addtopreamble{{\CT@drsc@\vrule\@width\doublerulesep}}% |
|
416 \fi\or |
|
417 \@acol \or |
|
418 \@classvii |
|
419 \fi}% |
|
420 }{% |
|
421 \let\CT@start\relax |
|
422 } |
|
423 } |
|
424 {\uccode`\*=`\ % |
|
425 \uppercase{\gdef\TX@verb{% |
|
426 \leavevmode\null\TX@vwarn |
|
427 {\ifnum0=`}\fi\ttfamily\let\\\ignorespaces |
|
428 \@ifstar{\let~*\TX@vb}{\TX@vb}}}} |
|
429 \def\TX@vb#1{\def\@tempa##1#1{\toks@{##1}\edef\@tempa{\the\toks@}% |
|
430 \expandafter\TX@v\meaning\@tempa\\ \\\ifnum0=`{\fi}}\@tempa!} |
|
431 \def\TX@v#1!{\afterassignment\TX@vfirst\let\@tempa= } |
|
432 \begingroup |
|
433 \catcode`\*=\catcode`\# |
|
434 \catcode`\#=12 |
|
435 \gdef\TX@vfirst{% |
|
436 \if\@tempa#% |
|
437 \def\@tempb{\TX@v@#}% |
|
438 \else |
|
439 \let\@tempb\TX@v@ |
|
440 \if\@tempa\space~\else\@tempa\fi |
|
441 \fi |
|
442 \@tempb} |
|
443 \gdef\TX@v@*1 *2{% |
|
444 \TX@v@hash*1##\relax\if*2\\\else~\expandafter\TX@v@\fi*2} |
|
445 \gdef\TX@v@hash*1##*2{*1\ifx*2\relax\else#\expandafter\TX@v@hash\fi*2} |
|
446 \endgroup |
|
447 \def\TX@vwarn{% |
|
448 \@warning{\noexpand\verb may be unreliable inside tabularx/y}% |
|
449 \global\let\TX@vwarn\@empty} |
|
450 \endinput |
|
451 %% |
|
452 %% End of file `tabulary.sty'. |