sgr.tex

   1 % Makra pro sazbu poznamek ze Seminare z grafovych algoritmu
   2
   3 \input mjmac.tex
   4 \input epsf.tex
   5
   6 \language=\czech
   7 \chyph
   8
   9 % A4 s 0.5in okraji
  10 \hsize=184.6mm
  11 \vsize=271.6mm
  12
  13 \parindent=0.25in
  14
  15 % Zacatek prednasky {cislo prednasky}{jmeno prednasky}{jmeno zapisovatele}
  16 \def\prednaska#1#2#3{%
  17 \line{{\Large\bf #1. #2} \hfil {\it (#3)}}
  18 \medskip
  19 \hrule
  20 \medskip
  21 }
  22
  23 % Nadpis {text}
  24 \def\h#1{\bigbreak\leftline{\bf #1}\smallskip}
  25
  26 % Zvyrazneny zacatek odstavce coby podnadpis (napr. vety apod.)
  27 \def\s#1{\noindent {\bo #1}}
  28
  29 % Ctverecek na konci dukazu
  30 %\def\qed{{\parfillskip=0pt\quad\hfil\hbox{\I QED} \par}}
  31 \def\qed{\hfill\allowbreak\hfill\nobreak $\heartsuit$\par}
  32
  33 % Poznamky pod carou
  34 \newcount\footcnt
  35 \footcnt=0
  36 \def\foot#1{\global\advance\footcnt by 1{\parindent=0.25in\parskip=0pt\footnote{$^{[\the\footcnt]}$}{#1}}}
  37
  38 % \noindent se casto hodi, tak na nej mame zkratku
  39 \let\>=\noindent
  40
  41 % Sazba algoritmu:
  42 %       \algo
  43 %       \:krok
  44 %       \:krok
  45 %       \::vnoreny krok
  46 %       \endalgo
  47
  48 \def\algo{
  49 \interlistskip
  50 \begingroup
  51 \let\:=\algoitem
  52 \let\*=\algohang
  53 \parskip=1pt plus 1pt minus 0.3pt
  54 \itemcount=0
  55 }
  56 \def\endalgo{\interlistskip\endgroup}
  57 \def\algoitem{\par
  58 \parindent=2em
  59 \hangindent=4em
  60 \hangafter=1
  61 \advance\itemcount by 1
  62 \leavevmode\hbox to 2em{\hss \the\itemcount. }%
  63 \futurelet\next\algoitemh}
  64 \def\algoitemh{\ifx\next:\let\next=\algohang\else\let\next=\relax\fi\next}
  65 \def\algohang:{\advance\hangindent by 2em \hskip 2em\futurelet\next\algoitemh}
  66
  67 % Nekolikapismenkova promenna (mozno pouzit v textovem i math modu)
  68 \def\<#1>{\hbox{\it #1}}
  69
  70 % Asymptoticke O-cko
  71 \def\O{{\cal O}}
  72
  73 % Vlozeni obrazku {obrazek}{popisek}{sirka}
  74 \def\figure#1#2#3{\bigskip\vbox{\centerline{\epsfxsize=#3\epsfbox{#1}}\smallskip\centerline{#2}}\bigskip}