%% %% This is file `widetable.sty', %% generated with the docstrip utility. %% %% The original source files were: %% %% widetable.dtx (with options: `package') %% %% Copyright 2009 Claudio Beccari All rights reserved. %% %% This system is distributed in the hope that it will be useful, %% but WITHOUT ANY WARRANTY; without even the implied warranty of %% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. %% %% %% IMPORTANT NOTICE: %% %% You are not allowed to change this file. %% %% You are allowed to distribute this file under the condition that %% it is distributed together with widetable.dtx. %% %% If you receive only some of these files from someone, complain! %% %% You are NOT ALLOWED to distribute this file alone. You are NOT %% ALLOWED to take money for the distribution or use of either this %% file or a changed version, except for a nominal charge for copying %% etc. %% %% File `widetable.dtx'. %% Copyright (C) 2009 Claudio Beccari all rights reserved. %% \NeedsTeXFormat{LaTeX2e}[2005/12/01] \ProvidesPackage{widetable}% [2009/07/21 v.1.0 Package for typesetting specified width tables] \dimendef\wt@Numer=2 \dimendef\wt@Denom=4 \countdef\wt@Num=2 \countdef\wt@Den=4 \countdef\wt@I=6 \def\wt@segno{} \def\dividi#1\per#2\in#3{% \begingroup \wt@Numer #1\relax \wt@Denom #2\relax \ifdim\wt@Denom<\z@ \wt@Denom -\wt@Denom \wt@Numer -\wt@Numer\fi \ifdim\wt@Numer<\z@ \def\wt@segno{-}\wt@Numer -\wt@Numer\fi \ifdim\wt@Denom=\z@ \edef\wt@Q{\ifdim\wt@Numer<\z@-\fi\strip@pt\maxdimen}% \else \wt@Num=\wt@Numer \wt@Den=\wt@Denom \divide\wt@Num\wt@Den \edef\wt@Q{\number\wt@Num.}% \advance\wt@Numer -\wt@Q\wt@Denom \wt@I=6 \@whilenum \wt@I>\z@ \do{\wt@dividiDec\advance\wt@I\m@ne}% \fi \edef\x{\noexpand\endgroup\noexpand\def\noexpand#3{\wt@segno\wt@Q}} \x } \def\wt@dividiDec{% \wt@Numer=10\wt@Numer \wt@Num=\wt@Numer \divide\wt@Num\wt@Den \edef\wt@q{\number\wt@Num}\edef\wt@Q{\wt@Q\wt@q}% \advance\wt@Numer -\wt@q\wt@Denom} \newdimen\wt@width \def\wt@starttabular{\expandafter\tabular\expandafter{\wt@preamble}} \def\widetable#1#2{% \def\@tempC{widetable}\setlength{\wt@width}{#1}% \def\wt@preamble{#2}\wt@getTable} \newif\ifwt@scartare\wt@scartarefalse \def\endwidetable{% \ifwt@scartare \noindent\null \else \tabcolsep=\z@ \setbox\z@=\hbox{\wt@starttabular\the\toks@\endtabular}% \tabcolsep=1cm\relax \setbox\tw@=\hbox{\wt@starttabular\the\toks@\endtabular}% \advance\wt@width-\wd\z@ \@tempdimb=\wd\tw@ \advance\@tempdimb-\wd\z@ \dividi\wt@width\per\@tempdimb\in\@tempA \tabcolsep=\@tempA\tabcolsep \wt@starttabular\the\toks@\endtabular \fi \ignorespacesafterend } \def\wt@finetabella{\end{widetable}}% \def\wt@getTable#1\end#2{\def\@tempB{#2}% \ifx\@tempB\@tempC \toks@={#1}% \expandafter\wt@finetabella \else \PackageWarning{widetable}{% The table contains environment `\@tempB' % \MessageBreak not enclosed in braces. This is expressly forbidden!% \MessageBreak The table is not typeset and is substituted% \MessageBreak with a framed box} \noindent\framebox[\wt@width]{The table was not typeset because it contains a visible \texttt{\char`\\end} in one or more cells.}\par \expandafter\wt@finishTable \fi } \def\wt@finishTable#1\end#2{% \def\@tempB{#2}% \ifx\@tempB\@tempC \wt@scartaretrue\expandafter\wt@finetabella \else \expandafter\wt@finishTable \fi } \endinput %% %% End of file `widetable.sty'.