source: fact/tools/pyscripts/doc/_build/latex/tabulary.sty@ 13151

Last change on this file since 13151 was 13151, checked in by lusterma, 13 years ago
added doc; this is just an example, nothing ready, to be adapted to work at ISDC, I just made this some time ago on my Laptop
File size: 13.5 KB
Line 
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
52Z\message{^^J^^JTable^^J%
53Z Target Width: \the\TY@linewidth^^J%
54Z \string\tabcolsep: \the\tabcolsep\space
55Z \string\arrayrulewidth: \the\arrayrulewidth\space
56Z \string\doublerulesep: \the\doublerulesep^^J%
57Z \string\tymin: \the\tymin\space
58Z \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@
134Z \message{ecs=\the\@tempdima^^J}%
135 \global\advance\TY@linewidth-\@tempdima
136\fi
137 \unskip
138 \setbox\tw@=\lastbox
139 \ifhbox\tw@
140Z \message{Col \the\TY@count: Initial=\the\wd\tw@\space}%
141 \ifdim\wd\tw@>\tymax
142 \wd\tw@\tymax
143Z \message{> max\space}%
144Z \else
145Z \message{ \@spaces\space}%
146 \fi
147 \TY@width\dimen@
148Z \message{\the\dimen@\space}%
149 \advance\dimen@\wd\tw@
150Z \message{Final=\the\dimen@\space}%
151 \TY@width\xdef{\the\dimen@}%
152 \ifdim\dimen@<\tymin
153Z \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@
159Z \message{***}%
160 \global\advance\TY@linewidth-\dimen@
161 \expandafter\xdef\csname TY@F\the\TY@count\endcsname
162 {\the\dimen@}%
163 \else
164Z \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@
206Z \message{^^JLine Width: \the\TY@linewidth,
207Z Natural Width: \the\TY@tablewidth,
208Z 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
217Z \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
227Z \dimen@\csname TY@F\the\count@\endcsname\message{\the\dimen@, }%
228\repeat
229Z \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'.
Note: See TracBrowser for help on using the repository browser.