diff options
Diffstat (limited to 'Master/texmf-dist/tex/generic/tex4ht/array.4ht')
-rw-r--r-- | Master/texmf-dist/tex/generic/tex4ht/array.4ht | 186 |
1 files changed, 186 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/generic/tex4ht/array.4ht b/Master/texmf-dist/tex/generic/tex4ht/array.4ht new file mode 100644 index 00000000000..5de75319f31 --- /dev/null +++ b/Master/texmf-dist/tex/generic/tex4ht/array.4ht @@ -0,0 +1,186 @@ +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +% array.4ht 2005-10-23-04:19 % +% Copyright (C) 1997--2005 Eitan M. Gurari % +% % +% This work may be distributed and/or modified under the % +% conditions of the LaTeX Project Public License, either % +% version 1.3 of this license or (at your option) any % +% later version. The latest version of this license is % +% in % +% http://www.latex-project.org/lppl.txt % +% and version 1.3 or later is part of all distributions % +% of LaTeX version 2003/12/01 or later. % +% % +% This work has the LPPL maintenance status "maintained".% +% % +% This Current Maintainer of this work % +% is Eitan M. Gurari. % +% % +% If you modify this program your changing its signature % +% with a directive of the following form will be % +% appreciated. % +% \message{signature} % +% % +% gurari@cse.ohio-state.edu % +% http://www.cse.ohio-state.edu/~gurari % +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +\immediate\write-1{version 2005-10-23-04:19} + + \def\@tabular{\leavevmode + \hbox \bgroup \:@tabular: + $\col@sep\tabcolsep \let\d@llarbegin\begingroup + \let\d@llarend\endgroup + \@tabarray} +\pend:def\@tabular{\let\@array:a\a:tabular \let\@array:b\b:tabular + \let\@array:c\c:tabular \let\@array:d\d:tabular + \let\@array:e\e:tabular \let\@array:f\f:tabular } +\def\:temp[#1]#2{% + \def\Clr{#2}\a:VBorder +\HAssign\ar:cnt0 +\let\HAlign\empty +% + \@tempdima \ht \strutbox + \advance \@tempdima by\extrarowheight + \setbox \@arstrutbox \hbox{\vrule + \@height \arraystretch \@tempdima + \@depth \arraystretch \dp \strutbox + \@width \z@}% + \begingroup + \@mkpream{#2}% + \xdef\@preamble{% + \everycr{}\tabskip\z@skip\noexpand\MkHalign\noexpand\@sharp + {\@arstrut \@preamble \tabskip\z@skip}% +}% + \xdef\:temp{% + \def\noexpand\HAlign{\HAlign}% + \def\noexpand\ar:cnt{\ar:cnt}}\aftergroup\:temp +% + \endgroup + \@arrayleft + \if #1t\vtop \else \if#1b\vbox \else \vcenter \fi \fi + \bgroup + \def\v:TBL{#1}% + \let \protect \relax \lineskip \z@ + \baselineskip \z@ \m@th + \let\\\@arraycr \let\tabularnewline\\\let\par\@empty + \ifx \EndPicture\:UnDef + \SaveMkHalignConfig %%%%%%%%% \let\sv:ALIGN\HAlign + \ifx \recall:ar\:UnDef + \pend:def\@array{\recall:ar}% + \edef\recall:ar{% + \noexpand\ifx \noexpand\EndPicture\noexpand\:UnDef \noexpand\else + \arrayrulewidth\the\arrayrulewidth + \doublerulesep\the\doublerulesep + \arraycolsep\the\arraycolsep + \tabcolsep\the\tabcolsep + \noexpand\fi }% +\fi +\arrayrulewidth\z@ \doublerulesep\z@ +\arraycolsep\z@ \tabcolsep\z@ +\Configure{MkHalign} + {\@array:a}% + {\@array:b\ProperTrTrue}% + {\a:putHBorder\InitHBorder \ifProperTr{\@array:c}}% + {\ifProperTr{\@array:d}\a:putHBorder\InitHBorder}% + {\ifProperTr{\@array:e}\RecallMkHalignConfig\recall:ar}% + {\ifProperTr{\@array:f}} +% + \Configure{MkHalign}% + {\@array:a}% + {\@array:b\ProperTrTrue}% + {\a:putHBorder\InitHBorder \ifProperTr{\@array:c}}% + {\ifProperTr{\@array:d}\a:putHBorder\InitHBorder}% + {\ifProperTr{\@array:e}%%%%%%%%%%\global \let\HAlign\sv:ALIGN + \RecallMkHalignConfig\recall:ar}% + {\ifProperTr{\@array:f}} +% + \else \let\@sharp##\fi + \@preamble} +\HLet\@array\:temp +\HLet\@@array\@array +\let\:tempc\@startpbox +\append:defI\:tempc{\expandafter\everypar + \expandafter{\the\everypar\everypar{\HtmlPar}\HtmlPar}} +\HLet\@startpbox\:tempc + +\def\:tempc{\relax \ifnum\HCol=1 \a:endarray\fi + \enda:rray} +\HLet\endarray\:tempc +\def\:tempc{\relax \ifnum\HCol=1 \a:endtabular\fi + \enda:rray $\egroup} +\HLet\endtabular\:tempc +\def\enda:rray{\crcr\ifx \EndPicture\:UnDef \EndMkHalign + \else \egroup\fi \egroup \@arrayright \gdef\@preamble{}} +\expandafter \let \csname endtabular*\endcsname\endtabular +\def\:tempc{\@chclass + \ifnum \@lastchclass=6 \@ne \@chnum \@ne \else + \ifnum \@lastchclass=7 5 \else + \ifnum \@lastchclass=8 \tw@ \else + \ifnum \@lastchclass=9 \thr@@ + \else \z@ + \ifnum \@lastchclass = 10 \else + \edef\@nextchar{\expandafter\string\@nextchar}% + \@chnum + \if \@nextchar c\z@ \add:ar-\else + \if \@nextchar l\@ne \add:ar<\else + \if \@nextchar r\tw@ \add:ar>\else + \z@ \@chclass + \if\@nextchar |\@ne \b:VBorder\else + \if \@nextchar !6 \else + \if \@nextchar @7 \d:VBorder\else + \if \@nextchar <8 \else + \if \@nextchar >9 \else + 10 + \@chnum + \if \@nextchar m\thr@@ \add:ar m\else + \if \@nextchar p4 \add:ar p\else + \if \@nextchar b5 \add:ar b\else + \z@ \@chclass \z@ \@preamerr \z@ \fi \fi \fi \fi + \fi \fi \fi \fi \fi \fi \fi \fi \fi \fi \fi \fi} +\HLet\@testpach\:tempc +\def\add:ar#1{\HAdvance\ar:cnt by 1 + \def\ch:class{#1}% +\c:VBorder + \edef\HAlign{\HAlign 0 \ar:cnt\space #1 }} +\def\HColAlign{\expandafter \ifx\csname + \expandafter\string\ch:class :T:D\endcsname\relax \else \csname + \expandafter\string\ch:class :T:D\endcsname\fi} + +\long\def\:temp#1#2#3{% + \multispan{#1}\begingroup +%%%%%%%% \let\sv:ALIGN\HAlign % \let\ar:cnt:\ar:cnt + \def\@addamp{\if@firstamp \@firstampfalse \else + \@preamerr 5\fi}% + \let\HAlign\empty \@mkpream{#2}% +\ifx \EndPicture\:UnDef + \def\:temp##1 ##2 ##3 {##3}% + \xdef\new:span{\new:span\HRow.\HCol\expandafter\:temp\HAlign;}% +\fi +\@addtopreamble\@empty + \global\let\ch:class\ch:class +%%%%%%%% \global\let\HAlign\sv:ALIGN + \xdef\:temp{% + \def\noexpand\HAlign{\HAlign}% + \def\noexpand\ar:cnt{\ar:cnt}}\aftergroup\:temp +% + \endgroup + \def\@sharp{\a:multicolumn#3\b:multicolumn}% + \@arstrut \@preamble + \null + \ignorespaces} +\HLet\multicolumn\:temp + +\def\save@decl{% + \toks \count@ = \expandafter\expandafter\expandafter {% + \csname a:array\ifnum\@lastchclass=9 + >\else <\fi \expandafter\expandafter\expandafter\endcsname +\expandafter\@nextchar\the\toks + \expandafter\count@\csname b:array\ifnum\@lastchclass=9 + >\else <\fi\endcsname +}} +\NewConfigure{array>}{2} +\NewConfigure{array<}{2} + +\Hinput{array} +\endinput + |