1 | \usepackage[utf8]{inputenc} |
---|
2 | \def\currversion{Abr 01, 2014} |
---|
3 | %% libros_cenditel.cls |
---|
4 | %****************************************************************% |
---|
5 | %* *% |
---|
6 | %* Preparado por Rodolfo Sumoza. *% |
---|
7 | %* Basado en la plantilla para libros wileysix.cls *% |
---|
8 | %* Fundación CENDITEL *% |
---|
9 | %* MPPCTI *% |
---|
10 | %* *% |
---|
11 | %* *% |
---|
12 | %****************************************************************% |
---|
13 | |
---|
14 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
---|
15 | %% Contenido de la macro: |
---|
16 | %% Dimensiones |
---|
17 | %% Parámetros Globales |
---|
18 | %% Listas |
---|
19 | %% Páginas de Título, Prefacio, Introducción |
---|
20 | %% Comandos de Partes, Capítulos, y Apéndices |
---|
21 | %% Contadores |
---|
22 | %% Nombres a nivel de encabezado |
---|
23 | %% Comandos de Sección |
---|
24 | %% Verso, Espacios, Extracción |
---|
25 | %% Matemáticas |
---|
26 | %% Títulos de Figuras y Tablas |
---|
27 | %% Tabla de Contenidos, Listas de Figuras, LOT |
---|
28 | %% Bibliografía, Referencias |
---|
29 | %% Pie de páginas |
---|
30 | %% Encabezados |
---|
31 | %% Tipos de letra para lugares específicos |
---|
32 | %% Algoritmos |
---|
33 | %% Glosario |
---|
34 | %% Índice |
---|
35 | %% Índices Múltiples |
---|
36 | %% Líneas de borrador |
---|
37 | %% Problemas propuestos |
---|
38 | %% Ejercicios |
---|
39 | %% Soluciones |
---|
40 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
---|
41 | |
---|
42 | |
---|
43 | \typeout{^^J^^J |
---|
44 | Estilo de libro Fundación CENDITEL^^J |
---|
45 | ^^J |
---|
46 | Escrito por Rodolfo L. Sumoza Matos, Fundación CENDITEL.^^J |
---|
47 | ^^J |
---|
48 | Fecha de la versión: \currversion^^J^^J} |
---|
49 | |
---|
50 | |
---|
51 | |
---|
52 | \expandafter\ifx\csname mathunderscore\endcsname\relax |
---|
53 | \def\mathunderscore{\leavevmode\kern.06em\vbox{\hrule width.3em}} |
---|
54 | \def\mathellipsis{\mbox {$\m@th{\,.\,.\,.}\,$}}\fi |
---|
55 | \global\newdimen\phspace |
---|
56 | |
---|
57 | \parindent=1pc |
---|
58 | \parskip=0pt %se agrega .1pt |
---|
59 | |
---|
60 | %% para hacer el tamaño 6 1/8 por 9 1/4 |
---|
61 | \textheight=45pc \textwidth=28pc |
---|
62 | |
---|
63 | \topmargin.75in |
---|
64 | \headheight 12pt |
---|
65 | \headsep 18pt |
---|
66 | \topskip 10pt |
---|
67 | \footskip 18pt |
---|
68 | |
---|
69 | \columnsep 10pt |
---|
70 | \columnseprule 0pt |
---|
71 | |
---|
72 | \footnotesep 6.65pt |
---|
73 | \skip\footins 18pt |
---|
74 | |
---|
75 | \floatsep 12pt plus 2pt minus 2pt |
---|
76 | \textfloatsep 20pt plus 2pt minus 4pt |
---|
77 | \intextsep 12pt plus 2pt minus 2pt |
---|
78 | |
---|
79 | \dblfloatsep 12pt plus 2pt minus 2pt |
---|
80 | \dbltextfloatsep 20pt plus 2pt minus 4pt |
---|
81 | |
---|
82 | \@fptop 0pt plus 1fil |
---|
83 | \@fpsep 8pt plus 2fil |
---|
84 | \@fpbot 0pt plus 1fil |
---|
85 | \@dblfptop 0pt plus 1fil |
---|
86 | \@dblfpsep 8pt plus 2fil |
---|
87 | \@dblfpbot 0pt plus 1fil |
---|
88 | |
---|
89 | \maxdepth=4pt %% |
---|
90 | |
---|
91 | \oddsidemargin-18pt |
---|
92 | \advance\oddsidemargin-.5in |
---|
93 | \evensidemargin-6pt |
---|
94 | \oddsidemargin=100pt |
---|
95 | |
---|
96 | \advance\oddsidemargin-.5in |
---|
97 | \evensidemargin=0pt |
---|
98 | \advance\evensidemargin-.5in |
---|
99 | \marginparwidth .75in |
---|
100 | |
---|
101 | \if@twocolumn |
---|
102 | \setlength\marginparsep {10\p@} |
---|
103 | \else |
---|
104 | \setlength\marginparsep{7\p@} |
---|
105 | \fi |
---|
106 | \setlength\marginparpush{5\p@} |
---|
107 | |
---|
108 | \setlength\partopsep{2\p@ \@plus 1\p@ \@minus 1\p@} |
---|
109 | |
---|
110 | %%% |
---|
111 | \setcounter{topnumber}{10} |
---|
112 | \def\topfraction{.9} |
---|
113 | \setcounter{bottomnumber}{10} |
---|
114 | \def\bottomfraction{.9} |
---|
115 | \setcounter{totalnumber}{20} |
---|
116 | \def\textfraction{.1} |
---|
117 | \def\floatpagefraction{.5} |
---|
118 | \setcounter{dbltopnumber}{2} |
---|
119 | \def\dbltopfraction{.7} |
---|
120 | \def\dblfloatpagefraction{.5} |
---|
121 | %%% |
---|
122 | |
---|
123 | \setlength\arraycolsep{5\p@} |
---|
124 | \tabcolsep 6pt |
---|
125 | |
---|
126 | \setlength\arrayrulewidth{.4\p@} |
---|
127 | \setlength\doublerulesep{2\p@} |
---|
128 | \setlength\tabbingsep{\labelsep} |
---|
129 | \skip\@mpfootins = \skip\footins |
---|
130 | \setlength\fboxsep{3\p@} |
---|
131 | \setlength\fboxrule{.4\p@} |
---|
132 | |
---|
133 | \setlength\columnsep{10\p@} |
---|
134 | \setlength\columnseprule{0\p@} |
---|
135 | |
---|
136 | %%%%%%%%%%%%%%% <<== final de las dimensiones |
---|
137 | |
---|
138 | %%% Parámetros globales ==>> |
---|
139 | |
---|
140 | \setcounter{secnumdepth}{3} |
---|
141 | \setcounter{tocdepth}{2} |
---|
142 | |
---|
143 | %% Diferenciar la posición izquierda y derecha de las páginas. |
---|
144 | \@twosidetrue \@mparswitchtrue |
---|
145 | \@twocolumnfalse |
---|
146 | |
---|
147 | \newif\if@openbib |
---|
148 | \@openbibfalse |
---|
149 | \newif\if@openright |
---|
150 | \newif\if@mainmatter |
---|
151 | \newif\if@restonecol |
---|
152 | \newif\if@titlepage |
---|
153 | \newif\ifdraft |
---|
154 | |
---|
155 | %% Iniciar un nuevo capítulo en el lado derecho |
---|
156 | \newif\if@openright |
---|
157 | \@openrighttrue |
---|
158 | |
---|
159 | |
---|
160 | \newcommand{\contentsname}{CONTENIDOS} |
---|
161 | \newcommand{\listfigurename}{Lista de Figuras} |
---|
162 | \newcommand{\listtablename}{Lista de Tablas} |
---|
163 | \newcommand{\bibname}{Bibliografía} |
---|
164 | \newcommand{\indexname}{ÍNDICE} |
---|
165 | \newcommand{\figurename}{Figura} |
---|
166 | \newcommand{\tablename}{Tabla} |
---|
167 | \newcommand{\partname}{PARTE} |
---|
168 | \newcommand{\chaptername}{Capítulo} |
---|
169 | \newcommand{\appendixname}{Apéndice} |
---|
170 | |
---|
171 | %%% <== Fin de Parámetros globales |
---|
172 | |
---|
173 | \ProcessOptions |
---|
174 | |
---|
175 | |
---|
176 | \NeedsTeXFormat{LaTeX2e} |
---|
177 | |
---|
178 | \newcommand{\@ptsize}{} |
---|
179 | |
---|
180 | \renewcommand{\normalsize}{% |
---|
181 | \ifdraft |
---|
182 | \@setfontsize\normalsize\@xpt\@xviipt |
---|
183 | \else |
---|
184 | \@setfontsize\normalsize\@xpt\@xiipt |
---|
185 | \fi |
---|
186 | \abovedisplayskip 10\p@ \@plus2\p@ \@minus5\p@ |
---|
187 | \abovedisplayshortskip \z@ \@plus3\p@ |
---|
188 | \belowdisplayshortskip 6\p@ \@plus3\p@ \@minus3\p@ |
---|
189 | \belowdisplayskip \abovedisplayskip |
---|
190 | \let\@listi\@listI} |
---|
191 | \normalsize |
---|
192 | \newcommand{\small}{% |
---|
193 | \ifdraft |
---|
194 | \@setfontsize\small\@ixpt{17}% |
---|
195 | \else |
---|
196 | \@setfontsize\small\@ixpt{11}% |
---|
197 | \fi |
---|
198 | \abovedisplayskip 8.5\p@ %\@plus3\p@ \@minus4\p@ |
---|
199 | \abovedisplayshortskip \z@ %\@plus2\p@ |
---|
200 | \belowdisplayshortskip 4\p@ %\@plus2\p@ \@minus2\p@ |
---|
201 | \def\@listi{\leftmargin\leftmargini |
---|
202 | \topsep 4\p@ \@plus2\p@ \@minus2\p@ |
---|
203 | \parsep 2\p@ \@plus\p@ \@minus\p@ |
---|
204 | \itemsep \parsep}% |
---|
205 | \belowdisplayskip \abovedisplayskip |
---|
206 | } |
---|
207 | \newcommand{\footnotesize}{% |
---|
208 | \ifdraft |
---|
209 | \@setfontsize\footnotesize\@viiipt{17}% |
---|
210 | \else |
---|
211 | \@setfontsize\footnotesize\@viiipt{9.5}% |
---|
212 | \fi |
---|
213 | \abovedisplayskip 6\p@ %\@plus2\p@ \@minus4\p@ |
---|
214 | \abovedisplayshortskip \z@ %\@plus\p@ |
---|
215 | \belowdisplayshortskip 3\p@ %\@plus\p@ \@minus2\p@ |
---|
216 | \def\@listi{\leftmargin\leftmargini |
---|
217 | \topsep 3\p@ \@plus\p@ \@minus\p@ |
---|
218 | \parsep 2\p@ \@plus\p@ \@minus\p@ |
---|
219 | \itemsep \parsep}% |
---|
220 | \belowdisplayskip \abovedisplayskip |
---|
221 | } |
---|
222 | \newcommand{\xscriptsize}{\@setfontsize\scriptsize\@vipt\@viipt} |
---|
223 | \newcommand{\scriptsize}{\@setfontsize\scriptsize\@viipt\@viiipt} |
---|
224 | \newcommand{\tiny}{\@setfontsize\tiny\@vpt\@vipt} |
---|
225 | \newcommand{\large}{\@setfontsize\large\@xiipt{14}} |
---|
226 | \newcommand{\Large}{\@setfontsize\Large\@xivpt{18}} |
---|
227 | \newcommand{\LARGE}{\@setfontsize\LARGE\@xviipt{22}} |
---|
228 | \newcommand{\huge}{\@setfontsize\huge\@xxpt{25}} |
---|
229 | \newcommand{\Huge}{\@setfontsize\Huge\@xxvpt{30}} |
---|
230 | |
---|
231 | |
---|
232 | \@maxdepth\maxdepth |
---|
233 | \DeclareOldFontCommand{\rm}{\normalfont\rmfamily}{\mathrm} |
---|
234 | \DeclareOldFontCommand{\sf}{\normalfont\sffamily}{\mathsf} |
---|
235 | \DeclareOldFontCommand{\tt}{\normalfont\ttfamily}{\mathtt} |
---|
236 | \DeclareOldFontCommand{\bf}{\normalfont\bfseries}{\mathbf} |
---|
237 | \DeclareOldFontCommand{\it}{\normalfont\itshape}{\mathit} |
---|
238 | \DeclareOldFontCommand{\sl}{\normalfont\slshape}{\@nomath\sl} |
---|
239 | \DeclareOldFontCommand{\sc}{\normalfont\scshape}{\@nomath\sc} |
---|
240 | \DeclareRobustCommand{\cal}{\@fontswitch{\relax}{\mathcal}} |
---|
241 | \DeclareRobustCommand{\mit}{\@fontswitch{\relax}{\mathnormal}} |
---|
242 | |
---|
243 | |
---|
244 | \lineskip 1pt |
---|
245 | \normallineskip 1pt |
---|
246 | \def\baselinestretch{1} |
---|
247 | |
---|
248 | \normalsize |
---|
249 | %% <<== Fin de información sobre fuentes |
---|
250 | |
---|
251 | |
---|
252 | %% Listas ==>> |
---|
253 | |
---|
254 | \leftmargini 20pt |
---|
255 | \leftmarginii 15pt |
---|
256 | \leftmarginiii 36pt |
---|
257 | \leftmarginiv 17pt |
---|
258 | \leftmarginv 10pt |
---|
259 | \leftmarginvi 10pt |
---|
260 | |
---|
261 | \def\@listI{\leftmargin\leftmargini |
---|
262 | \parsep 4\p@ \@plus2\p@ \@minus\p@ |
---|
263 | \topsep 8\p@ \@plus2\p@ \@minus4\p@ |
---|
264 | \itemsep4\p@ \@plus2\p@ \@minus\p@} |
---|
265 | \let\@listi\@listI |
---|
266 | \@listi |
---|
267 | \def\@listii {\leftmargin\leftmarginii |
---|
268 | \labelwidth\leftmarginii |
---|
269 | \advance\labelwidth-\labelsep |
---|
270 | \topsep 4\p@ \@plus2\p@ \@minus\p@ |
---|
271 | \parsep 2\p@ \@plus\p@ \@minus\p@ |
---|
272 | \itemsep \parsep} |
---|
273 | \def\@listiii{\leftmargin\leftmarginiii |
---|
274 | \labelwidth\leftmarginiii |
---|
275 | \advance\labelwidth-\labelsep |
---|
276 | \topsep 2\p@ \@plus\p@\@minus\p@ |
---|
277 | \parsep \z@ |
---|
278 | \partopsep \p@ \@plus\z@ \@minus\p@ |
---|
279 | \itemsep \topsep} |
---|
280 | \def\@listiv {\leftmargin\leftmarginiv |
---|
281 | \labelwidth\leftmarginiv |
---|
282 | \advance\labelwidth-\labelsep} |
---|
283 | \def\@listv {\leftmargin\leftmarginv |
---|
284 | \labelwidth\leftmarginv |
---|
285 | \advance\labelwidth-\labelsep} |
---|
286 | \def\@listvi {\leftmargin\leftmarginvi |
---|
287 | \labelwidth\leftmarginvi |
---|
288 | \advance\labelwidth-\labelsep} |
---|
289 | |
---|
290 | |
---|
291 | |
---|
292 | \leftmargin\leftmargini |
---|
293 | \labelsep 5pt |
---|
294 | \labelwidth\leftmargini\advance\labelwidth-\labelsep |
---|
295 | |
---|
296 | |
---|
297 | \setlength \labelwidth{\leftmargini} |
---|
298 | \addtolength\labelwidth{-\labelsep} |
---|
299 | |
---|
300 | \@beginparpenalty -\@lowpenalty |
---|
301 | \@endparpenalty -\@lowpenalty |
---|
302 | \@itempenalty -\@lowpenalty |
---|
303 | |
---|
304 | \renewcommand{\theenumi}{\arabic{enumi}} |
---|
305 | \renewcommand{\theenumii}{\alph{enumii}} |
---|
306 | \renewcommand{\theenumiii}{\roman{enumiii}} |
---|
307 | \renewcommand{\theenumiv}{\Alph{enumiv}} |
---|
308 | \newcommand{\labelenumi}{\theenumi.} |
---|
309 | \newcommand{\labelenumii}{(\theenumii)} |
---|
310 | \newcommand{\labelenumiii}{\theenumiii.} |
---|
311 | \newcommand{\labelenumiv}{\theenumiv.} |
---|
312 | \renewcommand{\p@enumii}{\theenumi} |
---|
313 | \renewcommand{\p@enumiii}{\theenumi(\theenumii)} |
---|
314 | \renewcommand{\p@enumiv}{\p@enumiii\theenumiii} |
---|
315 | \def\sqbullet{\raise2pt\hbox{\vrule width 2.5pt depth0pt height 2.5pt}} |
---|
316 | \newcommand{\labelitemi}{\sqbullet} |
---|
317 | %\newcommand{\labelitemi}{$\m@th\bullet$} |
---|
318 | \newcommand{\labelitemii}{\normalfont\bfseries --} |
---|
319 | \newcommand{\labelitemiii}{$\m@th\ast$} |
---|
320 | \newcommand{\labelitemiv}{$\m@th\cdot$} |
---|
321 | \newenvironment{description} |
---|
322 | {\list{}{\labelwidth\z@ \itemindent-\leftmargin |
---|
323 | \let\makelabel\descriptionlabel}} |
---|
324 | {\endlist} |
---|
325 | |
---|
326 | |
---|
327 | \newcommand*{\descriptionlabel}[1]{\hspace\labelsep |
---|
328 | \normalfont\bfseries #1} |
---|
329 | |
---|
330 | %%% <<=== Fin de comandos de listas |
---|
331 | |
---|
332 | %% Páginas de título, Prefacio, Introducción==>> |
---|
333 | |
---|
334 | \def\preface{\startonoddpage |
---|
335 | \chapter*{Preface} |
---|
336 | \global\titletrue |
---|
337 | \markboth{PREFACIO}{PREFACIO} |
---|
338 | \addcontentsline{toc}{schapter}{Prefacio}} |
---|
339 | |
---|
340 | \def\prefacefirst{\startonoddpage |
---|
341 | \chapter*{Prefacio a la Primera Edición} |
---|
342 | \global\titletrue |
---|
343 | \markboth{PREFACIO A LA PRIMERA EDICIÓN}{PREFACIO A LA PRIMERA EDICIÓN} |
---|
344 | \addcontentsline{toc}{schapter}{\protect\numberline{\ }\string\rlap{Prefacio a la Primera Edición}}} |
---|
345 | |
---|
346 | \let\endprefacefirst\endpreface |
---|
347 | |
---|
348 | \def\endpreface{\newpage\markboth{}{}} |
---|
349 | |
---|
350 | \def\prefaceauthor#1{\vskip14pt\hbox to\textwidth{\hfill\small\sc #1}} |
---|
351 | |
---|
352 | |
---|
353 | \def\foreword{\startonoddpage |
---|
354 | \chapter*{Prólogo} |
---|
355 | \global\titletrue |
---|
356 | \markboth{PRÓLOGO}{PRÓLOGO} |
---|
357 | \addcontentsline{toc}{schapter}{Prólogo}} |
---|
358 | |
---|
359 | \let\endforeword\endpreface |
---|
360 | |
---|
361 | |
---|
362 | \def\dedication#1{\startonoddpage |
---|
363 | \global\titletrue |
---|
364 | \null\vskip15pc |
---|
365 | \noindent\hfill\vtop{\hsize=.45\hsize |
---|
366 | \leftskip=\parfillskip |
---|
367 | \baselineskip=12pt |
---|
368 | \parfillskip=0pt |
---|
369 | \def\\ {\vskip.5pt} |
---|
370 | \Large\it |
---|
371 | \noindent#1\vskip1sp} |
---|
372 | \thispagestyle{empty} |
---|
373 | \newpage\markboth{}{} |
---|
374 | } |
---|
375 | |
---|
376 | \def\where#1{\vskip4pt\vtop{\parindent=0pt \wherefont #1}} |
---|
377 | |
---|
378 | %%%%%%%%%%%%%%%%%%% |
---|
379 | \def\introduction{\startonoddpage |
---|
380 | \global\titletrue |
---|
381 | \chapter*{Introducción} |
---|
382 | \markboth{INTRODUCCIÓN}{INTRODUCCIÓN} |
---|
383 | \renewcommand{\thechapter}{I} |
---|
384 | \addcontentsline{toc}{schapter}{Introducción}} |
---|
385 | |
---|
386 | \def\endintroduction{\newpage} |
---|
387 | |
---|
388 | %% |
---|
389 | %% Autor de la Introducción, Abr 01, 2014 |
---|
390 | |
---|
391 | \def\introauthor#1#2{\vskip-1in |
---|
392 | \addcontentsline{toc}{ichapter}{#1} |
---|
393 | \vtop to 0pt{ |
---|
394 | {\sc #1} |
---|
395 | \chapteraffil{#2} |
---|
396 | \vss}\global\everypar={\hskip-\parindent\everypar={}}\vskip1in} |
---|
397 | |
---|
398 | |
---|
399 | \def\l@ichapter#1#2{% |
---|
400 | \ifnum \c@tocdepth >1 |
---|
401 | \addpenalty{-\@highpenalty}% |
---|
402 | \vskip -3pt \@plus\p@ |
---|
403 | \setlength\@tempdima{2.5em}% |
---|
404 | \begingroup |
---|
405 | \parindent \z@ \rightskip \@pnumwidth |
---|
406 | \parfillskip -\@pnumwidth |
---|
407 | \leavevmode |
---|
408 | \advance\leftskip\@tempdima |
---|
409 | \hskip -\leftskip |
---|
410 | \hbox{\it #1}\hfill\par |
---|
411 | \penalty\@highpenalty |
---|
412 | \endgroup |
---|
413 | \vskip1sp |
---|
414 | \fi} |
---|
415 | |
---|
416 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
---|
417 | |
---|
418 | \def\acknowledgments{\startonoddpage |
---|
419 | \global\titletrue |
---|
420 | \chapter*{Agradecimientos} |
---|
421 | \addcontentsline{toc}{schapter}{Agradecimientos}} |
---|
422 | |
---|
423 | \def\endacknowledgments{\newpage} |
---|
424 | |
---|
425 | \let\acknowledgements\acknowledgments |
---|
426 | \let\endacknowledgements\endacknowledgments |
---|
427 | |
---|
428 | \def\authorinitials#1{\vskip12pt |
---|
429 | \hbox to\textwidth{\hfill#1}\newpage} |
---|
430 | |
---|
431 | |
---|
432 | %% from 2e |
---|
433 | \newcommand{\frontmatter}{\cleardoublepage |
---|
434 | \@mainmatterfalse\pagenumbering{roman}} |
---|
435 | \newcommand{\mainmatter}{\cleardoublepage |
---|
436 | \@mainmattertrue\pagenumbering{arabic}} |
---|
437 | \newcommand{\backmatter}{\if@openright\cleardoublepage\else\clearpage\fi |
---|
438 | \@mainmatterfalse} |
---|
439 | %% |
---|
440 | |
---|
441 | \newif\iftitle |
---|
442 | |
---|
443 | \def\booktitle#1{\def\thetitle{\uppercase{#1}}} |
---|
444 | \def\subtitle#1{\def\thesubtitle{#1}} |
---|
445 | \def\author#1{\def\theauthor{#1}} |
---|
446 | \let\authors\author |
---|
447 | \def\editionstatement#1{\def\theeditionstatement{#1}} |
---|
448 | |
---|
449 | \booktitle{} |
---|
450 | \subtitle{} |
---|
451 | \editionstatement{} |
---|
452 | |
---|
453 | \def\halftitlepage{\thispagestyle{empty} |
---|
454 | \vspace*{9pc}% |
---|
455 | {\parindent \z@ |
---|
456 | \interlinepenalty\@M |
---|
457 | \LARGE |
---|
458 | \hyphenpenalty10000 |
---|
459 | \bfseries\halftitlefont |
---|
460 | \def\\ {\vskip1sp} |
---|
461 | \noindent\thetitle\vskip 1sp |
---|
462 | } |
---|
463 | \newpage |
---|
464 | } |
---|
465 | |
---|
466 | \def\titlepage{\ifodd\c@page\else\thispagestyle{empty}\null\newpage\fi |
---|
467 | \thispagestyle{empty} |
---|
468 | \vbox to\vsize{\vspace*{36pt}% |
---|
469 | \hrule height3pt |
---|
470 | \vskip6pc |
---|
471 | \parindent \z@ |
---|
472 | \interlinepenalty\@M |
---|
473 | \Huge |
---|
474 | \hyphenpenalty10000 |
---|
475 | \bfseries\titlefont |
---|
476 | \uppercase{\thetitle} |
---|
477 | \ifx\subtitle\empty\else |
---|
478 | {\vskip1pt\baselineskip22pt |
---|
479 | \subtitlefont \vrule height2pc width0pt\thesubtitle\vskip1sp}\fi |
---|
480 | \vskip1pc |
---|
481 | \hrule |
---|
482 | \ifx\theeditionstatement\empty\else |
---|
483 | \vskip48pt |
---|
484 | {\editionfont \theeditionstatement}\fi |
---|
485 | \vskip6.5pc |
---|
486 | {\frenchspacing\baselineskip=12pt |
---|
487 | \authorfont \theauthor\vskip1sp} |
---|
488 | \vfill |
---|
489 | \noindent{\includegraphics[width=1.7in]{logoCenditel.png}} |
---|
490 | \vskip-8pt |
---|
491 | {\wileyfont Publicación de la Fundación CENDITEL} |
---|
492 | \vskip24pt}\newpage} |
---|
493 | |
---|
494 | \def\affil#1{{\affilfont #1}\vskip18pt} |
---|
495 | |
---|
496 | |
---|
497 | \def\dotspace{\hskip5pt/\hskip5pt} |
---|
498 | |
---|
499 | %% fin de páginas de Título. Prefacio |
---|
500 | |
---|
501 | %% Comandos de Parte, Capítulo, y Apéndice ===>>> |
---|
502 | |
---|
503 | \def\chaptermark#1{} |
---|
504 | |
---|
505 | \newcommand{\part}{\startonoddpage |
---|
506 | \thispagestyle{empty}% |
---|
507 | \@tempswafalse |
---|
508 | \secdef\@part\@spart} |
---|
509 | |
---|
510 | \def\@part[#1]#2{% |
---|
511 | \ifnum\c@part=0 \global\@mainmattertrue |
---|
512 | \pagenumbering{arabic}\setcounter{page}{1}\fi |
---|
513 | \ifnum \c@secnumdepth >-2\relax |
---|
514 | \refstepcounter{part}% |
---|
515 | \addcontentsline{toc}{part}{\thepart\hspace{1em}#1}% |
---|
516 | \else |
---|
517 | \addcontentsline{toc}{part}{#1}% |
---|
518 | \fi |
---|
519 | \markboth{}{} |
---|
520 | { |
---|
521 | \vglue36pt |
---|
522 | \parindent \z@ |
---|
523 | \interlinepenalty\@M |
---|
524 | \Large |
---|
525 | {\parindent \z@ |
---|
526 | \partnumberfont |
---|
527 | \partname~\Roman{part}} |
---|
528 | \hfill\vrule depth12pt width0pt |
---|
529 | \hrule height3pt |
---|
530 | \vtop to23.5pc{\vfill |
---|
531 | \hyphenpenalty10000 |
---|
532 | \raggedright |
---|
533 | \parfillskip=0pt |
---|
534 | \LARGE\baselineskip=24pt\boldmath\bfseries\partfont |
---|
535 | \uppercase{#2}\vskip1pc |
---|
536 | \hrule height 1pt |
---|
537 | \vskip7pc}}} |
---|
538 | |
---|
539 | |
---|
540 | \def\@spart#1{% |
---|
541 | {\centering |
---|
542 | \interlinepenalty \@M |
---|
543 | \reset@font |
---|
544 | \Huge \bfseries #1\par}% |
---|
545 | \@endpart} |
---|
546 | \def\@endpart{\vfill\newpage |
---|
547 | \if@twoside |
---|
548 | \hbox{}% |
---|
549 | \thispagestyle{empty}% |
---|
550 | \newpage |
---|
551 | \fi} |
---|
552 | |
---|
553 | |
---|
554 | \def\and{\lowercase{and}\ } |
---|
555 | |
---|
556 | \def\eatone#1{} |
---|
557 | \def\oldauthor[#1]#2{{\ifnum\c@chapter<1 |
---|
558 | \vskip-2pc |
---|
559 | \else |
---|
560 | \vskip2pc |
---|
561 | \ifnum\c@chapter>9\leftskip=4pc\else |
---|
562 | \leftskip=3pc\fi\fi\let\\ \newline{#2}\vskip1sp} |
---|
563 | {\let\\ \space \let\footnote\eatone\xdef\totoc{\tocauthorfont #1}} |
---|
564 | \addtocontents{toc}{\vskip-2.5pt{\string\noindent\hskip24pt\totoc}} |
---|
565 | \addtocontents{toc}{\vskip6pt} |
---|
566 | } |
---|
567 | |
---|
568 | |
---|
569 | \newif\iffirstprologue |
---|
570 | \def\prologue#1#2{\iffirstprologue\vskip4pt |
---|
571 | \global\firstprologuefalse\else |
---|
572 | \vskip12pt\fi |
---|
573 | {\leftskip=1pc |
---|
574 | \parindent=0pt \small |
---|
575 | \let\\ \newline#1\vskip1sp |
---|
576 | \hbox to\textwidth{\hfill\def\two{#2}\ifx\two\empty\else---#2\fi} |
---|
577 | }\vskip12pt} |
---|
578 | |
---|
579 | |
---|
580 | \newdimen\SpaceAboveChapterNumber |
---|
581 | \SpaceAboveChapterNumber=36pt |
---|
582 | |
---|
583 | \def\chapter{\let\thetable\savethetable |
---|
584 | \let\thefigure\savethefigure |
---|
585 | \global\c@footnote=0 |
---|
586 | \global\probcount=0 |
---|
587 | \global\c@chapapp=0 |
---|
588 | \global\appendfalse |
---|
589 | \renewcommand{\thechapter}{\arabic{chapter}} |
---|
590 | \@afterindentfalse |
---|
591 | \secdef\@chapter\@schapter} |
---|
592 | |
---|
593 | \let\savefootnote\footnote |
---|
594 | \let\savefootnotetext\footnotetext |
---|
595 | |
---|
596 | \newcount\savefootnotenumber |
---|
597 | \newcount\ftnum |
---|
598 | \newcount\saveftnum |
---|
599 | \def\catchfootnote#1{% |
---|
600 | \global\advance\ftnum by1 |
---|
601 | \expandafter\gdef\csname thecatchfootnote\the\ftnum\endcsname{#1}} |
---|
602 | |
---|
603 | \def\zfnsymbol#1{\expandafter\@zfnsymbol\csname c@#1\endcsname} |
---|
604 | |
---|
605 | \def\@zfnsymbol#1{\ensuremath{\ifcase#1\or \dagger\or \ddagger\or |
---|
606 | \mathsection\or \mathparagraph\or \|\or **\or \dagger\dagger |
---|
607 | \or \ddagger\ddagger \else\@ctrerr\fi}} |
---|
608 | |
---|
609 | \def\zzfnsymbol#1{\expandafter\@zfnsymbol\csname c@#1\endcsname} |
---|
610 | |
---|
611 | \def\@zzfnsymbol#1{\ensuremath{\ifcase#1 \dagger\or \ddagger\or |
---|
612 | \mathsection\or \mathparagraph\or \|\or **\or \dagger\dagger |
---|
613 | \or \ddagger\ddagger \else\@ctrerr\fi}} |
---|
614 | |
---|
615 | \def\@chapter[#1]#2{\startonoddpage |
---|
616 | \global\titletrue |
---|
617 | %% no floats on chapter title page |
---|
618 | \global\@topnum\z@ |
---|
619 | \global\@botnum\z@ |
---|
620 | %% |
---|
621 | \ifnum\c@chapter=0\relax \ifnum\c@part=1 \else \setcounter{page}{1} |
---|
622 | \global\@mainmattertrue% <<=== |
---|
623 | \fi\fi |
---|
624 | %% if using answers.sty: |
---|
625 | \expandafter\ifx\csname Closesolutionfile\endcsname \relax |
---|
626 | \else |
---|
627 | \Closesolutionfile{ans}\fi |
---|
628 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
---|
629 | \lowercase{\global\savefootnotenumber=\c@footnote |
---|
630 | \global\ftnum=0 |
---|
631 | \setbox0=\hbox{\let\thanks\catchfootnote |
---|
632 | \let\\ \relax\let\footnote\catchfootnote#2} |
---|
633 | {\def\thefootnote{\zfnsymbol{footnote}} |
---|
634 | \ifnum\ftnum<1 \else |
---|
635 | \saveftnum\ftnum |
---|
636 | \global\advance\saveftnum by1 |
---|
637 | \ftnum=1 |
---|
638 | \loop\ifnum\saveftnum>\ftnum |
---|
639 | \advance\c@footnote by 1 |
---|
640 | \savefootnotetext{\csname thecatchfootnote\the\ftnum\endcsname} |
---|
641 | \global\advance\ftnum by1 |
---|
642 | \repeat |
---|
643 | \fi}} |
---|
644 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
---|
645 | % |
---|
646 | \gdef\thepage{\csname @arabic\endcsname\c@page} |
---|
647 | % |
---|
648 | \refstepcounter{chapter}% <<==== moved this here instead of below mainmatter |
---|
649 | %% when using answers.sty, |
---|
650 | %% to open an ans<chapnum> file to be used for solutions section |
---|
651 | \expandafter\ifx\csname Opensolutionfile\endcsname\relax\else |
---|
652 | \Opensolutionfile{ans}[ans\the\c@chapter]\fi |
---|
653 | \let\dolabelnow\relax |
---|
654 | {\def\label##1{\gdef\dolabelnow{\savelabel{##1}}}% |
---|
655 | \global\setbox0=\hbox{\def\\ {\relax}#2}}% |
---|
656 | \ifnum \c@secnumdepth >\m@ne |
---|
657 | \if@mainmatter |
---|
658 | \typeout{\@chapapp\space\thechapter.}% |
---|
659 | \let\thanks\eatone |
---|
660 | \addcontentsline{toc}{chapter}% |
---|
661 | {\protect\numberline{\thechapter}#1}% |
---|
662 | \else |
---|
663 | \let\thanks\eatone |
---|
664 | \addcontentsline{toc}{chapter}{#1}% |
---|
665 | \fi |
---|
666 | \else |
---|
667 | \let\thanks\eatone |
---|
668 | \addcontentsline{toc}{chapter}{#1}% |
---|
669 | \fi |
---|
670 | \chaptermark{#1}% |
---|
671 | \@makechapterhead{{ |
---|
672 | \def\thanks##1{$^{\zfnsymbol{footnote}}$} |
---|
673 | \def\\ {\vskip1sp}\uppercase{#2}}}% |
---|
674 | \dolabelnow |
---|
675 | \@afterheading |
---|
676 | \lowercase{\global\c@footnote\savefootnotenumber}} |
---|
677 | |
---|
678 | \def\@makechapterhead#1{% |
---|
679 | \vglue10pt |
---|
680 | \SpaceAboveChapterNumber=36pt |
---|
681 | {\parindent \z@ |
---|
682 | \interlinepenalty\@M |
---|
683 | %\noindent{\includegraphics[scale=0.3]{icono2.jpg}} |
---|
684 | \noindent{\includegraphics[scale=0.15]{IconoOctagonoGrande.png}} |
---|
685 | %\noindent{\includegraphics[scale=0.7]{IconoOctagonoVerde.png}} |
---|
686 | \Large |
---|
687 | \hbox to\textwidth{\hbox{\chapternumberfont CAPÍTULO |
---|
688 | \the\c@chapter}\hfill\vrule depth12pt width0pt} |
---|
689 | %\hrule height3pt |
---|
690 | \vtop to22.5pc{\vfill |
---|
691 | \hyphenpenalty10000 |
---|
692 | \raggedright |
---|
693 | \parfillskip=0pt |
---|
694 | \LARGE\boldmath\bfseries\chaptertitlefont |
---|
695 | #1\vskip1pc |
---|
696 | \hrule height 1pt |
---|
697 | \vskip7pc}} |
---|
698 | \dooffprintinfo} |
---|
699 | |
---|
700 | \def\@schapter#1{\if@twocolumn |
---|
701 | \@topnewpage[\@makeschapterhead{#1}]% |
---|
702 | \else |
---|
703 | \@makeschapterhead{#1}% |
---|
704 | \@afterheading |
---|
705 | \fi\global\titletrue\relax} |
---|
706 | |
---|
707 | \def\@makeschapterhead#1{% |
---|
708 | \vspace*{14pc}% |
---|
709 | \noindent{\Large\bfseries\chaptertitlefont |
---|
710 | \uppercase{#1}}\nobreak |
---|
711 | \vskip1pc\hrule height1pt\vskip7.5pc} |
---|
712 | |
---|
713 | \let\title\chapter |
---|
714 | |
---|
715 | \newcount\c@chapapp |
---|
716 | \def\chapappendix#1{\par |
---|
717 | \global\advance\c@chapapp by 1 |
---|
718 | \setcounter{section}{0}% |
---|
719 | \setcounter{figure}{0}% |
---|
720 | \setcounter{table}{0}% |
---|
721 | \setcounter{equation}{0}% |
---|
722 | \renewcommand{\@chapapp}{\appendixname}% |
---|
723 | \renewcommand{\thechapter}{%\the\c@chapter. |
---|
724 | \Alph{chapapp}} |
---|
725 | \renewcommand{\thetable}{\the\c@chapter-\thechapter.\@arabic\c@table\theletter} |
---|
726 | \renewcommand{\thefigure}{\the\c@chapter-\thechapter.\@arabic\c@figure\theletter} |
---|
727 | \def\one{#1}\ifx\one\empty |
---|
728 | \section*{Apéndice} |
---|
729 | \markright{APÉNDICE} |
---|
730 | \addcontentsline{toc}{schapter}{\protect\numberline{Apéndice}} |
---|
731 | \else |
---|
732 | \section*{Apéndice: #1} |
---|
733 | \markright{APÉNDICE} |
---|
734 | \addcontentsline{toc}{schapter}{\protect\numberline{Apéndice: #1}} |
---|
735 | \fi |
---|
736 | } |
---|
737 | |
---|
738 | |
---|
739 | %%% <<=== final de comandos para Capítulo, Parte, y Apéndice |
---|
740 | |
---|
741 | |
---|
742 | %%% Contadores ===>> |
---|
743 | \newcounter {part} |
---|
744 | \newcounter {chapter} |
---|
745 | \newcounter {section}[chapter] |
---|
746 | \newcounter {subsection}[section] |
---|
747 | \newcounter {subsubsection}[subsection] |
---|
748 | \newcounter {paragraph}[subsubsection] |
---|
749 | \newcounter {subparagraph}[paragraph] |
---|
750 | |
---|
751 | %%% <=== final contadores |
---|
752 | |
---|
753 | %%% Nombres a nivel de encabezado ==>> |
---|
754 | \renewcommand{\thepart} {\Roman{part}} |
---|
755 | \renewcommand{\thechapter} {\arabic{chapter}} |
---|
756 | \renewcommand{\thesection} {\thechapter.\arabic{section}} |
---|
757 | \renewcommand{\thesubsection} {\thesection.\arabic{subsection}} |
---|
758 | \renewcommand{\thesubsubsection}{\thesubsection .\arabic{subsubsection}} |
---|
759 | \renewcommand{\theparagraph} {\thesubsubsection.\arabic{paragraph}} |
---|
760 | \renewcommand{\thesubparagraph} {\theparagraph.\arabic{subparagraph}} |
---|
761 | \newcommand{\@chapapp}{\chaptername} |
---|
762 | |
---|
763 | %%% <<== final de nombres a nivel de encabezado |
---|
764 | |
---|
765 | |
---|
766 | %%% Comandos de Sección ====>>>> |
---|
767 | |
---|
768 | % \@startsection {NOMBRE}{NIVEL}{IDENTACIÓN}{PREVIO SALTO}{DESPUÉS DE SALTO}{ESTILO} |
---|
769 | % opcional * [ENCABEZADO ALTERNATIVO]{ENCABEZADO} |
---|
770 | % Comando genérico para el inicio de sección. |
---|
771 | % NOMBRE : ejemplo, 'subsección' |
---|
772 | % NIVEL : un número, denotando profundidad de la sección -- ejemplo: capítulo=1, |
---|
773 | % sección=2, etc. |
---|
774 | % IDENTACIÓN : Indentación del encabezado desde el margen izquierdo |
---|
775 | % ANTES DE SALTO : Valor absoluto = salto a nivel superior del encabezado. |
---|
776 | % Si es negativo, entonces se suprime la identación del texto que sigue al encabezado. |
---|
777 | % DESPUÉS DE SALTO: si es positivo, entonces es el salto a dar después del encabezado, de lo contrario, |
---|
778 | % es el salto a dar a la derecha del encabezado actual. |
---|
779 | % ESTILO : comandos para la configuración de estilo |
---|
780 | % Si falta el '*', entonces se incrementa el contador. Si está presente, entonces no debería haber un argumento en encabezado alternativo |
---|
781 | % Utilice el contador 'secnumdepth' cuyo valor es el mayor nivel de la sección a ser enumerada |
---|
782 | |
---|
783 | |
---|
784 | |
---|
785 | \newcommand{\section}{\@startsection {section}{1}{\z@}% |
---|
786 | {-22pt plus -1pt minus -6pt |
---|
787 | }% |
---|
788 | {13pt}% |
---|
789 | {\reset@font\large\bfseries\boldmath\sectionfont}} |
---|
790 | \newcommand{\subsection}{\@startsection{subsection}{2}{\z@}% |
---|
791 | {-16pt plus -1pt minus -3pt |
---|
792 | }% |
---|
793 | {8pt}% |
---|
794 | {\reset@font\large\bfseries\boldmath\subsectionfont}} |
---|
795 | \newcommand{\subsubsection}{\@startsection{subsubsection}{3}{\z@}% |
---|
796 | {-12pt plus -1pt minus -6pt |
---|
797 | }% |
---|
798 | {-1em} |
---|
799 | {\reset@font\normalsize\bfseries\boldmath\subsubsectionfont}} |
---|
800 | \newcommand{\paragraph}{\@startsection{paragraph}{4}{\z@}% |
---|
801 | {-12pt}% |
---|
802 | {-1em}% |
---|
803 | {\reset@font\normalsize\bfseries\paragraphfont}} |
---|
804 | \newcommand{\subparagraph}{\@startsection{subparagraph}{5}{\parindent}% |
---|
805 | {3.25ex \@plus1ex \@minus .2ex}% |
---|
806 | {-1em}% |
---|
807 | {\reset@font\normalsize\bfseries}} |
---|
808 | |
---|
809 | %%% <<=== final comandos de secciones |
---|
810 | |
---|
811 | |
---|
812 | %%% Verso, Cita, Extracto ==>> |
---|
813 | |
---|
814 | \newenvironment{verse} |
---|
815 | {\let\\=\@centercr |
---|
816 | \list{}{\itemsep \z@ |
---|
817 | \itemindent -1.5em% |
---|
818 | \listparindent\itemindent |
---|
819 | \rightmargin \leftmargin |
---|
820 | \advance\leftmargin 1.5em}% |
---|
821 | \item[]} |
---|
822 | {\endlist} |
---|
823 | \newenvironment{quotation} |
---|
824 | {\small |
---|
825 | \list{}{\listparindent \parindent% |
---|
826 | \itemindent \listparindent |
---|
827 | \rightmargin \leftmargin |
---|
828 | \parsep \z@ \@plus\p@}% |
---|
829 | \item[]} |
---|
830 | {\endlist} |
---|
831 | \newenvironment{quote} |
---|
832 | {\small |
---|
833 | \list{}{\rightmargin\leftmargin}% |
---|
834 | \item[]} |
---|
835 | {\endlist} |
---|
836 | \let\extract\quotation |
---|
837 | \let\endextract\endquotation |
---|
838 | %% <<== final Verso, Cita, Extracto |
---|
839 | |
---|
840 | |
---|
841 | %%% Matemática ===>>> |
---|
842 | |
---|
843 | \@addtoreset{equation}{chapter} |
---|
844 | \renewcommand{\theequation}{\thechapter.\arabic{equation}} |
---|
845 | |
---|
846 | %%% ruta fácil para hacer matemáticas en negrita utilizando $ fórmula $ |
---|
847 | \def\dobold#1{\hbox{\boldmath$\displaystyle #1$\unboldmath}} |
---|
848 | \let\mathbold\dobold |
---|
849 | |
---|
850 | %% crear una caja alrededor de la ecuación o ambiente desplegado |
---|
851 | \def\boxit#1{{\fboxsep=6pt\ifmmode |
---|
852 | \fbox{$\displaystyle #1$} |
---|
853 | \else |
---|
854 | \vskip14pt{\centerline{\fbox{\vtop{\vskip-9pt\vskip1sp\advance\hsize-41pt #1\vskip-8pt}}}\vskip14pt}\fi}} |
---|
855 | |
---|
856 | %%% <<<=== final Matemática |
---|
857 | |
---|
858 | |
---|
859 | %%% Título de Figuras y Tablas ==>>> |
---|
860 | \newcounter{figure}[chapter] |
---|
861 | \renewcommand{\thefigure}{\thechapter.% |
---|
862 | \@arabic\c@figure\theletter} |
---|
863 | \def\fps@figure{tbp} |
---|
864 | \def\ftype@figure{1} |
---|
865 | \def\ext@figure{lof} |
---|
866 | \def\fnum@figure{\figurename~\thefigure} |
---|
867 | \newenvironment{figure} |
---|
868 | {\@float{figure}} |
---|
869 | {\end@float} |
---|
870 | \newenvironment{figure*} |
---|
871 | {\@dblfloat{figure}} |
---|
872 | {\end@dblfloat} |
---|
873 | \newcounter{table}[chapter] |
---|
874 | \renewcommand{\thetable}{\thechapter.\@arabic\c@table\theletter} |
---|
875 | |
---|
876 | \let\savethetable\thetable |
---|
877 | \let\savethefigure\thefigure |
---|
878 | |
---|
879 | |
---|
880 | \def\fps@table{tbp} |
---|
881 | \def\ftype@table{2} |
---|
882 | \def\ext@table{lot} |
---|
883 | \def\fnum@table{\tablename~\thetable} |
---|
884 | \newenvironment{table} |
---|
885 | {\@float{table}} |
---|
886 | {\end@float} |
---|
887 | \newenvironment{table*} |
---|
888 | {\@dblfloat{table}} |
---|
889 | {\end@dblfloat} |
---|
890 | \newlength\abovecaptionskip |
---|
891 | \newlength\belowcaptionskip |
---|
892 | \setlength\abovecaptionskip{10\p@} |
---|
893 | \setlength\belowcaptionskip{0\p@} |
---|
894 | |
---|
895 | \def\xfigure{figure} |
---|
896 | |
---|
897 | \long\def\@makecaption#1#2{% |
---|
898 | \vskip\abovecaptionskip |
---|
899 | {\small\hyphenpenalty10000 |
---|
900 | \ifx\@captype\xfigure |
---|
901 | \ifcontinued\global\advance\c@figure -1\fi |
---|
902 | \else |
---|
903 | \ifcontinued\global\advance\c@table -1\fi |
---|
904 | \fi% |
---|
905 | \sbox\@tempboxa{{\fignumfont#1 \ifcontinued (Continuación)\fi |
---|
906 | \quad \ifx\@captype\xfigure\figtextfont\else |
---|
907 | \tabtextfont\fi\let\newline\ #2}}% |
---|
908 | \ifdim \wd\@tempboxa >.9\hsize \hyphenpenalty10000 |
---|
909 | \fignumfont #1 \ifcontinued (Continuación)\fi\quad |
---|
910 | \ifx\@captype\xfigure\figtextfont\else |
---|
911 | \tabtextfont\fi#2\par |
---|
912 | \else |
---|
913 | \global \@minipagefalse |
---|
914 | \hbox to\hsize{\hfil\box\@tempboxa\hfil}% |
---|
915 | \fi |
---|
916 | \ifx\@captype\xfigure |
---|
917 | \vskip\belowcaptionskip |
---|
918 | \else |
---|
919 | \vskip3pt\fi |
---|
920 | \gdef\theletter{\relax} |
---|
921 | \global\continuedfalse |
---|
922 | }} |
---|
923 | |
---|
924 | |
---|
925 | \newif\ifsettotop |
---|
926 | |
---|
927 | |
---|
928 | \def\@xfloat#1[#2]{% |
---|
929 | \def \@captype {#1}\def \@fps {#2}\@onelevel@sanitize \@fps |
---|
930 | \def \reserved@b {!}\ifx \reserved@b \@fps \@fpsadddefault \else |
---|
931 | \ifx \@fps \@empty \@fpsadddefault \fi \fi |
---|
932 | \ifhmode \@bsphack \@floatpenalty -\@Mii \else \@floatpenalty -\@Miii \fi |
---|
933 | \ifinner \@parmoderr \@floatpenalty \z@ |
---|
934 | \else \@next \@currbox \@freelist {\@tempcnta \sixt@@n |
---|
935 | \expandafter \@tfor \expandafter \reserved@a \expandafter :\expandafter |
---|
936 | =\@fps \do {\if \reserved@a h\ifodd \@tempcnta \else \advance \@tempcnta \@ne |
---|
937 | \fi \fi \if \reserved@a t\@setfpsbit \tw@ \global\settotoptrue\fi |
---|
938 | \if \reserved@a b\@setfpsbit 4\fi |
---|
939 | \if \reserved@a p\@setfpsbit 8\fi |
---|
940 | \if \reserved@a !\ifnum \@tempcnta >15 |
---|
941 | \advance\@tempcnta -\sixt@@n\relax\fi \fi }\@tempcntb |
---|
942 | \csname ftype@\@captype \endcsname \multiply \@tempcntb \@xxxii \advance |
---|
943 | \@tempcnta \@tempcntb \global \count \@currbox \@tempcnta }\@fltovf \fi |
---|
944 | \global \setbox \@currbox \color@vbox \normalcolor \vbox \bgroup |
---|
945 | \ifx\@captype\xtable |
---|
946 | \ifsettotop |
---|
947 | \vglue-6pt |
---|
948 | \fi\fi\global\settotopfalse |
---|
949 | \hsize \columnwidth \@parboxrestore \@floatboxreset} |
---|
950 | |
---|
951 | \let\savetabular\tabular |
---|
952 | \def\tabular{\tablefontsize\baselineskip=12pt\savetabular} |
---|
953 | |
---|
954 | \@namedef{tabular*}#1{\def\@halignto{to#1} |
---|
955 | \tablefontsize\baselineskip12pt\@tabular} |
---|
956 | |
---|
957 | \def\@array[#1]#2{% |
---|
958 | \if #1t\vtop \else \if#1b\vbox \else \vcenter \fi\fi |
---|
959 | \bgroup |
---|
960 | \setbox\@arstrutbox\hbox{% |
---|
961 | \vrule \@height\arraystretch\ht\strutbox |
---|
962 | \@depth\arraystretch \dp\strutbox |
---|
963 | \@width\z@}% |
---|
964 | \@mkpream{@{}#2@{}}% |
---|
965 | \edef\@preamble{% |
---|
966 | \ialign \noexpand\@halignto |
---|
967 | \bgroup \@arstrut \@preamble \tabskip\z@skip \cr}% |
---|
968 | \let\@startpbox\@@startpbox \let\@endpbox\@@endpbox |
---|
969 | \let\tabularnewline\\% |
---|
970 | \let\par\@empty |
---|
971 | \let\@sharp##% |
---|
972 | \set@typeset@protect |
---|
973 | \lineskip\z@skip\baselineskip\z@skip |
---|
974 | \ifhmode \@preamerr\z@ \@@par\fi |
---|
975 | \@preamble} |
---|
976 | |
---|
977 | \def\tablenotes{\vskip2pt\footnotesize} |
---|
978 | \let\endtablenotes\relax |
---|
979 | |
---|
980 | %% Compatibilidad con versiones anteriores: |
---|
981 | \let\savehline\hline |
---|
982 | |
---|
983 | \let\hline\savehline |
---|
984 | \def\arraystretch{1.25} |
---|
985 | |
---|
986 | %%%%%%%%% Títulos numerados con letras |
---|
987 | |
---|
988 | \def\theletter{\relax} |
---|
989 | \newif\ifxfirsttime |
---|
990 | \xfirsttimetrue |
---|
991 | |
---|
992 | \def\caption{\ifx\@captype\xtable |
---|
993 | \ifx\theletter\xrelax |
---|
994 | \global\xfirsttimetrue\refstepcounter\@captype\else |
---|
995 | \ifxfirsttime\global\xfirsttimefalse\refstepcounter\@captype\fi\fi |
---|
996 | \else |
---|
997 | \ifx\theletter\xrelax |
---|
998 | \global\xfirsttimetrue\refstepcounter\@captype\else |
---|
999 | \ifxfirsttime\global\xfirsttimefalse\refstepcounter\@captype\fi\fi\fi |
---|
1000 | \edef\@currentlabel{\expandafter\csname p@\@captype\endcsname% |
---|
1001 | \expandafter\csname the\@captype\endcsname} |
---|
1002 | \xdef\currcaptype{\@captype} |
---|
1003 | \@dblarg{\@caption\@captype}} |
---|
1004 | |
---|
1005 | \def\letteredcaption#1{\gdef\theletter{#1}\caption} |
---|
1006 | |
---|
1007 | \newif\ifcontinued |
---|
1008 | \def\continuedcaption{\global\continuedtrue\caption} |
---|
1009 | |
---|
1010 | %%% <<=== final de los títulos de Figura y Tabla |
---|
1011 | |
---|
1012 | |
---|
1013 | %%% Tabla de Contenidos, Lista de Figuras, LOT ===>> |
---|
1014 | |
---|
1015 | \newcommand{\@pnumwidth}{1.55em} |
---|
1016 | \newcommand{\@tocrmarg} {2.55em plus .5in} |
---|
1017 | \newcommand{\@dotsep}{4.5} |
---|
1018 | |
---|
1019 | \def\startonoddpage{\clearpage |
---|
1020 | \ifodd\c@page\else\null\thispagestyle{empty}\newpage\fi} |
---|
1021 | |
---|
1022 | \newcommand{\tableofcontents}{% |
---|
1023 | \startonoddpage |
---|
1024 | \global\titletrue |
---|
1025 | \chapter*{\contentsname} |
---|
1026 | \@mkboth{\uppercase{\contentsname}}{\uppercase{\contentsname}}% |
---|
1027 | \vskip-9pt |
---|
1028 | \bgroup\parskip=0pt |
---|
1029 | \chapskip=26pt |
---|
1030 | \authorskip=-6pt |
---|
1031 | \chapheight3pt |
---|
1032 | \partskip=-8pt |
---|
1033 | {\normalsize\tocfonts\baselineskip=14pt |
---|
1034 | \hyphenpenalty=10000 |
---|
1035 | \@starttoc{toc}% |
---|
1036 | } |
---|
1037 | \egroup |
---|
1038 | \if@restonecol\twocolumn\fi |
---|
1039 | |
---|
1040 | \newpage |
---|
1041 | \markboth{}{} |
---|
1042 | } |
---|
1043 | |
---|
1044 | \def\splitintwo#1.#2*{\llap{#1}\rlap{.#2}} |
---|
1045 | |
---|
1046 | \newcommand{\listoftables}{% |
---|
1047 | \startonoddpage |
---|
1048 | \global\titletrue |
---|
1049 | \chapter*{Lista de Tablas |
---|
1050 | \@mkboth{\uppercase{Lista de Tablas}}{\uppercase{Lista de Tablas}}}% |
---|
1051 | \addcontentsline{toc}{schapter}{Lista de Tablas} |
---|
1052 | \vskip-9pt |
---|
1053 | \bgroup\parskip=2pt |
---|
1054 | {\def\numberline##1{\def\one{##1}% |
---|
1055 | \hb@xt@\@tempdima{\expandafter\splitintwo\one*\hfil}} |
---|
1056 | \normalsize\tocfonts |
---|
1057 | \hyphenpenalty=10000 |
---|
1058 | \@starttoc{lot}% |
---|
1059 | } |
---|
1060 | \egroup |
---|
1061 | \if@restonecol\twocolumn\fi |
---|
1062 | \newpage |
---|
1063 | \markboth{}{} |
---|
1064 | } |
---|
1065 | |
---|
1066 | |
---|
1067 | |
---|
1068 | \newcommand{\listoffigures}{% |
---|
1069 | \startonoddpage |
---|
1070 | \global\titletrue |
---|
1071 | \chapter*{Lista de Figuras |
---|
1072 | \@mkboth{\uppercase{Lista de Figuras}}{\uppercase{Lista de Figuras}}}% |
---|
1073 | \addcontentsline{toc}{schapter}{Lista de Figuras} |
---|
1074 | \vskip-9pt |
---|
1075 | \bgroup\parskip=2pt |
---|
1076 | {\def\numberline##1{\def\one{##1}% |
---|
1077 | \hb@xt@\@tempdima{\expandafter\splitintwo\one*\hfil}} |
---|
1078 | \normalsize\tocfonts |
---|
1079 | \hyphenpenalty=10000 |
---|
1080 | \@starttoc{lof}% |
---|
1081 | } |
---|
1082 | \egroup |
---|
1083 | \if@restonecol\twocolumn\fi |
---|
1084 | \newpage |
---|
1085 | \markboth{}{} |
---|
1086 | } |
---|
1087 | |
---|
1088 | \newskip\partskip |
---|
1089 | |
---|
1090 | \def\l@part#1#2{% |
---|
1091 | \ifnum \c@tocdepth >-2\relax |
---|
1092 | \addpenalty{-\@highpenalty}% |
---|
1093 | \vskip16pt |
---|
1094 | \begingroup |
---|
1095 | {\centering\leavevmode\chaptocfont |
---|
1096 | \uppercase{Parte\ \/ #1} |
---|
1097 | \vskip8pt |
---|
1098 | \vskip\partskip |
---|
1099 | }\par |
---|
1100 | \nobreak |
---|
1101 | \global\@nobreaktrue |
---|
1102 | \everypar{\global\@nobreakfalse\everypar{}} |
---|
1103 | \endgroup |
---|
1104 | \vskip1sp |
---|
1105 | \fi} |
---|
1106 | |
---|
1107 | \def\l@chapter#1#2{% |
---|
1108 | \ifnum \c@tocdepth >\m@ne |
---|
1109 | \addpenalty{-\@highpenalty}% |
---|
1110 | \vskip 10pt \@plus\p@ |
---|
1111 | \setlength\@tempdima{2.5em}% |
---|
1112 | \begingroup |
---|
1113 | \let\numberline\xnumberline |
---|
1114 | \parindent \z@ \rightskip \@pnumwidth |
---|
1115 | \parfillskip -\@pnumwidth |
---|
1116 | \leavevmode |
---|
1117 | \advance\leftskip\@tempdima |
---|
1118 | \hskip -\leftskip |
---|
1119 | \chaptocfont |
---|
1120 | #1\nobreak\hfil \nobreak\hbox |
---|
1121 | to\@pnumwidth{\hss\chaptocfont #2}\par |
---|
1122 | \penalty\@highpenalty |
---|
1123 | \endgroup |
---|
1124 | \vskip4pt |
---|
1125 | \fi} |
---|
1126 | |
---|
1127 | \def\l@schapter#1#2{% |
---|
1128 | \ifnum \c@tocdepth >1 |
---|
1129 | \addpenalty{-\@highpenalty}% |
---|
1130 | \vskip 3pt \@plus\p@ |
---|
1131 | \setlength\@tempdima{2.5em}% |
---|
1132 | \begingroup |
---|
1133 | \parindent \z@ \rightskip \@pnumwidth |
---|
1134 | \parfillskip -\@pnumwidth |
---|
1135 | \leavevmode |
---|
1136 | \advance\leftskip\@tempdima |
---|
1137 | \hskip -\leftskip |
---|
1138 | %\chaptocfont |
---|
1139 | #1\nobreak\hfil \nobreak\hbox |
---|
1140 | to\@pnumwidth{\hss #2}\par |
---|
1141 | \penalty\@highpenalty |
---|
1142 | \endgroup |
---|
1143 | \vskip1sp |
---|
1144 | \fi} |
---|
1145 | |
---|
1146 | |
---|
1147 | \def\l@sschapter#1#2{% |
---|
1148 | \ifnum \c@tocdepth >1 |
---|
1149 | \addpenalty{-\@highpenalty}% |
---|
1150 | \vskip 6pt \@plus\p@ |
---|
1151 | \setlength\@tempdima{2.5em}% |
---|
1152 | \begingroup |
---|
1153 | \parindent \z@ \rightskip \@pnumwidth |
---|
1154 | \parfillskip -\@pnumwidth |
---|
1155 | \leavevmode |
---|
1156 | \advance\leftskip\@tempdima |
---|
1157 | \hskip -\leftskip |
---|
1158 | \bf |
---|
1159 | #1\nobreak\hfil \nobreak\hbox |
---|
1160 | to\@pnumwidth{\hss #2}\par |
---|
1161 | \penalty\@highpenalty |
---|
1162 | \endgroup |
---|
1163 | \vskip1sp |
---|
1164 | \fi} |
---|
1165 | |
---|
1166 | \def\l@achapter#1#2{% |
---|
1167 | \ifnum \c@tocdepth >0 |
---|
1168 | \addpenalty{-\@highpenalty}% |
---|
1169 | \vskip 6pt |
---|
1170 | \setlength\@tempdima{2.5em}% |
---|
1171 | \begingroup |
---|
1172 | \parindent \z@ \rightskip \@pnumwidth |
---|
1173 | \parfillskip -\@pnumwidth |
---|
1174 | \leavevmode |
---|
1175 | \advance\leftskip\@tempdima |
---|
1176 | \hskip -\leftskip |
---|
1177 | \chaptocfont |
---|
1178 | #1\nobreak\hfil \nobreak\hbox |
---|
1179 | to\@pnumwidth{\hss #2}\par |
---|
1180 | \penalty\@highpenalty |
---|
1181 | \endgroup |
---|
1182 | \vskip4pt |
---|
1183 | \fi} |
---|
1184 | |
---|
1185 | % \@dottedtocline{NIVEL}{IDENTACIÓN}{AMPLITUD_NUMERO}{TÍTULO}{PÁGINA} : |
---|
1186 | % Macro para producir una línea de tabla de contenidos con los siguientes parámetros: |
---|
1187 | % NIVEL : Si NIVEL > \c@tocdepth, entonces no se genera la línea. |
---|
1188 | % IDENTACIÓN : Identación total desde el margen izquierdo. |
---|
1189 | % AMPLITUD_NUMERO : Amplitud de la caja para el número si el TÍTULO tiene un comando \numberline. |
---|
1190 | % Como de 25 Enero de 1988, esto también el la cantidad extra de identación agregada a la segunda y subsecuentes líneas para |
---|
1191 | % líneas de múltiples entradas. |
---|
1192 | % TÍTULO : Contenidos de entrada. |
---|
1193 | % PÁGINA : Número de página. |
---|
1194 | % |
---|
1195 | % Utilice los siguientes parámetros, los cuales deben ser configurados en el estilo del documento. |
---|
1196 | % Estos deben definirse con \def's. |
---|
1197 | % \@pnumwidth : Ancho de la caja en el cual el número de página es colocado. |
---|
1198 | % \@tocrmarg : Identación del márgen derecho para todas las líneas exceptuando la última en entradas múltiples. |
---|
1199 | % \@dotsep : Separación entre puntos, unidad in (pulgadas) mu (). Debe definirse para \def'd un número como 2 o 1.7 |
---|
1200 | % |
---|
1201 | |
---|
1202 | \def\@dottedtocline#1#2#3#4#5{% |
---|
1203 | \ifnum #1>\c@tocdepth \else \vskip 1sp {\leftskip #2\relax% |
---|
1204 | \rightskip \@tocrmarg \parfillskip -\rightskip \parindent #2\relax% |
---|
1205 | \@afterindenttrue \interlinepenalty \@M \leavevmode \@tempdima #3\relax % |
---|
1206 | \advance \leftskip \@tempdima \hbox {}\hskip -\leftskip #4% |
---|
1207 | \nobreak% \leaders \hbox {$\m@th \mkern% |
---|
1208 | % \@dotsep mu.\mkern \@dotsep mu$} |
---|
1209 | \hfill\nobreak\hbox to\@pnumwidth {\hfil #5}\par }\fi} |
---|
1210 | |
---|
1211 | \newskip\tabandfigskip |
---|
1212 | \tabandfigskip=6pt plus 3pt minus 3pt |
---|
1213 | \def\l@table{\setlength\@tempdima{18pt}% |
---|
1214 | \vskip\tabandfigskip |
---|
1215 | \@dottedtocline{1}{1.5em}{3.5em}} |
---|
1216 | \def\l@figure{\setlength\@tempdima{18pt}% |
---|
1217 | \vskip\tabandfigskip |
---|
1218 | \@dottedtocline{1}{1.5em}{3.5em}} |
---|
1219 | |
---|
1220 | \def\l@section{\setlength\@tempdima{18pt}% |
---|
1221 | \@dottedtocline{1}{2.5em}{3em}}%was 2.3em |
---|
1222 | \def\l@subsection{\@dottedtocline{2}{5.5em}{3.6em}}% #3 was 3.4em |
---|
1223 | \def\l@subsubsection{\@dottedtocline{3}{7em}{5.1em}} %was 4.1em |
---|
1224 | \def\l@paragraph{\@dottedtocline{4}{10em}{5em}} |
---|
1225 | \def\l@subparagraph{\@dottedtocline{5}{12em}{6em}} |
---|
1226 | |
---|
1227 | |
---|
1228 | %%% <<=== final TOC |
---|
1229 | |
---|
1230 | %%% Bibliografiá, Referencias, Agradecimientos ===>> |
---|
1231 | |
---|
1232 | %%%%%% Bibliografía utilizando BibTeX |
---|
1233 | |
---|
1234 | \def\chapbibliography{% |
---|
1235 | {\let\thebibliography\thechapbibliography |
---|
1236 | \let\endthebibliography\endthechapbibliography |
---|
1237 | \@input {\jobname.bbl}} |
---|
1238 | } |
---|
1239 | |
---|
1240 | \def\thechapbibliography#1{\section*{Referencias} |
---|
1241 | \markright{REFERENCIAS} |
---|
1242 | \addcontentsline{toc}{schapter}{Referencias} |
---|
1243 | \small |
---|
1244 | \labelsep 5pt |
---|
1245 | \list |
---|
1246 | {\@biblabel{\arabic{enumiv}}}{\settowidth\labelwidth{\@biblabel{#1}}% |
---|
1247 | \leftmargin\labelwidth |
---|
1248 | \advance\leftmargin\labelsep |
---|
1249 | \usecounter{enumiv}% |
---|
1250 | \let\p@enumiv\@empty |
---|
1251 | \def\theenumiv{\arabic{enumiv}}}% |
---|
1252 | \def\newblock{\hskip .11em plus.33em minus.07em}% |
---|
1253 | \sloppy\clubpenalty4000\widowpenalty4000 |
---|
1254 | \sfcode`\.=\@m} |
---|
1255 | |
---|
1256 | \def\endthechapbibliography{% |
---|
1257 | \endlist} |
---|
1258 | |
---|
1259 | |
---|
1260 | |
---|
1261 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
---|
1262 | \def\newblock{} |
---|
1263 | |
---|
1264 | \let\save@lbibitem\@lbibitem |
---|
1265 | \let\save@bibitem\@bibitem |
---|
1266 | \def\@lbibitem{\def\@biblabel##1{[##1]} |
---|
1267 | \save@lbibitem} |
---|
1268 | |
---|
1269 | \def\@bibitem{\labelsep=5pt\def\@biblabel##1{##1.}\save@bibitem} |
---|
1270 | |
---|
1271 | \def\bibitem{\@ifnextchar[\@lbibitem\@bibitem} |
---|
1272 | |
---|
1273 | |
---|
1274 | %% to get rid of the extra argument used for thebibliography, |
---|
1275 | %% when redefinining thebibliography to be chapreferences: |
---|
1276 | \def\chapthebibliography#1{\chapreferences} |
---|
1277 | \let\endchapthebibliography\endchapreferences |
---|
1278 | |
---|
1279 | \def\chapreferences#1{\ifvmode\vskip-\lastskip\fi |
---|
1280 | \vskip8pt\vskip1sp\section*{REFERENCIAS} |
---|
1281 | \addcontentsline{toc}{schapter}{Referencias} |
---|
1282 | \bgroup |
---|
1283 | \small |
---|
1284 | \list |
---|
1285 | {\@biblabel{\arabic{enumiv}}}{\settowidth\labelwidth{\@biblabel{#1}}% |
---|
1286 | \leftmargin\labelwidth |
---|
1287 | \advance\leftmargin\labelsep |
---|
1288 | \usecounter{enumiv}% |
---|
1289 | \let\p@enumiv\@empty |
---|
1290 | \def\theenumiv{\arabic{enumiv}}}% |
---|
1291 | \def\newblock{\hskip .11em plus.33em minus.07em}% |
---|
1292 | \sloppy\clubpenalty4000\widowpenalty4000 |
---|
1293 | \sfcode`\.=\@m |
---|
1294 | } |
---|
1295 | |
---|
1296 | \def\endchapreferences{\endlist\egroup} |
---|
1297 | |
---|
1298 | \def\thebibliography#1{\startonoddpage |
---|
1299 | \global\titletrue\dooffprintinfo |
---|
1300 | \chapter*{Referencias} |
---|
1301 | \markboth{REFERENCIAS}{REFERENCIAS} |
---|
1302 | \addcontentsline{toc}{schapter}{Referencias} |
---|
1303 | \small |
---|
1304 | \labelsep 5pt |
---|
1305 | \list |
---|
1306 | {\@biblabel{\arabic{enumiv}}}{\settowidth\labelwidth{\@biblabel{#1}}% |
---|
1307 | \leftmargin\labelwidth |
---|
1308 | \advance\leftmargin\labelsep |
---|
1309 | \usecounter{enumiv}% |
---|
1310 | \let\p@enumiv\@empty |
---|
1311 | \def\theenumiv{\arabic{enumiv}}}% |
---|
1312 | \def\newblock{\hskip .11em plus.33em minus.07em}% |
---|
1313 | \sloppy\clubpenalty4000\widowpenalty4000 |
---|
1314 | \sfcode`\.=\@m} |
---|
1315 | |
---|
1316 | \def\endthebibliography{% |
---|
1317 | \endlist} |
---|
1318 | |
---|
1319 | \def\references{\bgroup\thebibliography} |
---|
1320 | \def\endreferences{\endthebibliography\egroup} |
---|
1321 | |
---|
1322 | |
---|
1323 | %% final Bibliografía, Referencias y Agradecimientos |
---|
1324 | |
---|
1325 | |
---|
1326 | %%% Pié de páginas ===>>> |
---|
1327 | |
---|
1328 | % \renewcommand{\footnoterule}{% |
---|
1329 | % \kern-3\p@ |
---|
1330 | % \hrule width .4\columnwidth |
---|
1331 | % \kern 2.6\p@} |
---|
1332 | |
---|
1333 | \let\footnoterule\relax |
---|
1334 | |
---|
1335 | \@addtoreset{footnote}{chapter} |
---|
1336 | |
---|
1337 | \long\def\@makefntext#1{% |
---|
1338 | \parindent 1em% |
---|
1339 | \noindent |
---|
1340 | \@makefnmark#1} |
---|
1341 | |
---|
1342 | \newcount\footnum |
---|
1343 | \newcount\savefootnum |
---|
1344 | \def\endnote#1{\global\advance\footnum by 1\relax$^{\the\footnum}$% |
---|
1345 | \long\expandafter\gdef\csname foot\the\footnum\endcsname{% |
---|
1346 | \vtop{\footnotesize\hsize=\textwidth\leftskip=12pt\relax\parindent=-12pt |
---|
1347 | \indent\hbox to12pt{\the\footnum.\hfill}{#1\strut\vskip1sp}}\vskip1pt}} |
---|
1348 | |
---|
1349 | \def\endnotetext#1{\global\advance\footnum by 1\relax |
---|
1350 | \long\expandafter\gdef\csname foot\the\footnum\endcsname{% |
---|
1351 | \vtop{\footnotesize\hsize=\textwidth\leftskip=12pt\relax\parindent=-12pt |
---|
1352 | \indent\hbox to12pt{\the\footnum.\hfill}{#1\strut\vskip1sp}}\vskip1pt}} |
---|
1353 | |
---|
1354 | \newif\ifrefnoteused |
---|
1355 | \def\refnote{\ifrefnoteused\else\global\refnoteusedtrue |
---|
1356 | \typeout{^^J^^J!!! ===>>>^^J |
---|
1357 | Por favor no utilice el comando \string\refnote.^^J |
---|
1358 | En su lugar escriba una referencia estándar de LaTeX y utilice \string\cite |
---|
1359 | ^^J<<<=== !!!^^J^^J}\fi} |
---|
1360 | |
---|
1361 | \def\notes{\ifnum\footnum=0\else |
---|
1362 | \savefootnum=\footnum |
---|
1363 | \footnum=0 |
---|
1364 | \noindent\loop\ifnum\savefootnum>\footnum% |
---|
1365 | \global\advance\footnum by1\relax% |
---|
1366 | \csname foot\the\footnum\endcsname\relax% |
---|
1367 | \expandafter\gdef\csname foot\the\footnum\endcsname{\relax}\relax% |
---|
1368 | \repeat\global\footnum=0\relax\fi} |
---|
1369 | |
---|
1370 | \def\note{\hfill} |
---|
1371 | |
---|
1372 | |
---|
1373 | %%% <<<=== Final de Pié de páginas |
---|
1374 | |
---|
1375 | |
---|
1376 | |
---|
1377 | %%% Encabezados de ejecución ===>>> |
---|
1378 | |
---|
1379 | %% a menos que se necesite esto, déjelo descomentado |
---|
1380 | \let\@mkboth\@gobbletwo |
---|
1381 | \let\chaptermark\@gobble |
---|
1382 | \let\sectionmark\@gobble |
---|
1383 | |
---|
1384 | \def\ps@headings{\let\@mkboth\markboth |
---|
1385 | \def\@oddfoot{\rlap{\ifoffprintinfo\global\offprintinfofalse% |
---|
1386 | \printoffprintinfo\fi}% |
---|
1387 | \iftitle\global\titlefalse{\hfill\foliofont\thepage}\fi} |
---|
1388 | \def\@evenfoot{\iftitle\global\titlefalse{\foliofont\thepage\hfill}\fi |
---|
1389 | \llap{\ifoffprintinfo\global\offprintinfofalse% |
---|
1390 | \printoffprintinfo\fi}% |
---|
1391 | } |
---|
1392 | \def\@evenhead{\iftitle\else{\foliofont \thepage}\hskip1.5pc% |
---|
1393 | \footnotesize\runningheadfont\MakeUppercase\leftmark\fi\hfill} |
---|
1394 | \def\@oddhead{\hfill\iftitle\else{\footnotesize\runningheadfont |
---|
1395 | \MakeUppercase\rightmark}\hskip1.5pc% |
---|
1396 | \foliofont\thepage\fi}% |
---|
1397 | \def\chaptermark##1{\markboth {\uppercase{##1}}{}}% |
---|
1398 | \def\sectionmark##1{\markright {\uppercase{##1}}}} |
---|
1399 | |
---|
1400 | \markboth{}{} |
---|
1401 | |
---|
1402 | \ps@headings |
---|
1403 | |
---|
1404 | \pagestyle{headings} |
---|
1405 | \pagenumbering{roman} |
---|
1406 | |
---|
1407 | |
---|
1408 | |
---|
1409 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
---|
1410 | %% Uso especial de fuentes |
---|
1411 | %% |
---|
1412 | |
---|
1413 | %% Llamado a fuentes modernas de computadores. Se redefinirá si las fuentes son utilizadas |
---|
1414 | %% |
---|
1415 | %% \documentclass{wileysix} |
---|
1416 | %% \usepackage{w-bookps} |
---|
1417 | %% utilizará fuentes PostScript. |
---|
1418 | |
---|
1419 | %% \documentclass{wileysix} utilizará fuentes modernas de Computadoras. |
---|
1420 | |
---|
1421 | |
---|
1422 | %% Times-Roman |
---|
1423 | \def\timesroman{cmr10 } |
---|
1424 | \def\timesbold{cmbx10 } |
---|
1425 | \def\timesitalic{cmti10 } |
---|
1426 | \def\timesbolditalic{cmbx10 } |
---|
1427 | |
---|
1428 | %% Helvetica |
---|
1429 | \def\helvetica{cmss10 } |
---|
1430 | \def\helveticabold{cmssbx10 } |
---|
1431 | \def\helveticaboldoblique{cmssi10 } |
---|
1432 | \def\helveticaoblique{cmssi10 } |
---|
1433 | |
---|
1434 | %% Uso especial de fuentes |
---|
1435 | %% |
---|
1436 | %% Tabla de Contenidos |
---|
1437 | \font\tocarttitlefont=\helveticabold at 12pt |
---|
1438 | \font\chaptocfont=\helveticabold at 10pt |
---|
1439 | \font\tocfonts=\timesroman at 10pt |
---|
1440 | |
---|
1441 | |
---|
1442 | %% Encabezados |
---|
1443 | \font\runningheadfont=\helvetica at6,5pt |
---|
1444 | \font\foliofont=\helveticabold at 9pt |
---|
1445 | |
---|
1446 | %% Título del libro, Página de medio título |
---|
1447 | |
---|
1448 | \font\halftitlefont=\helveticabold at 20pt |
---|
1449 | \font\titlefont=\helveticabold at 27pt |
---|
1450 | \font\subtitlefont=\helveticabold at 20pt |
---|
1451 | \font\editionfont=\helvetica at 14pt |
---|
1452 | \font\authorfont=\helveticabold at 11pt |
---|
1453 | \font\affilfont=\helvetica at 10pt |
---|
1454 | \font\locfont=\timesbolditalic at 7pt |
---|
1455 | |
---|
1456 | \font\wileyfont=\helveticabold at 10pt |
---|
1457 | \font\imprintfont=\helvetica at 10pt |
---|
1458 | |
---|
1459 | %% Título de parte |
---|
1460 | \font\partfont=\helvetica at 24pt |
---|
1461 | \font\partnumberfont=\helveticabold at 14pt |
---|
1462 | |
---|
1463 | %% Título de capítulo |
---|
1464 | \font\chapternumberfont=\helveticabold at 14pt |
---|
1465 | \font\chaptertitlefont=\helvetica at 18pt |
---|
1466 | |
---|
1467 | %% Encabezados de sección |
---|
1468 | \font\sectionfont=\timesbold at 10pt |
---|
1469 | \font\subsectionfont=\helveticabold at 10pt |
---|
1470 | \font\subsubsectionfont=\helveticaboldoblique at 10pt |
---|
1471 | \font\paragraphfont=\helveticaoblique at 10pt |
---|
1472 | |
---|
1473 | %% Títulos de figuras y tablas |
---|
1474 | \font\fignumfont=\timesbold at 9pt |
---|
1475 | \font\tabnumfont=\timesbold at 9pt |
---|
1476 | \font\figtextfont=\timesroman at 9pt |
---|
1477 | \font\tabtextfont=\timesroman at 9pt |
---|
1478 | |
---|
1479 | %% Fuente de tablas |
---|
1480 | \def\tablefontsize{\small} |
---|
1481 | \def\tablefootnotesize{\footnotesize} |
---|
1482 | |
---|
1483 | %% Referencias/Bibligrafia |
---|
1484 | \def\bibfontsize{\small} |
---|
1485 | |
---|
1486 | %% Fuentes de texto |
---|
1487 | \font\bit=\timesbolditalic at 8pt |
---|
1488 | |
---|
1489 | %% Fuentes mayúscula pequeñas |
---|
1490 | \font\bigscfont\timesroman at 9.5pt |
---|
1491 | \font\smscfont\timesroman at 7.5pt |
---|
1492 | \font\wherefont\timesitalic at 8pt |
---|
1493 | |
---|
1494 | %% Configuración de problema |
---|
1495 | \font\probfont\timesbolditalic at 10pt |
---|
1496 | |
---|
1497 | |
---|
1498 | %%% <=== Final uso de fuentes especiales |
---|
1499 | |
---|
1500 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
---|
1501 | %%%% Fuentes mayúscula pequeñas |
---|
1502 | |
---|
1503 | % To use: \fakesc some stuff* |
---|
1504 | %% \bigscfont, \smscfont are listed in font section above. |
---|
1505 | |
---|
1506 | \def\fakesc#1*{\edef\stuff{#1 }% |
---|
1507 | \expandafter\pickupnewword\stuff* } |
---|
1508 | \def\saveast{*} |
---|
1509 | |
---|
1510 | \def\rrelax{\relax} |
---|
1511 | |
---|
1512 | \def\pickupnewlett#1{\def\letter{#1}% |
---|
1513 | \ifx\letter\saveast\unskip% |
---|
1514 | \let\go\relax \else% |
---|
1515 | \ifx\letter\rrelax{\bigscfont\ }% |
---|
1516 | \let\go\pickupnewword\else% |
---|
1517 | \uppercase{\def\ucletter{#1}% upper case letter |
---|
1518 | \ifx\letter\ucletter% |
---|
1519 | {\bigscfont#1}\else{\smscfont#1}\fi}%% |
---|
1520 | \let\go\pickupnewlett\fi\fi\go} |
---|
1521 | |
---|
1522 | \def\pickupnewword#1 {\expandafter\pickupnewlett#1\relax} |
---|
1523 | %% <== end fakesc |
---|
1524 | |
---|
1525 | %% ==> glosario |
---|
1526 | \def\glossary{\startonoddpage\global\titletrue |
---|
1527 | \dooffprintinfo |
---|
1528 | \markboth{GLOSARIO}{GLOSARIO} |
---|
1529 | \chapter*{Glosario} |
---|
1530 | \addcontentsline{toc}{schapter}{Glosario} |
---|
1531 | \everypar={} |
---|
1532 | \bgroup |
---|
1533 | \leftskip=1in \parindent=-1in |
---|
1534 | \def\term##1{\vskip3pt\indent\hbox to 1in{##1\hfill}\relax}} |
---|
1535 | \def\endglossary{\vskip12pt\egroup\newpage |
---|
1536 | \markboth{}{} |
---|
1537 | } |
---|
1538 | %% <== |
---|
1539 | |
---|
1540 | %% ==> acronimos |
---|
1541 | \def\acronyms{\startonoddpage\global\titletrue |
---|
1542 | \dooffprintinfo |
---|
1543 | \markboth{ACRÓNIMOS}{ACRÓNIMOS} |
---|
1544 | \chapter*{Acrónimos} |
---|
1545 | \addcontentsline{toc}{schapter}{Acrónimos} |
---|
1546 | \everypar={} |
---|
1547 | \bgroup |
---|
1548 | \normalsize |
---|
1549 | \leftskip=1pc \parindent=-1pc |
---|
1550 | \def\term##1{\vskip2pt{\bf ##1}\hskip1em\relax}} |
---|
1551 | \def\endacronyms{\vskip12pt\egroup\newpage |
---|
1552 | \markboth{}{} |
---|
1553 | } |
---|
1554 | |
---|
1555 | \def\acro#1#2{\vskip4pt\hbox to\textwidth{\normalsize |
---|
1556 | \hbox to5pc{#1\hfill}\vtop{\advance\hsize by |
---|
1557 | -5pc\raggedright\noindent#2}}} |
---|
1558 | |
---|
1559 | %% <== |
---|
1560 | |
---|
1561 | %% ==> símbolos |
---|
1562 | \def\symbols{\startonoddpage\global\titletrue |
---|
1563 | \dooffprintinfo |
---|
1564 | \markboth{LISTA DE SÍMBOLOS}{LISTA DE SÍMBOLOS} |
---|
1565 | \chapter*{Símbolos} |
---|
1566 | \addcontentsline{toc}{schapter}{Lista de Símbolos} |
---|
1567 | \everypar={} |
---|
1568 | \bgroup\leftskip=1pc \parindent=-1pc |
---|
1569 | \def\term##1{\vskip2pt{$##1\,$}\hskip1em\relax}} |
---|
1570 | \def\endsymbols{\vskip12pt\egroup |
---|
1571 | \newpage |
---|
1572 | \markboth{}{} |
---|
1573 | } |
---|
1574 | %% <== final de símbolos |
---|
1575 | |
---|
1576 | |
---|
1577 | |
---|
1578 | %%%%%%%%%%%%%%%%%%%%%%% |
---|
1579 | %% Índice ===>>> |
---|
1580 | |
---|
1581 | \makeindex |
---|
1582 | % latex default |
---|
1583 | %% Use \latexprintindex instead of \printindex to |
---|
1584 | %% get the default latex index. |
---|
1585 | |
---|
1586 | %% Contents of makeidx.sty contained in \latexprintindex command. |
---|
1587 | %% This is because \printindex is defined in this package so |
---|
1588 | %% user doing \usepackage{makeidx} will get error message. |
---|
1589 | |
---|
1590 | \providecommand*\seealso[2]{\emph{\alsoname} #1} |
---|
1591 | \providecommand*\alsoname{ver también} |
---|
1592 | |
---|
1593 | \newcommand\printindex{\startonoddpage |
---|
1594 | \def\see##1##2{\emph{\seename} ##1} |
---|
1595 | \def\seename{ver} |
---|
1596 | \@input@{\jobname.ind}} |
---|
1597 | |
---|
1598 | \def\indexname{Índice} |
---|
1599 | |
---|
1600 | \newenvironment{theindex} |
---|
1601 | {\if@twocolumn |
---|
1602 | \@restonecolfalse |
---|
1603 | \else |
---|
1604 | \@restonecoltrue |
---|
1605 | \fi |
---|
1606 | \columnseprule \z@ |
---|
1607 | \columnsep 35\p@ |
---|
1608 | \twocolumn[\@makeschapterhead{\indexname}]% |
---|
1609 | \@mkboth{\uppercase{\indexname}}% |
---|
1610 | {\uppercase{\indexname}}% |
---|
1611 | \addcontentsline{toc}{schapter}{\indexname} |
---|
1612 | \global\titletrue\dooffprintinfo |
---|
1613 | \parindent\z@ |
---|
1614 | \parskip\z@ \@plus .3\p@\relax |
---|
1615 | \let\item\@idxitem |
---|
1616 | \spaceskip=3pt plus 2pt minus 1pt\xspaceskip=\spaceskip |
---|
1617 | \footnotesize\baselineskip=10pt plus 1pt minus 1pt} |
---|
1618 | {\pagestyle{headings} |
---|
1619 | \if@restonecol\onecolumn\else |
---|
1620 | \clearpage\fi} |
---|
1621 | |
---|
1622 | \newcommand{\@idxitem} {\par\hangindent 40\p@} |
---|
1623 | \newcommand{\subitem} {\par\hangindent 40\p@ \hspace*{20\p@}} |
---|
1624 | \newcommand{\subsubitem}{\par\hangindent 40\p@ \hspace*{30\p@}} |
---|
1625 | \newcommand{\indexspace}{\par\vskip 10\p@ \@plus0\p@ \@minus3\p@\relax} |
---|
1626 | |
---|
1627 | \def\multiprintindex#1#2{\startonoddpage |
---|
1628 | \def\see##1##2{\emph{\seename} ##1} |
---|
1629 | \def\seename{ver} |
---|
1630 | \def\indexname{#2} |
---|
1631 | \markboth{#2}{#2} |
---|
1632 | \input #1.ind} |
---|
1633 | |
---|
1634 | \newskip\iletterskip |
---|
1635 | \iletterskip=8pt plus .1pt minus 2pt |
---|
1636 | \def\iletter#1{\goodbreak\vskip\iletterskip{\sectionfont\uppercase{#1}\vrule depth 8pt width0pt}\nobreak} |
---|
1637 | |
---|
1638 | \def\seealso#1{\hskip16pt{\it Ver también\ }{#1}} |
---|
1639 | |
---|
1640 | \def\ltr#1{\nobreak\vskip\iletterskip |
---|
1641 | \hrule |
---|
1642 | \nobreak |
---|
1643 | \vskip3pt |
---|
1644 | {\bf#1} |
---|
1645 | \nobreak |
---|
1646 | \vskip\iletterskip} |
---|
1647 | |
---|
1648 | |
---|
1649 | %%%%%%%%%%%%%% |
---|
1650 | % Borrador |
---|
1651 | |
---|
1652 | \def\draft{\global\drafttrue |
---|
1653 | \def\@oddfoot{\vtop to 0pt{\vskip24pt\large\tt |
---|
1654 | D R A F T\hfill\today, \realtime\hfill D R A F T\global\titlefalse\vss}} |
---|
1655 | \def\@evenfoot{\@oddfoot}\normalsize} |
---|
1656 | |
---|
1657 | \def\fix{\ifcase\oldtime 0\or0\or0\or% |
---|
1658 | 0\or0\or0\or0\or0\or0\or0\fi} |
---|
1659 | \def\fixtiming{\ifcase\timing 0\or0\or0\or% |
---|
1660 | 0\or0\or0\or0\or0\or0\or0\fi} |
---|
1661 | \newcount\timing |
---|
1662 | \newcount\hourcount |
---|
1663 | \newcount\oldtime |
---|
1664 | |
---|
1665 | \def\realtime{\timing=\time \oldtime=\time |
---|
1666 | \ifnum\timing>60 \divide\timing by 60 |
---|
1667 | \hourcount=\the\timing |
---|
1668 | \multiply\timing by 60 |
---|
1669 | \advance\oldtime by-\timing |
---|
1670 | \ifnum\hourcount<12 \number\hourcount:\fix\number\oldtime am\fi% |
---|
1671 | \ifnum\hourcount=12 \number\hourcount:\fix\number\oldtime pm\fi% |
---|
1672 | \ifnum\hourcount>12 \advance\hourcount by-12 |
---|
1673 | \number\hourcount:\fix\number\oldtime pm\fi |
---|
1674 | \else12:\fixtiming\number\timing am\fi} |
---|
1675 | |
---|
1676 | \newcommand{\today}{\ifcase\month\or |
---|
1677 | January\or February\or March\or April\or May\or June\or |
---|
1678 | July\or August\or September\or October\or November\or December\fi |
---|
1679 | \space\number\day, \number\year} |
---|
1680 | |
---|
1681 | |
---|
1682 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
---|
1683 | %%%%% Macros para problemas propuestos |
---|
1684 | |
---|
1685 | \newcount\probcount |
---|
1686 | \newcount\subprobcount |
---|
1687 | \newcount\c@subproblem |
---|
1688 | \def\problems{ |
---|
1689 | \global\probcount=0 |
---|
1690 | \global\subprobcount=0 |
---|
1691 | \global\c@subproblem=0 |
---|
1692 | \goodbreak\vskip12pt |
---|
1693 | \markright{PROBLEMS} |
---|
1694 | \addcontentsline{toc}{section}{\protect\numberline{}Problemas} |
---|
1695 | \noindent{\sectionfont\uppercase{Problemas}\vrule depth 4pt width0pt}\markright{PROBLEMAS}\nobreak} |
---|
1696 | |
---|
1697 | \long\def\xappendixname{\appendixname}% |
---|
1698 | |
---|
1699 | \def\endproblems{\xdef\@currentlabel{\thechapter}} |
---|
1700 | \def\appendchapt{\Alph {chapter}} |
---|
1701 | \def\prob{\ifx\@chapapp\xappendixname |
---|
1702 | \let\go\aprob\else\let\go\chapprob\fi\go} |
---|
1703 | \def\subprob{\ifx\@chapapp\xappendixname |
---|
1704 | \let\go\asubprob\else\let\go\chapsubprob\fi\go} |
---|
1705 | |
---|
1706 | |
---|
1707 | \def\aprob{\vskip6pt |
---|
1708 | \leftskip=0pt |
---|
1709 | \global\c@subproblem=0 |
---|
1710 | \global\advance\probcount by1 |
---|
1711 | \xdef\@currentlabel{\Alph{chapter}.\the\probcount} |
---|
1712 | \noindent{\bf\Alph{chapter}.\the\probcount\hskip12pt\relax}} |
---|
1713 | |
---|
1714 | |
---|
1715 | \def\asubprob{\vskip1pt |
---|
1716 | \global\advance\c@subproblem by1 |
---|
1717 | \leftskip=39pt |
---|
1718 | \xdef\@currentlabel{\Alph{chapter}.\the\probcount.\alph{subproblem}} |
---|
1719 | % |
---|
1720 | \noindent\hbox to 0pt{\hss\bf\alph{subproblem})\ \ }\relax} |
---|
1721 | |
---|
1722 | |
---|
1723 | \newcount\c@subproblem |
---|
1724 | |
---|
1725 | \def\chapprob{\vskip6pt |
---|
1726 | \leftskip=0pt |
---|
1727 | \global\c@subproblem=0 |
---|
1728 | \global\advance\probcount by1 |
---|
1729 | \xdef\@currentlabel{\the\c@chapter.\the\probcount} |
---|
1730 | \noindent{\bf\the\c@chapter.\the\probcount\hskip12pt\relax}} |
---|
1731 | |
---|
1732 | \def\chapsubprob{\vskip1pt |
---|
1733 | \global\advance\c@subproblem by1 |
---|
1734 | \leftskip=39pt |
---|
1735 | \xdef\@currentlabel{\the\c@chapter.\the\probcount.\alph{subproblem}} |
---|
1736 | % |
---|
1737 | \noindent\hbox to 0pt{\hss\alph{subproblem})\ \ }\relax} |
---|
1738 | |
---|
1739 | \def\sidebysideprob#1#2{\centerline{\vtop{\hsize=.475\textwidth |
---|
1740 | \prob #1}\hfill\vtop{\hsize=.475\textwidth \prob #2}}} |
---|
1741 | |
---|
1742 | \def\sidebysidesubprob#1#2{\centerline{\vtop{\hsize=.475\textwidth |
---|
1743 | \subprob #1}\hfill\vtop{\hsize=.475\textwidth \subprob #2}}} |
---|
1744 | |
---|
1745 | %%%% <<== Final de problemas propuestos |
---|
1746 | |
---|
1747 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
---|
1748 | %%%%% Ejercicios |
---|
1749 | |
---|
1750 | |
---|
1751 | \def\exercises{\goodbreak\vskip12pt |
---|
1752 | \markright{EJERCICIOS} |
---|
1753 | \addcontentsline{toc}{section}{\protect\numberline{}Ejercicios} |
---|
1754 | \section*{EJERCICIOS} |
---|
1755 | \global\probcount=0 |
---|
1756 | \global\subprobcount=0 |
---|
1757 | \global\c@subproblem=0 |
---|
1758 | \markright{EJERCICIOS}\nobreak} |
---|
1759 | |
---|
1760 | \def\endexercises{\vskip1sp\xdef\@currentlabel{\thechapter}} |
---|
1761 | |
---|
1762 | \let\exer\prob |
---|
1763 | \let\subexer\subprob |
---|
1764 | \let\sidebysideexer\sidebysideprob |
---|
1765 | \let\sidebysidesubexer\sidebysidesubprob |
---|
1766 | |
---|
1767 | |
---|
1768 | |
---|
1769 | %%%% <<== final de macro de ejercicios |
---|
1770 | |
---|
1771 | |
---|
1772 | \pagenumbering{roman} |
---|
1773 | \widowpenalty10000 |
---|
1774 | \clubpenalty10000 |
---|
1775 | |
---|
1776 | %%%%% |
---|
1777 | %%%% side by side |
---|
1778 | %%%% to use: |
---|
1779 | % \begin{figure or table} \sidebyside{}{} \end{figure or table} |
---|
1780 | % |
---|
1781 | % \begin{table} |
---|
1782 | % \sidebyside{\caption{table caption} first table} |
---|
1783 | % {\caption{table caption} second table} |
---|
1784 | % \end{table} |
---|
1785 | |
---|
1786 | % or |
---|
1787 | |
---|
1788 | % \begin{figure} |
---|
1789 | % \sidebyside{\vskip<dimen>\caption{fig caption}} |
---|
1790 | % {\vskip<dimen>\caption{fig caption}} |
---|
1791 | % \end{figure} |
---|
1792 | |
---|
1793 | %% To label for cross referencing, use \label after and <outside> of |
---|
1794 | %% \caption{} |
---|
1795 | |
---|
1796 | % \begin{table} |
---|
1797 | % \sidebyside{\caption{table caption}\label{tab1} |
---|
1798 | % first table} |
---|
1799 | % {\caption{table caption}\label{tab2} second table} |
---|
1800 | % \end{table} |
---|
1801 | |
---|
1802 | % or |
---|
1803 | |
---|
1804 | % \begin{figure} |
---|
1805 | % \sidebyside{\vskip<dimen>\caption{fig caption}\label{fig1}} |
---|
1806 | % {\vskip<dimen>\caption{fig caption}\label{fig2}} |
---|
1807 | % \end{figure} |
---|
1808 | |
---|
1809 | |
---|
1810 | |
---|
1811 | \long\def\sidebyside#1#2{% |
---|
1812 | \hbox to\textwidth{\vtop{\hsize=.5\textwidth% |
---|
1813 | \advance\hsize by -.5\columnsep |
---|
1814 | \parindent=0pt |
---|
1815 | \centering |
---|
1816 | |
---|
1817 | #1\vskip1sp}\hskip\columnsep\vtop{\hsize=.5\textwidth% |
---|
1818 | \advance\hsize by -.5\columnsep |
---|
1819 | \parindent=0pt |
---|
1820 | \centering |
---|
1821 | #2 |
---|
1822 | |
---|
1823 | }\hfill}} |
---|
1824 | |
---|
1825 | \def\copyrightpage{\thispagestyle{empty}% |
---|
1826 | \vbox to\textheight\bgroup\vfill\obeylines\obeyspaces\xcopyrightpage} |
---|
1827 | |
---|
1828 | \def\xcopyrightpage#1#2\end#3{\scriptsize\parindent=0pt |
---|
1829 | Copyleft \copyright{#1} por Fundación CENDITEL. |
---|
1830 | \vskip6.5pt |
---|
1831 | Publicado por Fundación CENDITEL - MPPCTI.\\ |
---|
1832 | \vskip6.5pt |
---|
1833 | |
---|
1834 | Aquí deberíamos escribir la licencia de CENDITEL |
---|
1835 | \vskip10pt |
---|
1836 | {\locfont Publicaciones de CENDITEL:} |
---|
1837 | \vskip8pt |
---|
1838 | #2 |
---|
1839 | Impreso en la Repúblia Bolivariana de Venezuela.\\ |
---|
1840 | |
---|
1841 | 10\ \ 9\ \ 8\ \ 7\ \ 6\ \ 5\ \ 4\ \ 3\ \ 2\ \ 1 |
---|
1842 | \vskip24pt |
---|
1843 | \egroup\let\@badend\relax\endgroup} |
---|
1844 | |
---|
1845 | \let\endcopyrightpage\relax |
---|
1846 | |
---|
1847 | \def\seriespage{\newpage\thispagestyle{empty}\vbox to\textheight\bgroup\vfill |
---|
1848 | \leftskip=34pt \rightskip=-34pt} |
---|
1849 | \def\endseriespage{\vskip6pt{\noindent\hskip-12pt |
---|
1850 | Texto adicional de información} \vskip24pt\egroup |
---|
1851 | \newpage} |
---|
1852 | \def\series#1#2{\noindent\hskip-12pt\uppercase{#1}\\ |
---|
1853 | \global\setbox0=\hbox{\footnotesize#2} |
---|
1854 | \hsize=\wd0 |
---|
1855 | \footnotesize#2} |
---|
1856 | |
---|
1857 | \def\eds#1{\vskip6pt\footnotesize\noindent Editors: {\it #1}} |
---|
1858 | |
---|
1859 | %%%%%%%%%%%% |
---|
1860 | %% Información de la separata |
---|
1861 | |
---|
1862 | \newif\ifoffprintinfo |
---|
1863 | \def\dooffprintinfo{\global\offprintinfotrue} |
---|
1864 | |
---|
1865 | \def\copyrightyear#1{\def\thecopyrightyear{#1}} |
---|
1866 | |
---|
1867 | \copyrightyear{\the\year} |
---|
1868 | |
---|
1869 | \def\dofnote#1#2{\vtop{\hyphenpenalty=10000 |
---|
1870 | \advance\hsize -10pt \raggedright |
---|
1871 | \footnotesize{\it #1. }\\{By #2} |
---|
1872 | \noindent\hbox{\footnotesize |
---|
1873 | Copyright \copyright\ \thecopyrightyear\ John Wiley \& |
---|
1874 | Sons, Inc.}}} |
---|
1875 | |
---|
1876 | |
---|
1877 | \def\offprintinfo#1#2{ |
---|
1878 | \def\theoffprint{\bgroup\frenchspacing |
---|
1879 | \dofnote{#1}{#2} |
---|
1880 | \egroup}} |
---|
1881 | |
---|
1882 | \def\x@makefntext#1{ |
---|
1883 | \kern-3\p@ |
---|
1884 | \hrule\@width.4\columnwidth |
---|
1885 | \kern2.6\p@ |
---|
1886 | \vrule height 9pt width0pt \relax |
---|
1887 | #1} |
---|
1888 | |
---|
1889 | \def\offprintinfoerror{\typeout{^^J^^J |
---|
1890 | !! Please enter {\string\offprintinfo\string{(Título, |
---|
1891 | Edición)\string}\string{(Autor)\string}^^J en el inicio de su documento.!!^^J^^J}} |
---|
1892 | \bgroup |
---|
1893 | \x@makefntext{Por favor introduzca {\tt \string\offprintinfo\string{(Título, |
---|
1894 | Edición)\string}\string{(Autor)\string}\newline en el inicio de su |
---|
1895 | documento.\vrule depth8pt width0pt}\egroup}} |
---|
1896 | |
---|
1897 | |
---|
1898 | \def\printoffprintinfo{\vtop to0pt{% |
---|
1899 | \hsize=\textwidth\footnotesize |
---|
1900 | \expandafter\ifx\csname theoffprint\endcsname\relax |
---|
1901 | \offprintinfoerror\else\theoffprint\fi\vskip1sp\vss}} |
---|
1902 | |
---|
1903 | \let\c@CHAPTER\c@chapter |
---|
1904 | |
---|
1905 | %% LaTeX2e Cropmark Macros |
---|
1906 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
---|
1907 | \newif\ifcropmarkson |
---|
1908 | \def\noprintcropmarks{\global\cropmarksonfalse} |
---|
1909 | \def\nocropmarks{\global\cropmarksonfalse} |
---|
1910 | \global\cropmarksonfalse |
---|
1911 | |
---|
1912 | |
---|
1913 | \newdimen\widthofcropmarks |
---|
1914 | |
---|
1915 | \widthofcropmarks=39.25pc |
---|
1916 | \advance\widthofcropmarks.125in %% new |
---|
1917 | \widthofcropmarks=6.125in |
---|
1918 | |
---|
1919 | \newdimen\raisetopcropmarks |
---|
1920 | \raisetopcropmarks=-25pt |
---|
1921 | \advance\raisetopcropmarks.25in |
---|
1922 | |
---|
1923 | \newdimen\raisebottomcropmarks |
---|
1924 | %\raisebottomcropmarks-48pt |
---|
1925 | |
---|
1926 | \raisebottomcropmarks-34pt % was 80pt |
---|
1927 | |
---|
1928 | |
---|
1929 | \newdimen\movecropmarksright |
---|
1930 | \movecropmarksright=-92pt |
---|
1931 | |
---|
1932 | \def\topcropmarks{\ifcropmarkson |
---|
1933 | \vtop to0pt{\vss |
---|
1934 | \hbox to0pt{\hskip\movecropmarksright\hbox to0pt{\hss% |
---|
1935 | \hbox to2pc{\hrulefill\hskip3pt}\raise6pt\hbox{\vrule height 2pc}}% |
---|
1936 | \hskip\widthofcropmarks% |
---|
1937 | \hbox to0pt{% |
---|
1938 | \raise6pt\hbox{\vrule height 2pc}\hbox to2pc{\hskip3pt\hrulefill}\hss}\hss}% |
---|
1939 | \vskip\raisetopcropmarks} |
---|
1940 | \fi} |
---|
1941 | |
---|
1942 | \def\bottomcropmarks{\ifcropmarkson |
---|
1943 | \vtop to0pt{\vskip-\raisebottomcropmarks |
---|
1944 | \hbox to0pt{\hskip\movecropmarksright\hbox to0pt{\hss% |
---|
1945 | \hbox to2pc{\hrulefill\hskip3pt}\lower6pt\hbox{\vrule depth 2pc height |
---|
1946 | 0pt}}% |
---|
1947 | \hskip\widthofcropmarks% |
---|
1948 | \hbox to0pt{% |
---|
1949 | \lower6pt\hbox{\vrule depth 2pc height0pt}\hbox |
---|
1950 | to2pc{\hskip3pt\hrulefill}\hss}\hss}% |
---|
1951 | \vss}\fi} |
---|
1952 | |
---|
1953 | |
---|
1954 | \long\def\docropmarks{\let\saveshipout\shipout |
---|
1955 | \long\def\shipout\vbox##1{\saveshipout\vbox{\topcropmarks##1\bottomcropmarks |
---|
1956 | }} |
---|
1957 | } |
---|
1958 | |
---|
1959 | \docropmarks |
---|
1960 | |
---|
1961 | \voffset-25pt |
---|
1962 | \hoffset40pt % was 48 |
---|
1963 | |
---|
1964 | |
---|
1965 | %% new additions, as of Jan 25, 2005 |
---|
1966 | \newtheorem{theorem}{Theorem}[chapter] |
---|
1967 | |
---|
1968 | \newif\iffirstappendix |
---|
1969 | \global\firstappendixtrue |
---|
1970 | |
---|
1971 | \newcount\c@appfootnote |
---|
1972 | |
---|
1973 | \def\appthanks#1{*\gdef\realthanks{#1}} |
---|
1974 | |
---|
1975 | \newif\ifappend |
---|
1976 | |
---|
1977 | \def\lookatapp{\if\next[\let\go\yappendix\else |
---|
1978 | \let\go\xappendix\fi\go} |
---|
1979 | |
---|
1980 | \def\appendix{\global\appendtrue |
---|
1981 | \let\thetable\savethetable |
---|
1982 | \let\thefigure\savethefigure |
---|
1983 | \renewcommand{\@chapapp}{\appendixname}% |
---|
1984 | %% if using answers.sty: |
---|
1985 | \expandafter\ifx\csname Closesolutionfile\endcsname \relax |
---|
1986 | \else |
---|
1987 | \Closesolutionfile{ans}\fi |
---|
1988 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
---|
1989 | \futurelet\next\lookatapp} |
---|
1990 | |
---|
1991 | \def\yappendix[#1]#2{\startonoddpage |
---|
1992 | \global\titletrue\dooffprintinfo |
---|
1993 | \global\@mainmattertrue% <<=== |
---|
1994 | \gdef \thepage {\csname @arabic\endcsname \c@page } |
---|
1995 | %% To fix includeonly numbering bug: ====>> |
---|
1996 | \if@partsw\else |
---|
1997 | \iffirstappendix\setcounter{chapter}{0}\fi |
---|
1998 | \global\firstappendixfalse\fi% |
---|
1999 | \refstepcounter{chapter} |
---|
2000 | % <<==== end bug fix |
---|
2001 | %% when using answers.sty, |
---|
2002 | %% to open an ans<chapnum> file to be used for solutions section |
---|
2003 | \expandafter\ifx\csname Opensolutionfile\endcsname\relax\else |
---|
2004 | \Opensolutionfile{ans}[ans\Alph{chapter}]\fi |
---|
2005 | \setcounter{section}{0}% |
---|
2006 | \setcounter{figure}{0}% |
---|
2007 | \setcounter{table}{0}% |
---|
2008 | \setcounter{equation}{0}% |
---|
2009 | \setcounter{theorem}{0}% |
---|
2010 | \def\two{#2}\ifx\two\empty |
---|
2011 | \chapter*{Apéndice \Alph{chapter}} |
---|
2012 | \renewcommand{\thechapter}{\Alph{chapter}} |
---|
2013 | \addcontentsline{toc}{achapter}{\thechapter} |
---|
2014 | \else |
---|
2015 | \chapter*{\vtop{\let\thanks\appthanks |
---|
2016 | \baselineskip=30pt \parindent=0pt |
---|
2017 | \leftskip=0pt |
---|
2018 | \Alph{chapter}\vskip4pt |
---|
2019 | #2}} |
---|
2020 | % |
---|
2021 | \renewcommand{\thechapter}{\Alph{chapter}} |
---|
2022 | \addcontentsline{toc}{achapter}{\thechapter\hskip2pt \ \quad #1} |
---|
2023 | \fi |
---|
2024 | % |
---|
2025 | \def\one{#1} |
---|
2026 | {\let\\ \ |
---|
2027 | \ifx\one\empty |
---|
2028 | \markboth{\uppercase{Apéndice \thechapter}}{\uppercase{Apéndice \thechapter}} |
---|
2029 | \else |
---|
2030 | \markboth{\uppercase{#1}}{\uppercase{#1}} |
---|
2031 | \fi |
---|
2032 | } |
---|
2033 | \xdef\@currentlabel{\thechapter} |
---|
2034 | \ifx\realthanks\xrelax\else |
---|
2035 | \xdef\dofoot{\realthanks} |
---|
2036 | \fi |
---|
2037 | {\ifx\realthanks\xrelax\else |
---|
2038 | \def\thefootnote{*} |
---|
2039 | \footnotetext{\dofoot}\fi} |
---|
2040 | \gdef\realthanks{\relax} |
---|
2041 | } |
---|
2042 | |
---|
2043 | |
---|
2044 | \let\dofoot\relax |
---|
2045 | \gdef\realthanks{\relax} |
---|
2046 | \def\xrelax{\relax} |
---|
2047 | \def\xappendix#1{\startonoddpage |
---|
2048 | \global\titletrue\dooffprintinfo |
---|
2049 | \global\@mainmattertrue% <<=== |
---|
2050 | \gdef \thepage {\csname @arabic\endcsname \c@page } |
---|
2051 | %% To fix includeonly numbering bug: ====>> |
---|
2052 | \if@partsw\else |
---|
2053 | \iffirstappendix\setcounter{chapter}{0}\fi |
---|
2054 | \global\firstappendixfalse\fi% |
---|
2055 | \refstepcounter{chapter} |
---|
2056 | % <<==== end bug fix |
---|
2057 | %% when using answers.sty, |
---|
2058 | %% to open an ans<chapnum> file to be used for solutions section |
---|
2059 | % |
---|
2060 | \expandafter\ifx\csname Opensolutionfile\endcsname\relax\else |
---|
2061 | \Opensolutionfile{ans}[ans\Alph{chapter}]\fi |
---|
2062 | \setcounter{section}{0}% |
---|
2063 | \setcounter{figure}{0}% |
---|
2064 | \setcounter{table}{0}% |
---|
2065 | \setcounter{equation}{0}% |
---|
2066 | \setcounter{theorem}{0}% |
---|
2067 | \renewcommand{\@chapapp}{\appendixname}% |
---|
2068 | \def\one{#1}\ifx\one\empty |
---|
2069 | \chapter*{Apéndice \Alph{chapter}} |
---|
2070 | \renewcommand{\thechapter}{\Alph{chapter}} |
---|
2071 | \addcontentsline{toc}{achapter}{\thechapter\hskip2pt \ \quad Apéndice} |
---|
2072 | \else |
---|
2073 | \chapter*{\vtop{\let\thanks\appthanks |
---|
2074 | \baselineskip=30pt |
---|
2075 | \leftskip=0pt \parindent=0pt |
---|
2076 | Apéndice \Alph{chapter}\vskip4pt |
---|
2077 | #1}} |
---|
2078 | \renewcommand{\thechapter}{\Alph{chapter}} |
---|
2079 | \let\thanks\eatone |
---|
2080 | \addcontentsline{toc}{achapter}{\thechapter\hskip2pt \ \quad |
---|
2081 | #1} |
---|
2082 | \fi |
---|
2083 | \def\one{#1} |
---|
2084 | {\let\\ \ |
---|
2085 | \ifx\one\empty |
---|
2086 | \markboth{\uppercase{Apéndice \thechapter}}{\uppercase{Apéndice \thechapter}} |
---|
2087 | \else |
---|
2088 | \let\thanks\eatone |
---|
2089 | \markboth{\uppercase{#1}}{\uppercase{#1}} |
---|
2090 | \fi |
---|
2091 | } |
---|
2092 | \xdef\@currentlabel{\thechapter} |
---|
2093 | \ifx\realthanks\xrelax\else |
---|
2094 | \xdef\dofoot{\realthanks} |
---|
2095 | \fi |
---|
2096 | {\ifx\realthanks\xrelax\else |
---|
2097 | \def\thefootnote{*} |
---|
2098 | \footnotetext{\dofoot}} |
---|
2099 | \fi |
---|
2100 | \gdef\realthanks{\relax} |
---|
2101 | \egroup |
---|
2102 | } |
---|
2103 | |
---|
2104 | |
---|
2105 | %% For square boxes for Q.E.D. symbol, used in end proof |
---|
2106 | |
---|
2107 | \newdimen\slugwidth |
---|
2108 | \newdimen\slugheight |
---|
2109 | \newdimen\slugdepth |
---|
2110 | |
---|
2111 | \slugwidth=4.5pt |
---|
2112 | \slugheight=4.5pt |
---|
2113 | \slugdepth=0pt |
---|
2114 | |
---|
2115 | |
---|
2116 | \def\qed{\unskip\nobreak~~~\hfill\llap{% |
---|
2117 | \vbox{\unskip\nobreak~~~\hfill\llap{\vrule height \slugheight width |
---|
2118 | \slugwidth depth\slugdepth}}}} |
---|
2119 | |
---|
2120 | \def\sslug{\raise.5ex\hbox{\vrule width 4pt height4pt depth0pt}} |
---|
2121 | \def\slug{\vrule width 7pt height7pt depth0pt} |
---|
2122 | \@addtoreset{exampnum}{chapter} |
---|
2123 | \newcount\c@exampnum |
---|
2124 | |
---|
2125 | %%%%%%%%%%%% Ejemplo %%%%%%%%%%%%%%%%% |
---|
2126 | \def\exbox{{\fboxsep=0pt \fboxrule =.5pt |
---|
2127 | \fbox{\vrule height 7pt width 0pt\hskip7pt}% |
---|
2128 | \hskip-5.5pt\raise 2pt\hbox{\vrule width 7.25pt height 7.25pt} |
---|
2129 | }} |
---|
2130 | |
---|
2131 | \def\example{\@ifnextchar[{\xexample}{\yexample}} |
---|
2132 | |
---|
2133 | \def\xexample[#1]{\goodbreak\everypar={}\vskip12pt\global\advance\c@exampnum by 1 |
---|
2134 | \xdef\@currentlabel{\thechapter.\the\c@exampnum} |
---|
2135 | \noindent\vrule depth14pt width0pt\exbox\ \ {\small\bf |
---|
2136 | \uppercase{Example} \thechapter.\the\c@exampnum}\hskip1em {\bf #1}% |
---|
2137 | \vskip1sp |
---|
2138 | \bgroup\nobreak\vskip1sp |
---|
2139 | \leftskip=18pt |
---|
2140 | \@afterindentfalse\@afterheading\nobreak} |
---|
2141 | |
---|
2142 | \def\yexample{\goodbreak\everypar={}\vskip12pt\global\advance\c@exampnum by 1 |
---|
2143 | \xdef\@currentlabel{\thechapter.\the\c@exampnum} |
---|
2144 | \noindent\vrule depth14pt width0pt\exbox\ \ {\small\bf \uppercase{Ejemplo} \thechapter.\the\c@exampnum} |
---|
2145 | \vskip1sp |
---|
2146 | \bgroup |
---|
2147 | \leftskip=18pt |
---|
2148 | \@afterindentfalse\@afterheading\nobreak} |
---|
2149 | |
---|
2150 | \def\endexample{\vskip1sp\egroup\vskip6pt |
---|
2151 | \global\everypar={\hskip-\parindent\everypar={}} |
---|
2152 | \leftskip=0pt |
---|
2153 | } |
---|
2154 | |
---|
2155 | %% ==> Algoritmo |
---|
2156 | \def\xpar{\par\leavevmode} |
---|
2157 | {\catcode`\^^M=\active % these lines must end with % |
---|
2158 | \gdef\xobeylines{\catcode`\^^M\active \let^^M\xpar}% |
---|
2159 | } |
---|
2160 | |
---|
2161 | \@addtoreset{algorithm}{chapter} |
---|
2162 | \@addtoreset{algo}{chapter} |
---|
2163 | \newtheorem{algo}{Algorithm}[chapter] |
---|
2164 | \newcount\c@algorithm |
---|
2165 | |
---|
2166 | \def\algorithm{\vskip12pt |
---|
2167 | \global\advance\c@algorithm by 1 |
---|
2168 | \xdef\@currentlabel{\thechapter.\the\c@algorithm} |
---|
2169 | \noindent{\bf Algoritmo \arabic{chapter}.\arabic{algorithm}} |
---|
2170 | \vskip6pt |
---|
2171 | \bgroup\xobeylines\obeyspaces\def\ {\quad} |
---|
2172 | \parindent=0pt\footnotesize\tt\leftskip=1pc\vskip4pt\relax} |
---|
2173 | |
---|
2174 | \def\endalgorithm{\vskip4pt\egroup} |
---|
2175 | |
---|
2176 | %% <== Algoritmo |
---|
2177 | |
---|
2178 | \let\savelabel\label |
---|
2179 | |
---|
2180 | \def\proof{\everypar={} |
---|
2181 | \futurelet\next\lookforbracket} |
---|
2182 | |
---|
2183 | \def\lookforbracket{\ifx\next[\let\go\usespecialterm |
---|
2184 | \else\let\go\relax |
---|
2185 | \ifvmode\vskip-\lastskip\fi |
---|
2186 | \vskip8pt |
---|
2187 | \noindent{\it Proof\/:}% |
---|
2188 | \enskip\relax\fi\ignorespaces\go} |
---|
2189 | |
---|
2190 | \def\usespecialterm[#1]{\ifvmode\vskip-\lastskip\fi |
---|
2191 | \vskip6pt |
---|
2192 | \noindent% |
---|
2193 | {\it Proof\ \ {\rm(#1):}}\ \ \relax\ignorespaces} |
---|
2194 | |
---|
2195 | \def\endproof{\qed\vskip6pt\relax} |
---|
2196 | |
---|
2197 | %%%%%%%%%%%%%%%%% |
---|
2198 | %% Answers macros |
---|
2199 | %%%% Problems and Solutions, Accomodating answers.sty commands |
---|
2200 | |
---|
2201 | |
---|
2202 | \def\solutionchap#1{\section*{\uppercase{Soluciones por Capítulo} #1} |
---|
2203 | \openin1 ans#1.tex \ifeof1 |
---|
2204 | \typeout{^^J^^J No file ans#1.tex! |
---|
2205 | ^^J\string\solutionchap\string{#1\string} requires ans#1.tex^^J |
---|
2206 | Please |
---|
2207 | make sure that you have entered |
---|
2208 | \string\usepackage{answers} and |
---|
2209 | \string\Newassociation\string{sol\string}\string{Solution\string}\string{ans\string}\space and then run LaTeX on your file again.} |
---|
2210 | \else |
---|
2211 | \input{ans#1}\fi} |
---|
2212 | |
---|
2213 | \def\solutionappendix#1{\section*{\uppercase{Soluciones por Apéndice} #1} |
---|
2214 | \openin1 ans#1.tex \ifeof1 |
---|
2215 | \typeout{^^J^^J No file ans#1.tex! |
---|
2216 | ^^J\string\solutionchap\string{#1\string} requires ans#1.tex^^J |
---|
2217 | Please |
---|
2218 | make sure that you have entered |
---|
2219 | \string\usepackage{answers} and |
---|
2220 | \string\Newassociation\string{sol\string}\string{Solution\string}\string{ans\string}\space and then run LaTeX on your file again.} |
---|
2221 | \else |
---|
2222 | \input{ans#1}\fi} |
---|
2223 | |
---|
2224 | |
---|
2225 | \def\solutions{\newpage\ifodd\c@page\else\thispagestyle{empty} |
---|
2226 | \null\newpage\fi |
---|
2227 | \chapter*{Problem Solutions} |
---|
2228 | \markboth{Problem Solutions}{Problem Solutions} |
---|
2229 | \addcontentsline{toc}{schapter}{Problem Solutions} |
---|
2230 | \expandafter\ifx\csname Closesolutionfile\endcsname \relax\else |
---|
2231 | \Closesolutionfile{ans}\fi |
---|
2232 | } |
---|
2233 | |
---|
2234 | \let\savedocument\document |
---|
2235 | \let\saveenddocument\enddocument |
---|
2236 | |
---|
2237 | \def\enddocument{ |
---|
2238 | \expandafter\ifx\csname Closesolutionfile\endcsname \relax\else |
---|
2239 | \Closesolutionfile{ans}\fi |
---|
2240 | \saveenddocument} |
---|
2241 | |
---|
2242 | \def\document{% |
---|
2243 | \savedocument |
---|
2244 | \expandafter\ifx\csname Newassociation\endcsname\relax |
---|
2245 | \def\sol{\typeout{^^J^^J To make \string\begin\string{sol\string} work, please use \string\usepackage\string{answers\string} |
---|
2246 | ^^J^^J}} |
---|
2247 | \def\endsol{\typeout{^^J^^J}} |
---|
2248 | \def\Solution##1{\typeout{^^J^^J To make \string\Solution\space work, please use \string\usepackage\string{answers\string} |
---|
2249 | ^^J^^J}} |
---|
2250 | \else |
---|
2251 | \Newassociation{sol}{Solution}{ans}\fi |
---|
2252 | } |
---|
2253 | |
---|
2254 | \def\xnumberline#1{\hb@xt@\@tempdima{\hskip12pt\llap{#1}\hfill}} |
---|
2255 | |
---|
2256 | \newcommand{\contentsinbrief}{% |
---|
2257 | \startonoddpage |
---|
2258 | \global\titletrue |
---|
2259 | \advance\chapskip-6pt |
---|
2260 | \chapheight=-12pt |
---|
2261 | \partskip=-12pt |
---|
2262 | \vglue-10.5pc |
---|
2263 | \chapter*{Lista breve de Contenidos} |
---|
2264 | \@mkboth{\uppercase{Lista breve de Contenidos}}{\uppercase{Lista breve de Contenidos}}% |
---|
2265 | \bgroup |
---|
2266 | \let\numberline\xnumberline |
---|
2267 | \parskip=6pt |
---|
2268 | {\hyphenpenalty=10000 |
---|
2269 | \parindent=0pt |
---|
2270 | \@startchaptoc{toc} |
---|
2271 | } |
---|
2272 | \egroup |
---|
2273 | \if@restonecol\twocolumn\fi |
---|
2274 | \newpage |
---|
2275 | \setcounter{tocdepth}{2} |
---|
2276 | \markboth{}{} |
---|
2277 | } |
---|
2278 | |
---|
2279 | \def\@startchaptoc#1{% |
---|
2280 | \begingroup |
---|
2281 | \def\l@chapter##1##2{% |
---|
2282 | \ifnum \c@tocdepth >\m@ne |
---|
2283 | \addpenalty{-\@highpenalty}% |
---|
2284 | \vskip 12pt \@plus6\p@ |
---|
2285 | \setlength\@tempdima{2em}% was 1.5 |
---|
2286 | \begingroup\chaptocfont |
---|
2287 | \parindent \z@ \rightskip \@pnumwidth |
---|
2288 | \parfillskip -\@pnumwidth |
---|
2289 | \leavevmode |
---|
2290 | \advance\leftskip\@tempdima |
---|
2291 | \hskip -\leftskip |
---|
2292 | ##1\nobreak\hfil \nobreak\hbox to\@pnumwidth{\hss ##2}\par |
---|
2293 | \penalty\@highpenalty |
---|
2294 | \endgroup |
---|
2295 | \fi\vskip-6pt} |
---|
2296 | \setcounter{tocdepth}{0} |
---|
2297 | \makeatletter |
---|
2298 | \@input{\jobname.#1}% |
---|
2299 | \@nobreakfalse |
---|
2300 | \endgroup} |
---|
2301 | |
---|
2302 | |
---|
2303 | %%% Macros de libro editado: |
---|
2304 | |
---|
2305 | \font\chapauthorfont=cmcsc10 |
---|
2306 | \font\chapaffilfont=\timesroman at 9pt |
---|
2307 | |
---|
2308 | \def\chapteraffil#1{\vskip6pt |
---|
2309 | \noindent{\let\affilmark\newaffilmark\chapaffilfont\ignorespaces #1\vskip1sp}} |
---|
2310 | \def\saveaffilmark#1{$^{#1}$} |
---|
2311 | \def\newaffilmark#1{\leftskip4pt\hbox to0pt{\hss\hbox to 4pt{$^{#1}$}}} |
---|
2312 | \def\eatone#1{} |
---|
2313 | |
---|
2314 | \newdimen\chapskip |
---|
2315 | \chapskip=26pt |
---|
2316 | \newdimen\chapheight |
---|
2317 | \newdimen\authorskip |
---|
2318 | |
---|
2319 | \def\chapterauthors#1{\vbox to0pt{\vglue-1in |
---|
2320 | \let\affilmark\saveaffilmark\chapauthorfont #1\vrule height 10pt width0pt\ } |
---|
2321 | {\let\chapteraffil\eatone\let\affilmark\eatone |
---|
2322 | \addtocontents{toc}{\string\nobreak |
---|
2323 | \vskip\authorskip |
---|
2324 | \string\noindent\vrule height 9pt width0pt\hskip\chapskip#1\hfill\vskip\chapheight}\ \vskip3pt}} |
---|
2325 | |
---|
2326 | \def\contributors{\chapter*{CONTRIBUYENTES} |
---|
2327 | \vskip1sp |
---|
2328 | \leftskip=10pt |
---|
2329 | \parindent-10pt |
---|
2330 | \vskip-2pt |
---|
2331 | \everypar={} |
---|
2332 | \def\footnote##1{\hskip-10pt\savefootnote{##1}\hskip10pt} |
---|
2333 | \setcounter{page}{5} |
---|
2334 | \global\titletrue |
---|
2335 | \markboth{CONTRIBUYENTES}{CONTRIBUYENTES}} |
---|
2336 | |
---|
2337 | \def\endcontributors{\newpage\markboth{}{}} |
---|
2338 | |
---|
2339 | \def\name#1{\vskip2pt\fakesc #1*\hskip10pt} |
---|
2340 | |
---|
2341 | %%%%%%%%%%%%%%%%%%%%% |
---|
2342 | %% Warn against using earlier commands |
---|
2343 | \expandafter\def\csname chapreferences*\endcsname{ |
---|
2344 | \typeout{^^J^^J \string\begin\string{chapreferences*\string}\space is |
---|
2345 | obsolete.^^J Please use |
---|
2346 | \string\begin\string{chapreferences\string}\string{<widest label>\string}\space instead.^^J Consulte docs.pdf si tiene preguntas.}\stop } |
---|
2347 | |
---|
2348 | \expandafter\def\csname references*\endcsname{ |
---|
2349 | \typeout{^^J^^J \string\begin\string{references*\string}\space is |
---|
2350 | obsolete.^^J Please use |
---|
2351 | \string\begin\string{references\string}\string{<widest label>\string}\space instead.^^J Consulte docs.pdf si tiene preguntas.}\stop } |
---|
2352 | |
---|
2353 | |
---|
2354 | \expandafter\def\csname namedchapreferences\endcsname{ |
---|
2355 | \typeout{^^J^^J \string\begin\string{namedchapreferences\string}\space is |
---|
2356 | obsolete.^^J Please use |
---|
2357 | \string\begin\string{chapreferences\string}\string{<widest label>\string}\space instead.^^J Consulte docs.pdf si tiene preguntas.}\stop } |
---|
2358 | |
---|
2359 | \expandafter\def\csname namedreferences\endcsname{ |
---|
2360 | \typeout{^^J^^J \string\begin\string{namedreferences\string}\space is |
---|
2361 | obsolete.^^J Please use |
---|
2362 | \string\begin\string{references\string}\string{<widest label>\string}\space instead.^^J Consulte docs.pdf si tiene preguntas.}\stop } |
---|
2363 | |
---|
2364 | \endinput |
---|
2365 | |
---|
2366 | |
---|
2367 | |
---|
2368 | |
---|
2369 | |
---|
2370 | |
---|
2371 | |
---|
2372 | |
---|
2373 | |
---|
2374 | |
---|