macros.tex

   1 % TeX macros for typesetting my PhD thesis
   2 % (c) 2008 Martin Mares <mj@ucw.cz>
   3
   4 \input epsf.tex
   5 \input btxmac.tex
   6 \input amssym.tex
   7
   8 \catcode`@=11
   9
  10 %%% Basic parameters %%%
  11
  12 % A4 with 1in margins, leaving 20pt for page numbering at the bottom
  13 \hsize=159mm
  14 \vsize=246mm
  15 \advance\vsize by -20pt
  16 \parindent=0.8cm
  17 \parskip=3pt plus 1pt minus 1pt
  18
  19 % Parameters for final typesetting (bigger inner margins etc.)
  20 \newif\iffinal
  21 \finaltrue
  22 \newdimen\hwobble
  23 \advance\hsize by -10mm
  24
  25 \iffinal
  26 \hwobble=10mm
  27 \else
  28 \hwobble=0mm
  29 \fi
  30
  31 % Glue
  32 \smallskipamount=4pt plus 1.2pt minus 1.2pt
  33 \medskipamount=7pt plus 2.5pt minus 2pt
  34 \bigskipamount=15pt plus 5pt minus 4pt
  35
  36 \abovedisplayskip=15pt plus 4pt minus 10pt
  37 \abovedisplayshortskip=0pt plus 3pt
  38 \belowdisplayskip=15pt plus 4pt minus 10pt
  39 \belowdisplayshortskip=8.5pt plus 3.5pt minus 4.5pt
  40
  41 %%% Miscellanea %%%
  42
  43 \def\em#1{{\it #1\/}}
  44 \def\df#1{{\it #1\/}}   % when we define something
  45 \def\O{{\cal O}}
  46 \def\<#1>{\ifmmode
  47     \mathchoice{\hbox{\it #1\/}}{\hbox{\it #1\/}}{\hbox{\eightti #1\/}}{\hbox{\sixti #1\/}}%
  48   \else\leavevmode\hbox{\it #1\/}\fi}
  49 \let\>=\noindent
  50 \def\qed{{\parfillskip=0pt\allowbreak\hfill\nobreak $\spadesuit$\par}}
  51 \def\qeditem{{\parfillskip=0pt\hfill\rlap{\hskip\rightskip\llap{$\spadesuit$}}\par}}
  52 \def\qedmath{\eqno{\spadesuit}}
  53 \def\FIXME#1{\>{\bo TODO:} #1}
  54 \def\symdiff{\mathbin{\Delta}}
  55 \def\rack#1#2{\setbox0=\hbox{#1}\hbox to \wd0{#2}}
  56 \def\o#1{\accent23 #1}
  57 \def\mst{\mathop{\rm mst}}
  58 \def\msf{\mathop{\rm msf}}
  59 \def\deg{\mathop{\rm deg}}
  60 \def\timesalpha{\mskip2mu\alpha}
  61 \def\timesbeta{\mskip2mu\beta}
  62 \def\tower{\mathbin\uparrow}
  63 \def\Forb{{\rm Forb}}
  64 \def\minorof{\preccurlyeq}
  65 \def\per{\mathop{\rm per}}
  66 \def\poly{\mathop{\rm poly}}
  67 \def\E{{\bb E}}
  68 \def\crpt{\mathbin{\Uparrow}}
  69 \def\C{{\cal C}}
  70
  71 \def\brk{\hfil\break}
  72
  73 % Bit strings
  74 \def\0{{\bf 0}}
  75 \def\1{{\bf 1}}
  76 \def\(#1){\mathord{\left<#1\right>}}
  77
  78 % Bitwise operations
  79 \def\shl{\mathbin{<\!<}}
  80 \def\shr{\mathbin{>\!>}}
  81 \def\bop#1{\mathbin{\hbox{\sc #1}}}
  82 \def\band{\bop{and}}
  83 \def\bor{\bop{or}}
  84 \def\bxor{\bop{xor}}
  85 \def\bnot{\mathop{\hbox{\sc not}}}
  86
  87 % A reversed version of \ddots with extra space at the top to get good alignment of exponents.
  88 \def\rddots{\mathinner{\mkern1mu\raise\p@\vbox{\kern7\p@\hbox{.}}\mkern2mu
  89     \raise4\p@\hbox{.}\mkern2mu\raise7\p@\hbox{.}\raise11\p@\hbox{}\mkern1mu}}
  90
  91 % Footnotes
  92 \newcount\footcnt
  93 \footcnt=0
  94 \def\foot#1{\global\advance\footcnt by 1{\parindent=0.25in\parskip=0pt\footnote{$^{\bf\the\footcnt}$}{#1}}}
  95
  96 %%% Fonts %%%
  97
  98 \font\twelverm=cmr12
  99 \font\twelveit=cmti12
 100 \font\twelvebf=cmbx12
 101
 102 %\font\twelverm=pplr8z at 12pt
 103 %\font\twelveit=pplri8z at 12pt
 104 %\font\twelvebf=pplb8z at 12pt
 105
 106 \font\twelvesl=cmsl12
 107 \font\twelveb=cmb12
 108 \font\twelvesc=cmcsc12
 109
 110 \def\mathf@nt#1#2#3#4{%
 111 \toks0=\expandafter{\csname#1#2\endcsname}%
 112 \expandafter\ifx\the\toks0\relax%
 113 %\immediate\write-1{bb \the\toks0=#4#2#3}%
 114 \global\expandafter\font\the\toks0=#4#2#3%
 115 \fi%
 116 \edef\m@@f{\the\toks0}}
 117
 118 \def\fntmathsize{12}
 119 \def\fntmathtok{twelve}
 120 \def\fntmathssize{8}
 121 \def\fntmathstok{eight}
 122 \def\fntmathsssize{6}
 123 \def\fntmathsstok{six}
 124
 125 \mathf@nt{\fntmathtok}{r}{\fntmathsize}{cm}\textfont0=\m@@f
 126 \mathf@nt{\fntmathstok}{r}{\fntmathssize}{cm}\scriptfont0=\m@@f
 127 \mathf@nt{\fntmathsstok}{r}{\fntmathsssize}{cm}\scriptscriptfont0=\m@@f
 128 \mathf@nt{\fntmathtok}{mi}{\fntmathsize}{cm}\skewchar\m@@f='177\textfont1=\m@@f
 129 \mathf@nt{\fntmathstok}{mi}{\fntmathssize}{cm}\skewchar\m@@f='177\scriptfont1=\m@@f
 130 \mathf@nt{\fntmathsstok}{mi}{\fntmathsssize}{cm}\skewchar\m@@f='177\scriptscriptfont1=\m@@f
 131 \mathf@nt{\fntmathtok}{sy}{\fntmathsize}{cm}\skewchar\m@@f='60\textfont2=\m@@f
 132 \mathf@nt{\fntmathstok}{sy}{\fntmathssize}{cm}\skewchar\m@@f='60\scriptfont2=\m@@f
 133 \mathf@nt{\fntmathsstok}{sy}{\fntmathsssize}{cm}\skewchar\m@@f='60\scriptscriptfont2=\m@@f
 134 \mathf@nt{\fntmathtok}{ex}{\fntmathsize}{cm}\textfont3=\m@@f\scriptfont3=\m@@f\scriptscriptfont3=\m@@f
 135 \mathf@nt{\fntmathtok}{ti}{\fntmathsize}{cm}\textfont\itfam=\m@@f
 136 \mathf@nt{\fntmathstok}{ti}{\fntmathssize}{cm}\scriptfont\itfam=\m@@f
 137 \mathf@nt{\fntmathsstok}{ti}{\fntmathssize}{cm}\scriptscriptfont\itfam=\m@@f
 138 \mathf@nt{\fntmathtok}{sl}{\fntmathsize}{cm}\textfont\slfam=\m@@f
 139 \mathf@nt{\fntmathtok}{bx}{\fntmathsize}{cm}\textfont\bffam=\m@@f
 140 \mathf@nt{\fntmathtok}{tt}{\fntmathsize}{cm}\hyphenchar\m@@f=-1\textfont\ttfam=\m@@f
 141 \mathf@nt{\fntmathtok}{msam}{\fntmathsize}{}\textfont\msafam=\m@@f
 142 \mathf@nt{\fntmathstok}{msam}{\fntmathssize}{}\scriptfont\msafam=\m@@f
 143 \mathf@nt{\fntmathsstok}{msam}{\fntmathsssize}{}\scriptscriptfont\msafam=\m@@f
 144 \mathf@nt{\fntmathtok}{msbm}{\fntmathsize}{}\textfont\msbfam=\m@@f
 145 \mathf@nt{\fntmathstok}{msbm}{\fntmathssize}{}\scriptfont\msbfam=\m@@f
 146 \mathf@nt{\fntmathsstok}{msbm}{\fntmathsssize}{}\scriptscriptfont\msbfam=\m@@f
 147
 148 % Blackboard bold font
 149 \newfam\bbfam
 150 \font\bbtwelve=bbm12
 151 \font\bbeight=bbm8
 152 \font\bbsix=bbm6
 153 \textfont\bbfam=\bbtwelve
 154 \scriptfont\bbfam=\bbeight
 155 \scriptscriptfont\bbfam=\bbsix
 156 \def\bb{\bbtwelve\fam\bbfam}
 157
 158 % Font switches
 159 \def\rm{\fam\z@\twelverm}
 160 \def\it{\fam\itfam\twelveit}
 161 \def\bo{\fam\bffam\twelveb}
 162 \def\bf{\fam\bffam\twelvebf}
 163 \def\tt{\fam\ttfam\twelvett\hyphenchar\twelvett=-1\relax}
 164 \def\sc{\twelvesc}
 165 \def\sl{\fam\slfam\twelvesl}
 166
 167 % Switch to 12pt baselines
 168 \rm
 169 \baselineskip=14.4pt
 170 \lineskip=1.2pt
 171 \setbox\strutbox=\hbox{\vrule height 10.2pt depth 4.2pt width 0pt}
 172
 173 % Other fonts
 174 \font\chapfont=csssdc17 scaled \magstep1
 175 \font\secfont=csb14
 176 \font\secitfont=csbxti14
 177
 178 %%% FIXME
 179 \footline={\hss\twelverm\folio\hss}
 180
 181 % We have to redefine \big and friends as we are using 12pt symbols
 182 \def\big#1{{\hbox{$\left#1\vbox to11.5\p@{}\right.\n@space$}}}
 183 \def\Big#1{{\hbox{$\left#1\vbox to14.5\p@{}\right.\n@space$}}}
 184 \def\bigg#1{{\hbox{$\left#1\vbox to17.5\p@{}\right.\n@space$}}}
 185 \def\Bigg#1{{\hbox{$\left#1\vbox to20.5\p@{}\right.\n@space$}}}
 186
 187 %%% Enumerated lists %%%
 188
 189 \newif\ifitem\itemtrue
 190 \newbox\itembox
 191 \newcount\itemcount
 192
 193 \def\interlistskip{\vskip 3pt plus 2pt minus 1pt}
 194
 195 \def\itemspacingrules{\ifitem\advance\leftskip by \parindent\parindent=0pt\itemfalse\else
 196 \advance\leftskip by 2.5em\fi\rightskip=\leftskip}
 197
 198 \def\inititemize{\interlistskip\begingroup
 199 \parskip=1pt plus 0.3pt minus 0.1pt
 200 \itemspacingrules}
 201
 202 \def\itemize#1{\inititemize\setbox\itembox\llap{#1\hskip 0.4em}%
 203 \let\:=\singleitem}
 204
 205 \def\singleitem{\par\leavevmode\copy\itembox}
 206
 207 \def\endlist{\interlistskip\endgroup}
 208
 209 \def\ibull{\raise0.2ex\hbox{$\bullet$}} % Signs frequently used for \itemize
 210 \def\icirc{\raise0.2ex\hbox{$\circ$}} % Signs frequently used for \itemize
 211 \def\idot{\raise0.2ex\hbox{$\cdot$}}
 212 \def\istar{\raise0.2ex\hbox{$\ast$}}
 213
 214 \def\numlist#1{\inititemize\itemcount=0\let\:=\numbereditem
 215 \let\itemnumbering=#1}
 216
 217 \def\numbereditem{\par\leavevmode\advance\itemcount by 1
 218 \llap{\itemnumbering\hskip 0.4em}}
 219
 220 \def\nnorm{\the\itemcount}
 221 \def\ndotted{\nnorm.}
 222 \def\nparen{\nnorm)}
 223 \def\nroman{\romannumeral\itemcount}
 224 \def\nromanp{\nroman)}
 225 \def\nalpha{\count@=96\advance\count@ by\itemcount\char\count@)}
 226 \def\nAlpha{\count@=64\advance\count@ by\itemcount\char\count@)}
 227 \def\ngreek{$\ifcase\itemcount\or\alpha\or\beta\or\gamma\or\delta\or\epsilon\or
 228 \zeta\or\eta\or\theta\or\iota\or\kappa\or\lambda\or\mu\or\nu\or\xi\or\pi\or\rho
 229 \or\sigma\or\tau\or\upsilon\or\phi\or\chi\or\psi\or\omega\fi$)}
 230
 231 % New \frenchspacing, which doesn't leave unwanted spaces in text.
 232 \def\frenchsp@cing{\sfcode`\.\@m \sfcode`\?\@m \sfcode`\!\@m%
 233 \sfcode`\:\@m \sfcode`\;\@m \sfcode`\,\@m}
 234
 235 %%% Local verbatim mode %%%
 236
 237 \def\make@ther#1{\catcode`#1=12\relax}
 238 \def\setverb@tim{\tt\frenchsp@cing\catcode`\`=13\catcode`\'=13\n@ligs%
 239 \let\do=\make@ther\dospecials\obeyspaces}
 240
 241 {\catcode`'=13
 242 \catcode``=13
 243 \gdef\n@ligs{\def`{\relax\lq}\def'{\relax\rq}}}
 244
 245 {\obeyspaces
 246 \global\chardef\sp@ce=32
 247 \gdef\showspaces{\let =\sp@ce}
 248 \global\let =\ }
 249
 250 \catcode124=\active % Make | active
 251 \def\ttst@rt{\begingroup\setverb@tim\let|=\endgroup}
 252 \let|=\ttst@rt
 253
 254 %%% Verbatim mode for text in { } %%%
 255
 256 \newskip\verbglue\newskip\verblineglue
 257 \verbglue=3pt plus 1pt minus 0.3pt
 258 \verblineglue=0pt plus 1.5pt
 259 \def\verblocaldefs{}
 260
 261 \newdimen\tabwidth
 262 \newcount\tabsize
 263 \tabsize=8
 264 \newdimen\t@b
 265
 266 \newcount\vercnt
 267 \def\v@rbend{\par\endgroup\vskip\verbglue}
 268 \def\v@rbl{\ifnum\vercnt>0\{\fi\global\advance\vercnt by 1\relax}
 269 \def\v@rbr{\ifnum\vercnt>1\}\else\v@rbend\fi\global\advance\vercnt by -1\relax}
 270 \def\v@rbparams{\setverb@tim\parskip=\verblineglue\parindent=0pt\raggedbottom%
 271 \rightskip\z@ plus1fil\pretolerance=10000\tolerance=10000\vercnt=0%
 272 \catcode124=12\setupt@bs\vskip\verbglue\defb@x\obeylines}
 273
 274 \def\startb@x{\setbox0=\hbox\bgroup}
 275 \def\defb@x{\def\par{\leavevmode\egroup\box0\endgraf}%
 276 \everypar{\startb@x}}
 277
 278 {\catcode`\^^I=\active
 279 \gdef\setupt@bs{\catcode`\^^I=\active
 280 \setbox0=\hbox{\tt\ }\tabwidth=\wd0\multiply\tabwidth by \tabsize
 281 \def^^I{\leavevmode\egroup\t@b=\wd0\divide\t@b by \tabwidth%
 282 \multiply\t@b by \tabwidth%
 283 \advance\t@b by \tabwidth\advance\t@b by -\wd0\box0\hbox to \t@b{}\startb@x}
 284 }}
 285
 286 {
 287 \catcode`[=1\catcode`]=2\catcode123=\active\catcode125=\active
 288 \gdef\verbatim[\begingroup\v@rbparams\catcode123=\active\catcode125=\active%
 289 \let{=\v@rbl\let}=\v@rbr\chardef\{=123\chardef\}=125\verblocaldefs
 290 ]]
 291
 292 \def\verbinput#1{\begingroup\v@rbparams\input #1\endgroup}
 293
 294 %%% Algorithms %%%
 295
 296 %       \algo{jmeno algoritmu}
 297 %       \algin popis vstupu
 298 %       \:krok
 299 %       \:krok
 300 %       \::vnoreny krok
 301 %       \algout popis vystupu
 302 %       \endalgo
 303
 304 \def\algo{
 305 \interlistskip
 306 \begingroup
 307 \let\:=\algoitem
 308 \parskip=1pt plus 1pt minus 0.3pt
 309 \rightskip=2em
 310 \itemcount=0
 311 \smallskip
 312 }
 313 \def\endalgo{\interlistskip\endgroup}
 314 \def\algopar{\par
 315 \parindent=2em
 316 \hangindent=4em
 317 \hangafter=1
 318 \leavevmode
 319 }
 320 \def\algoitem{
 321 \algopar\advance\itemcount by 1
 322 \hbox to 2em{\hss \the\itemcount. }%
 323 \futurelet\next\algoitemh}
 324 \def\algoitemh{\ifx\next:\let\next=\algohang\else\let\next=\relax\fi\next}
 325 \def\algohang:{\advance\hangindent by 2em \hskip 2em\futurelet\next\algoitemh}
 326 \def\algin{\par{\sl Input:\/} }
 327 \def\algout{\par{\sl Output:\/} }
 328
 329 %%% Constructs used in algorithms %%%
 330
 331 \def\={\leftarrow}
 332 \def\cmt#1{~~{\sl (#1)}}
 333
 334 %%% Chapters, sections and proclamations %%%
 335
 336 \newcount\chapcount
 337 \newcount\seccount
 338 \newcount\thmcount
 339 \newcount\tmpcount
 340 \chapcount=0
 341 \seccount=0
 342 \thmcount=0
 343 \def\currentid{??}
 344 \def\currentchap{??}
 345
 346 \def\appendices{\chapcount=99}
 347
 348 \def\oddpage{%
 349 \iffinal
 350   \ifodd\pageno
 351   \else
 352     \hglue 1in \vfill\supereject
 353   \fi
 354 \fi
 355 }
 356
 357 \def\rawchapter#1{\vfill\supereject
 358 \oddpage
 359 \leftline{\chapfont #1}
 360 \bigskip
 361 }
 362
 363 \def\unchapter#1{
 364 \rawchapter{#1}
 365 \writetoc{unchap}{#1}
 366 }
 367
 368 \def\chapter#1{\advance\chapcount by 1
 369 \seccount=0
 370 \thmcount=0
 371 \footcnt=0
 372 % Chapter name
 373   \ifnum\chapcount>99
 374     \tmpcount=\chapcount
 375     \advance\tmpcount by -100
 376     \edef\currentchap{\ifcase\tmpcount A\or B\or C\or D\or E\or ZZZ\fi}
 377   \else
 378     \edef\currentchap{\the\chapcount}
 379   \fi
 380 \edef\currentid{\currentchap}
 381 \rawchapter{\currentid. #1}
 382 \writetoc{chap}{#1}
 383 }
 384
 385 \def\vensure#1{\dimen0=#1
 386 \vskip 0pt plus \dimen0
 387 \penalty-1000
 388 \vskip 0pt plus -\dimen0
 389 }
 390
 391 \def\section#1{\bigskip
 392 \vensure{0.5in}
 393 \advance\seccount by 1
 394 \thmcount=0
 395 \edef\currentid{\currentchap.\the\seccount}
 396 \leftline{\secfont\currentid. #1}
 397 \nobreak
 398 \medskip
 399 \nobreak
 400 \writetoc{sec}{#1}
 401 }
 402
 403 \def\para{\advance\thmcount by 1
 404 \edef\currentid{\currentchap.\the\seccount.\the\thmcount}
 405 \noindent {\bo \currentid.\enspace}}
 406
 407 \def\proclaim#1{\para {\bo #1.\enspace}}
 408
 409 \def\thm{\proclaim{Theorem}}
 410 \def\lemma{\proclaim{Lemma}}
 411 \def\defn{\proclaim{Definition}}
 412 \def\problem{\proclaim{Problem}}
 413 \def\obs{\proclaim{Observation}}
 414 \def\rem{\proclaim{Remark}}
 415 \def\alg{\proclaim{Algorithm}}
 416 \def\impl{\proclaim{Implementation}}
 417 \def\cor{\proclaim{Corollary}}
 418 \def\nota{\proclaim{Notation}}
 419 \def\example{\proclaim{Example}}
 420
 421 \def\label#1{{\sl (#1)\/}\enspace}
 422 \def\labelx#1{\label{#1}\hfil\break\kern 0pt}   % Eat spaces
 423
 424 \def\thmn{\thm\labelx}
 425 \def\lemman{\lemma\labelx}
 426 \def\defnn{\defn\labelx}
 427 \def\corn{\cor\labelx}
 428 \def\algn{\alg\label}
 429 \def\notan{\nota\labelx}
 430 \def\examplen{\example\labelx}
 431 \def\problemn{\problem\labelx}
 432 \def\remn{\rem\labelx}
 433
 434 \def\paran#1{\para {\sl #1.\/}\enspace\kern 0pt}
 435
 436 \def\proof{\noindent {\sl Proof.}\enspace}
 437 \def\proofsketch{\noindent {\sl Proof sketch.}\enspace}
 438
 439 %%% Table of contents %%%
 440
 441 \newwrite\toc
 442 \immediate\openout\toc=\jobname.toc
 443 \newif\iftoc
 444 \tocfalse
 445
 446 \def\writetoc#1#2{
 447   \toctrue
 448   \toks0={\the\pageno}
 449   \edef\tocaux{\write\toc{\noexpand\expandafter\noexpand\string\noexpand\csname toc#1\noexpand\endcsname{\currentid}{#2}{\the\toks0}}}
 450   \tocaux
 451   \tocfalse
 452 }
 453
 454 \newwrite\tok
 455 \def\includetoc{
 456 \immediate\openin\tok=\jobname.tok
 457 \ifeof\tok
 458 \else
 459 \input \jobname.tok
 460 \fi
 461 \immediate\closein\tok
 462 }
 463
 464 \def\tocchap#1#2#3{\smallskip\line{\bo #1.~~#2 \dotfill ~#3}}
 465 \def\tocsec#1#2#3{\line{#1.~~#2 \dotfill ~#3}}
 466 \def\tocunchap#1#2#3{\smallskip\line{\bo #2 \dotfill ~#3}}
 467
 468 %%% References %%%
 469
 470 \newwrite\ids
 471 \def\writeid#1#2{\immediate\write\ids{\string\def\expandafter\string\csname id#1\endcsname{#2}}}
 472
 473 \immediate\openin\ids=\jobname.ids
 474 \ifeof\ids
 475 \else
 476 \input \jobname.ids
 477 \fi
 478 \immediate\closein\ids
 479 \immediate\openout\ids=\jobname.ids
 480
 481 \def\ref#1{\expandafter\ifx\csname id#1\endcsname\relax
 482 {\bo ??}%
 483 \immediate\write16{*** Warning: Reference #1 undefined ***}%
 484 \else
 485 \csname id#1\endcsname
 486 \fi
 487 }
 488
 489 \def\id#1{\writeid{#1}{\currentid}}
 490
 491 %%% Bibliography %%%
 492
 493 %\bibliographystyle{abbrv}
 494 \bibliographystyle{alpha}
 495 \def\dumpbib{
 496   \def\bblhook{\parskip=2pt plus 1pt minus 0.5pt}
 497   \bibliography{biblio}
 498 }
 499
 500 %%% Figures %%%
 501
 502 \def\float#1#2{\midinsert
 503 \medskip
 504 \centerline{#1}
 505 \medskip
 506 \smallskip
 507 \centerline{#2}
 508 \endinsert}
 509
 510 \def\figure#1#2#3{\float{\epsfxsize=#2\epsfbox{pic/#1}}{#3}}
 511
 512 \def\multicap#1{
 513 \let\\=\break
 514 \vbox{\hsize=0.7\hsize
 515 \parindent=0pt
 516 \leftskip=0pt plus 0.3\hsize
 517 \rightskip=\leftskip
 518 \parfillskip=0pt
 519 #1
 520 }}
 521
 522 %%% Stand-alone chapters %%%
 523
 524 \def\endpart{
 525   \section{Bibliography}
 526   \dumpbib
 527   \vfill\supereject\end
 528 }
 529
 530 %%% Hyphenation %%%
 531
 532 \hyphenation{Ra-ma-chan-dran}
 533
 534 %%% Output routine %%%
 535
 536 \output{\sagaoutput}
 537
 538 \def\sagaoutput{\ifodd\pageno \hoffset=\hwobble \else \hoffset=0pt \fi
 539 \plainoutput}
 540
 541 \def\makefootline{\baselineskip30pt\lineskiplimit 0pt\line{\the\footline}}
 542
 543 \footline={\ifodd\pageno
 544   {\hfil\twelvemi\the\pageno}%
 545 \else
 546   {\twelvemi\the\pageno\hfil}%
 547 \fi
 548 }
 549
 550 %%% The End %%%
 551
 552 \catcode`@=12