oddelovac - tecky

[Petr Olsak]

On Tue, 21 Mar 2006, Frantisek Mosna wrote:

> Mel bych prosbu o radu.
> Rad bych v matici soustavy linearnich oddelil pravou stranu nikoli plnou
> ale teckovanou (nebo carkovanou) svislou carou.
> Nemate nekdo zkusenosti?
>                   Frantisek Mosna CZU

Dobry den,

existuje mnoho zpusobu, jak to udelat. Napadlo me i pouziti \valign a
vertikalni \leaders v miste cary. Ovsem pak by bylo nutno data zadavat po
sloupcich, coz asi neni zadouci. Proto nabizim reseni pomoci \halign a
vertikalni \leaders se pouzije jen na vyrobu carkovaneho strutu. Makra,
aby se to dalo pouzivat kulturneji, si uz ctenar jiste dopise sam za
domaci cviceni.

\newdimen\strutdepth     \strutdepth=3pt
\newdimen\strutcomplet   \strutcomplet=12pt  % to musi byt sudy pocet
                                             % nasobku \ddelementsize
\newdimen\ddelementsize \ddelementsize=1pt

\newbox\ddelement
\setbox\ddelement=\vbox to2\ddelementsize{
   \vss\hrule height\ddelementsize width.4pt \vss}

\def\ddstrut{\lower\strutdepth\vbox to\strutcomplet
   {\cleaders\copy\ddelement\vfil}}
\def\q{\hskip4pt\relax}

$$ A=\left(
\vcenter{\offinterlineskip
\halign{\q\hfil#\q&\q\hfil#\q&\q\hfil#\q\ddstrut&\q\hfil#\q\cr
   1 & 2  & 3  & 4  \cr
   5 & 6  & 7  & 8  \cr
   9 & 10 & 11 & 12 \cr}}
\right)
$$

\end

Zdravim

Petr Olsak