% cs
\hsize 136mm
\vsize 205mm

\hyphenation{p�ti-�heln�k.}
\newif\ifPS  \newif\ifproof
\PStrue
% \prooftrue

\input spaced \intercharspace{1pt} \let\sp\spacedtext
\let\MsCount\mscount
\input pst-node %%% ru�� \mscount !!!!
\let\mscount\MsCount
\input pstricks
% \psset{arrowsize=1pt 2,arrowlength=1.9,arrowinset=.7}
\input epsf
% \def\epsfph#1{\setbox0\hbox{\epsffile{#1}}%
%     \vbox to\ht0{\hrule\vss
%           \hbox to\wd0{\vrule height\ht0\hss\vrule}
%           \vss\hrule}}
% \let\epsfbox\epsfph
\catcode`\@ 11

\font\uceb  uceb1
\font\ucebb uceb2
\font\ucebc uceb3
\font\ucebd uceb4
\font\sip   sipky
\def\sipka #1 {{\sip\char #1 }}
\def\csipka{~{\ucebc\char87 }}

\font\monots monots   scaled \magstep4
\font\circle lcircle10 scaled 1250
\font\circl  lcircle10
\font\manual logo10 % font used for the METAFONT logo, etc.
\font\pagn   courb    at 28pt
\font\avant  avant    at 20pt
\font\kabel  kabel    at 21pt
\font\xl     time     at 110pt
\font\xilvib timeb    at 46pt
\font\xxx    time     at 36pt
\font\xxxb   timeb    at 36pt
\font\xxxi   time     at 30pt
\font\xxiv   timeb    at 24pt
\font\xxii   timeb    at 22pt
\font\xx     timeb    at 20pt
\font\xxit   timei    at 20pt
\font\xviii  time     at 18pt
\font\xvi    time     at 16pt
\font\xvib   timeb    at 16pt
\font\xiv    time     at 15pt
\font\xivb   timeb    at 15pt
\font\xivi   timei    at 15pt
\font\xii    time     at 12.5pt
\font\xiit   timei    at 12.5pt
\font\xiib   timeb    at 12.5pt
\font\xiibi  timebi   at 12.5pt
\font\xrm    time     at 10pt
\font\ixrm   time     at  8pt
\font\xbf    timeb    at 10pt
\font\sxiv   henew    at 15pt
\font\sxivb  henewb   at 15pt
% \font\hins   phvr     at 12.5pt
\font\sxii   henew    at 12.5pt    \let\hins\sxii
\font\sxiib  henewb   at 12.5pt
\font\sx     henew    at 10pt
\font\sxi    henewi   at 10pt
\font\sxb    henewb   at 10pt
\font\viiirm time     at 8pt
\font\viiibf timeb    at 8pt
\font\sxvi   henew    at 6pt
\font\sevenrm  time   at 7pt
\font\helv   henew    scaled 1250
\font\helvl  helvl    scaled 2000
\newcount\NN
\let\tenrm\xiv  \rm
\let\tenbf\xivb
\let\tenit\xivi
\def\mf{{\manual META}\-{\manual POST}}
% ------------------------------- math times
\font\mathtim   time  scaled 2000
\font\mathit    timei scaled 2000
\font\mathsy    psyr  scaled 2000
\font\xmathtim  time  scaled 1500
\font\xmathit   timei scaled 1500
\font\xmathsy   psyr  scaled 1500
% \font\ixmathtim time  scaled 1250
\font\ixmathit  timei scaled 1250
\font\ixmathsy  psyr  scaled 1250
% ------------------------------- math helvetica
\font\mathhv    nsans scaled 2000
\font\xmathhv   nsans scaled 1000
\font\xiimathhv nsans scaled 1250
\font\mathht    henew scaled 2000
% ------------------------------- math CM
\font\cmsy      cmsy10 scaled 2000
\font\xiisy     cmsy10 scaled 1250
\font\xcmsy     cmsy10 scaled 1500
\font\ixcmsy    cmsy10 scaled 1250
\font\scrmath   cislice scaled 2000
\newfam\symbol
\def\twenty{\textfont\symbol \mathsy
            \textfont0       \mathtim
            \textfont1       \mathit
            \textfont2       \cmsy }
\twenty
\def\helvm{\textfont\symbol  \mathhv
            \textfont0       \mathht
            \textfont2       \cmsy  }
\def\xhelvm{\textfont\symbol \xmathhv
            \textfont0       \sx
            \textfont1       \sxi
            \textfont2       \tensy  }
\def\xiihelvm{\textfont\symbol \xiimathhv
            \textfont0       \helv
            \textfont2       \xiisy  }
\def\twelve{\textfont\symbol \xmathsy
            \scriptfont\symbol \ixmathsy
            \textfont0       \xmathtim
            \scriptfont0     \xii
            \textfont1       \xmathit
            \textfont2       \xcmsy
            \scriptfont2     \ixcmsy  }
\def\ten   {\textfont\symbol \ixmathsy
            \textfont0       \xii
            \scriptfont0     \xrm
            \textfont1       \ixmathit
            \textfont2       \xiisy
            \def\rm{\xii}\def\it{\xiit}\def\bf{\xiib}%
            \setbox\strutbox=\hbox{\vrule height.70833\baselineskip
                              depth .29167\baselineskip width\z@}%
            \rm}
\def\scriptum{\textfont\symbol \scrmath
              \textfont0       \scrmath
              \textfont2       \cmsy  }

\catcode`\"=12
\mathcode`\:="203A
\mathcode`\+="2D2B
\mathcode`\=="3D3D
\mathcode`\-="2D2D
\mathcode`\>="2D3E
\mathcode`\<="2D3C
\mathcode`\,="612C
\mathcode`\.="012E
\mathchardef\ldotp="612E % ldot as a punctuation mark
\catcode`\"=\active
\def\dots{\relax\ifmmode\ldots\else\char8 \fi}
\def\dotfill{\leaders\hbox{$\m@th \mkern1.5mu.\mkern1.5mu$}\hfill}
\let\breve\u

\hyphenpenalty 9999
\emergencystretch.4em
\baselineskip 16pt
\topskip 14pt
\parindent 0pt
\lineskiplimit-2pt

\newif\iftitel
\titeltrue
\newtoks\Color
\def\titul #1\par{\vfil\eject{\the\Color\xxiv\titelstrut\sp #1}\par
       \hrule height.6mm\bigskip}
\def\titulek #1\par{\bigskip\noindent{\bf #1}\par}
\def\1 #1\par{\vfil\eject\titeltrue
   \noindent{\xxiv\smash{\spacedtext #1}\titelstrut\par}
   \hrule height.6mm
   \vskip 8pt
   \noindent\hbox to 40mm{\vtop{\hsize 40mm\vskip 0pt
                  \xl\noindent\ifnum\nom>9\kern-12pt\fi
                   \the\nom\global\advance\nom1}\hss}%
   \vtop\bgroup
        \advance\hsize-40mm\baselineskip 18pt\xvi\vskip 0pt
         \def\par{\ifhmode\endgraf\else\endgraf\egroup\fi}
         \obeylines}
\def\titelstrut{\vrule width0pt height 16pt depth 8pt }
\def\rule{\vskip 0pt plus 3pt minus 8pt
           \line{\leaders\vrule height\rulew\hfil}
           \vskip 6pt plus 3pt minus 4pt }
\def\u #1 {\ifinner\else\vfil\bigskip\fi
            \noindent\llap{\xivb#1\enspace}\ignorespaces}
\def\ur #1 {\vfil\vskip 0pt plus 3pt minus 8pt
           \line{\leaders\vrule height\rulew\hfil}
           \vskip 6pt plus 3pt minus 4pt
            \noindent\llap{\xivb#1\enspace}\ignorespaces}
\newbox\slovax
\newcount\A \newcount\B \newcount\C
\newcount\tempnum
\newcount\testcnt
\newcount\epsnum
\def\printbox{\dimen0=.80mm \dimen1=.20mm
     \tempnum\wd\slovax
     \divide\tempnum \dimen0
     \A\tempnum \divide\A by 100 \B=\A \multiply\B-100
     \advance\B\tempnum \edef\xscale{\the\A.\ifnum\B<10 0\fi\the\B}%
     \tempnum\ht\slovax \advance\tempnum\dp\slovax
     \divide\tempnum \dimen1
     \A\tempnum \divide\A by 100 \B=\A \multiply\B-100
     \advance\B\tempnum \edef\yscale{\the\A.\ifnum\B<10 0\fi\the\B}%
    {\pscustom[linecolor=red]%
    {\code{1 setlinewidth
       /cmtx matrix currentmatrix def gsave
        \xscale\space \yscale\space scale}
      \file{oblacek.\the\epsnum}\fill[fillstyle=solid,fillcolor=white]%
      \code{cmtx setmatrix stroke grestore}}}%
    \copy\slovax}
\def\slova#1{\epsnum=#1\relax\leavevmode\setbox\slovax=
     \hbox\bgroup\kern3mm\aftergroup\printbox\vbox\bgroup
     \vskip 1mm
       \baselineskip 12pt \xhelvm\sx\def\bf{\sxi}\raggedright
     \def\strut{\vrule width 0pt height 11pt depth 3.5pt\relax}
     \def\par{\ifhmode\crcr\else\noalign{\vskip 1mm}\egroup
               \egroup\kern3mm\egroup\fi}
     \obeylines\halign\bgroup&\hss##\hss\crcr\let\next}
\def\/{\kern.5pt/\llap{\red\scalebox{-1 1}{/}}}

\newdimen\thin     \thin 1pt %.3mm %.4pt
\newdimen\thick    \thick 1pt
\newdimen\sqwidth  \sqwidth 8mm
\newdimen\sqheight  \sqheight\sqwidth
\newdimen\rulew    \rulew 1pt  %.1mm
\newdimen\inhsize  \inhsize\hsize \advance\inhsize-2\thin
\newdimen\sqdp
\def\calculatedp{\setbox0\hbox{\xrm0}\sqdp\sqheight\advance\sqdp-\thin
                \advance\sqdp-\ht0 \sqdp.5\sqdp}
                
\def\squared #1{\dimen1=\sqwidth\advance\dimen1\thin \calculatedp
                \hbox{\lower\sqdp\hbox{\vbox to\sqheight{\vss
                  \hrule height \thin
                  \hbox to\dimen1{\vrule width\thin height\sqheight\hss
                   \vbox to\sqheight{
                     \vss
                      \hbox{\xrm#1\unskip}
                     \vss}\hss
                  \vrule width \thin}
                  \kern-\thin
                  \hrule height \thin\vss}}}}
\newdimen\kwidth  \kwidth 5mm
\newdimen\kheight \kheight1.4\kwidth
\newdimen\kartadp
\setbox0\hbox{\rm0} \kartadp1.4\kwidth
\advance\kartadp-\ht0 \kartadp.5\kartadp
\advance\kheight-\kartadp
\def\karta #1{\hbox{\lower\kartadp\hbox{\vbox to1.4\kwidth{\vss
                  \hrule height \thin
                  \hbox to\kwidth{\vrule width\thin height1.4\kwidth\hss
                   \vbox to 1.4\kwidth{
                     \vss
                      \hbox{\smash{\rm#1}}
                     \vskip\kartadp}\hss
                  \vrule width \thin}
                  \hrule height \thin\vss}}}}
\def\Karta#1[#2]{\psframe*[linewidth=0pt,linecolor=#2]%
     (0,\kheight)(\kwidth,-\kartadp)\karta{#1}}
\def\cbox #1{\hbox to 0pt{\hss #1\hss}}
\catcode`\�=4
\def\ms#1{\multispan{#1}}
\def\crr{\cr\noalign{\hrule height\thin}}
\def\STRUT{\vrule width 0pt height 16pt depth 6pt\relax}
\def\bigstrut{\vrule height 24pt width 0pt\relax}
\setbox\strutbox=\hbox{\vrule height.70833\baselineskip
                              depth .29167\baselineskip width\z@}
\def\Strut{\vrule height 16pt width 0pt\relax}
\def\struT{\vrule depth 6pt width 0pt\relax}
\def\Obr #1 {\bigskip\vbox to #1mm{}\bigbreak}
\def\SQO[#1,#2,#3>#4]{\vbox to#1{\hrule height #3 \vss
                  \hbox{\vrule width #3\hss
                  \vbox to#1{\vss\hbox to#2{\hss#4\hss}\vss}\hss
                  \vrule width #3}\vss\hrule height #3}}
\def\SQOc[#1,#2,#3>#4]<#5>{%
   \dimen2=#1\advance\dimen2-#3\advance\dimen2-#3\relax
      \vbox to#1{\hrule height #3
      \smash{\hbox to#2{\hskip#3\psframe*[linecolor=#5](#2,-\the\dimen2)\hss}}
         \nointerlineskip         \vss
                  \hbox{\vrule width #3\hss
                  \vbox to#1{\vss\hbox to#2{\hss#4\hss}\vss}\hss
                  \vrule width #3}\vss\hrule height #3}}
\def\SQ[#1,#2]{\SQO[#1,#1,#2>{}]}
\def\cc #1{\hbox to15pt
    {\pscircle[linewidth=.4pt,fillstyle=solid](7.5pt,.5ex){7.5pt}%
    \hskip 7.5pt\hbox to 0pt{\hss\xrm#1\hss}%
    \hss}}
\def\Cc #1{\hbox to18pt
    {\hskip 9pt\hbox to 0pt{\hss\xrm#1\hss}%
    \raise.5ex\hbox{\circle\char'156 }\hss}}
\newif\ifL             \newif\ifR
\def\make #1{\def\nxt{#1}\ifx\nxt\empty\relax\else\takeargs#1\fi}
\def\makel #1{\Ltrue\takeargs#1}
\def\maker #1{\Rtrue\takeargs#1}
\def\takeargs #1<#2>{\SQOc[13.46mm,17mm,2\thin>
              {\ifR\hfill\fi$#1$\ifL\hfill\fi} ]<#2>\ignorespaces}
\def\trycht[#1]{{\setbox0\hbox{\fnuceb\char0 }\catcode`\^^M=5 %
    \hbox to\wd0{\scalebox{2}{\pscustom
                 [linecolor=#1,linewidth=1pt]{\file{uceb1.0}}}\hss}}}
\def\dsip{\pscustom{\file{sipky.0}}}
\def\sipfill{\leaders
      \hbox{\sip\char0 }\hfil\kern-2mm{\sip\char11 }}
\def\Sipfill{\leaders
      \hbox{\raise1.5mm\hbox{\sip\char0 }}\hfil
              \kern-2mm\raise1.5mm\hbox{\sip\char11 }}
\def\# #1 #2 #3 {\line{\bigstrut{\ucebc\char#1 }\raise2pt\rlap{~\smash{#2}}~
         \hfil\raise 2pt\llap{\red\twelve$#3$}}\vskip2pt\hrule height\thin}
\def\cont#1. #2\page#3 #4< {\count222=#1\Color=\ifcase\count222{}
                        \or{\blue}\or{\red}\or{\green}\else{\orange}\fi
     \hrule height\rulew\vskip8pt
     \noindent{\the\Color\xxii#1. #2\unskip~\Dotfill~#3}\par
      \vbox to 35mm{\vskip3pt\ifnum\count222=4 \else\vss\fi
            \rightline{\epsfxsize35mm\epsfbox{#4}}\vss}}
\def\Dotfill{\cleaders\hbox to.5em{\hss.\hss}\hfill}
\def\?{{\red\mathtim?}}
\def\bxcolor[#1]#2{\leavevmode
     \setbox0\hbox{#2}\dimen0=\wd0 \advance\dimen0 6pt
                      \dimen1=\ht0 \advance\dimen1 6pt \dp0=0pt
     \psframe[fillstyle=solid,fillcolor=#1](\dimen0,\dimen1)
      \hbox to\dimen0{\hss
         \vbox to\dimen1{\vss\box0\vss}\hss}}
\def\makebx #1[#2,#3]{\vbox{\hrule height#3\hbox{\vrule width#3\kern#2pt
    \vbox{\kern#2pt\hbox{#1}\kern#2pt}\kern#2pt\vrule width#3}\hrule height#3}}
\def\bxdouble #1{\makebx{\makebx{#1}[4,.4pt]}[1,1pt]}
\def\_{{\red\underline{\quad}}}
\def\Number#1[#2]{%\hbox{\bxcolor[#2]{\hbox to\sqwidth{\hss\STRUT#1\hss}}}
   \hbox{\psframe[linestyle=none,fillstyle=solid,fillcolor=#2]%
         (\sqwidth,\sqheight)\kern-\thin
      \vbox{\hsize\sqwidth\squared{\sxb#1}\vskip0pt}}}
\newtoks\CofS   \CofS{white}
\def\takesq#1{\ifx*#1*\else\calculatedp
              \lower\sqdp\hbox{\psframe*[linecolor=\the\CofS,linestyle=none]%
              (\sqwidth,\sqheight)}\squared{#1}\fi}
\newif\ifcolor
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% meritka
\def\fiverule{\vrule height1mm depth1mm \relax}
\def\onerule{\vrule height.5mm depth.5mm \relax}
\def\inrule{\leaders\vrule height.2pt depth.2pt \hfil}

\def\meritko #1<{\NN=8 \leavevmode\vbox{
    \hbox to#1cm{\kern-.2pt
                 \fiverule\loop\ifnum\NN>4
                 \inrule\onerule\advance\NN-1 \repeat\inrule
                 \fiverule\loop\ifnum\NN>0
                 \inrule\onerule\advance\NN-1 \repeat\inrule \fiverule
                 \kern-.2pt}\nointerlineskip\vskip1pt
    \hbox to#1cm{\hbox to0pt{\hss0\hss}\hss5\hss
                 \hbox to0pt{\hss10\hss}}
}}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% colours
\newcmykcolor{greenblue}{.3 0 .1 0}
\newcmykcolor{green}{.5 0 .9 0}
\newcmykcolor{blue}{.9 .4 0 0}
\newcmykcolor{red}{.2 1 1 0}
\newcmykcolor{gray}{.2 0 0 .4}
\newcmykcolor{brown}{.5 .6 .9 0}
\newcmykcolor{lightblue}{.6 .2 .1 0}
\newcmykcolor{yellow}{0 .1 1 0}
\newcmykcolor{orange}{0 .5 1 0}
\newcmykcolor{violet}{.6 .8 .2 0}
\newcmykcolor{ocre}{0 .08 .2 0}
\newcmykcolor{cmyk}{1 1 1 1}
\newcmykcolor{Cyan}{1 0 0 0}
\newcmykcolor{Magenta}{0 1 0 0}
\newcmykcolor{Yellow}{0 0 1 0}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%  adopt mp files
\newcount\epsfurX   \newcount\epsfurY
\newdimen\figwd     \newdimen\fight     \newdimen\figdp
\newbox\figbox
\newcount\figcount
\let\Char\char
\def\fig<#1:#2>{% usage: \fig<2:uceb>, where 2 is the figure number
 \figcount=#1 \catcode`\^^M=5 %
 \setbox\figbox=\hbox{\Char\figcount }%
 \global\figwd=\wd\figbox \global\fight=\ht\figbox
 \global\figdp=\dp\figbox
 \setbox\figbox=\hbox{\epsffile{#2.#1}}%
    \epsfurX\epsfurx
    \epsfurY\epsfury
 \setbox\figbox=\hbox{\epsffile[0 0 {\the\epsfurX} {\the\epsfurY}]{#2.#1}}%
 \setbox\figbox=\hbox{\epsfxsize 2\wd\figbox
    \epsfurX\epsfurx
    \epsfurY\epsfury
    \hbox{\epsffile[0 0 {\the\epsfurX} {\the\epsfurY}]{#2.#1}}}%
 \zerobox\figbox%
 \hbox\bgroup\box\figbox % now add \point'ing commands and labels
 \vrule width0pt height\fight depth\figdp \kern\figwd \egroup
}
\def\zerobox #1{\ht#1=0pt \dp#1=0pt \wd#1=0pt }

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% output
\footline{\ifodd\pageno\hfill\fi
       {\the\Color\pagn\the\pageno}\hss}
\def\makefootline{\baselineskip11mm\line{\the\footline}\ifproof
         \line{\vbox to 0pt{\vss
               \vbox to\vsize{
                 \hrule height.2pt\vss
                 \line{\vrule height\vsize width.2pt\hss\vrule width.2pt}
                 \vss\hrule height.2pt}\vskip22mm}}
         \line{\hss\sevenrm\today, strana~\the\pageno\hss}\else
         \line{\cmyk
               \vbox to 0pt{\vss
               \vbox to\vsize{\vskip-16mm
                 \line{\kern-20mm\vrule width5mm height.8pt\kern3mm
                       \vrule height 8mm depth-3mm width.8pt\hss
                       \vrule height 8mm depth-3mm width.8pt\kern3mm
                       \vrule width5mm height.8pt\kern-20mm}
                 \vfil
                 \line{\kern-20mm\vrule width5mm height.8pt depth0pt\kern3mm
                       \vrule depth 8mm height-3mm width.8pt\hss
                       \vrule depth 8mm height-3mm width.8pt\kern3mm
                       \vrule width5mm height.8pt depth0pt\kern-20mm}
                 \vskip-30mm}\vskip 22mm}}
         \line{\hss\cmyk\sevenrm Sv�t ��sel~3 strana~\the\pageno\quad
           {\Cyan cyan} {\Magenta magenta} {\Yellow yellow} black\hss}
     \fi}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\def\ud{\char7 }
\def\un{\char92 }
\def\copyright{\char'247 }
\catcode`\@ \active  \def@{\relax\phantom0}
\catcode`\ \active
\def{\par\noindent\hangindent1.em
      \hbox to1.em{\hss${\blue\bullet}$\enspace}\ignorespaces}
\def\\{\hfil\break}

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% deti
\def\eva{\hskip7mm\scalebox{.83}{\epsfbox{eva.eps}}}
\def\vietnamka{\hskip7mm\scalebox{.83}{\epsfbox{vietn.eps}}}
\def\gisela{\hskip7mm\scalebox{.83}{\epsfbox{nemka.eps}}}
\def\jana{\hskip7mm\scalebox{.83}{\epsfbox{jana.eps}}}
\def\jirka{\hskip7mm\scalebox{.83}{\epsfbox{jirka.eps}}}
\def\lenka{\hskip7mm\scalebox{.83}{\epsfbox{lenka.eps}}}
\def\radek{\hskip7mm\scalebox{.83}{\epsfbox{radek.eps}}}
\def\marko{\hskip7mm\scalebox{.83}{\epsfbox{marko.eps}}}
\def\tomas{\hskip7mm\scalebox{.83}{\epsfbox{tomas.eps}}}
\def\bluerule{\bigskip{\blue\hrule height\rulew}\vskip 5mm}
\def\kalkula�ka{\noindent\vbox{\hrule
     \hbox{\vrule\scalebox{.75}{\epsfbox{kalk.eps}}\vrule}\hrule}}
\def\pravitko{\noindent\vbox{\hrule
     \hbox{\vrule\scalebox{.75}{\epsfbox{prav.eps}}\vrule}\hrule}}

\let\fnuceb\uceb
\let\fnucebb\ucebb
\let\fnucebc\ucebc
\let\fnucebd\ucebd
\let\fnucebm\ucebm
\let\fnsip\sip
\ifPS    %%%%%%%%%%%%%%%%%%%% substitution for pictures
\def\uceb{\leavevmode\def\char##1 {\fnuceb\fig<##1:uceb1>}}
\def\ucebb{\leavevmode\def\char##1 {\fnucebb\fig<##1:uceb2>}}
\def\ucebc{\leavevmode\def\char##1 {\fnucebc\fig<##1:uceb3>}}
\def\ucebd{\leavevmode\def\char##1 {\fnucebd\fig<##1:uceb4>}}
\def\sip{\leavevmode\def\char##1 {\fnsip\fig<##1:sipky>}}
\fi
\twelve

\endinput
% \input uceb0
% \input uceb1
% \input uceb2
% \input uceb3
% \input uceb4

\input tiraz
\end
