blob: fe9e4b8658a36e00348edc04355e52501ff11d35 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
|
% File nodoc.tex
% By Enrique Mel\'endez, <UEI0560130010@eurociber.es> April, 14, 1999.
% Freely distributable under, f. i. GNU.
% I do this for fun, but if you use it, I would like no know how it performs
% Please, keep the author notice.
% Put \include nodoc.tex as the very first line of your documents.
% No responsibility. Usde this at your own risk. (That is, it may not work
% as you intended, but I never designed it to.)
\makeatletter
\ifx\section\undefined
\makeatother
\expandafter\endinput
\else
% Things we suppress are `only preamble'
% documentclass
\let\n@documentclass\documentclass
\def\documentclass{\@ifnextchar[\@documentclass@{\@documentclass@[]}}
\def\@documentclass@[#1]#2{\relax}
% usepackage
\let\n@usepackage\usepackage
\def\usepackage{\@ifnextchar[\@usepackage@{\@usepackage@[]}}
\def\@usepackage@[#1]#2{\relax}
% The following 4 should be allowed to change. I don't know how.
% author
\let\n@author\author
\def\author#1{\gdef \@author{#1}%\relax
}
% date
\let\n@date\date
\def\date#1{\relax}
% title
\let\n@title\title
\def\title#1{\gdef \@title{#1}%\relax
}
% maketitle
\let\n@maketitle\maketitle
\def\maketitle{%
\vskip 2em%
\begin{center}%
\let \footnote \thanks
{\LARGE \@title \par}%
\vskip 1.5em%
{\large
\lineskip .5em%
\begin{tabular}[t]{c}%
\@author
\end{tabular}\par}%
\vskip 1em%
{\large \@date}%
\end{center}%
\par
\vskip 1.5em
\global\let\@title\@empty
\global\let\@author\@empty
\global\let\title\relax
\global\let\author\relax
%\relax
}
\def\pagestyle#1{\relax}
\def\thispagestyle#1{\relax}
\renewenvironment{titlepage}
{%
\if@twocolumn
\@restonecoltrue\onecolumn
\else
\@restonecolfalse\newpage
\fi
\thispagestyle{empty}%
%\setcounter{page}\@ne
}%
{\if@restonecol\twocolumn \else \newpage \fi
%\if@twoside\else
%\setcounter{page}\@ne
%\fi
}
% tableofcontents
\let\n@tableofcontents\tableofcontents
\def\tableofcontents{\relax}
% The begindocument, where we rebind some of the above
\let\@document@=\document
\def\document{\endgroup\relax%
\let\document\@document@%
\let\documentclass\n@documentclass%
\let\usepackage\n@usepackage%
}
% The enddocument, where some more things are rebound
\let\@enddoc@=\enddocument
\def\enddocument{%
\let\tableofcontents\n@tableofcontents%
\let\maketitle\n@maketitle
\let\title\n@title
\let\author\n@author
\let\date\n@date
\let\enddocument\@enddoc@%
\begingroup}
\fi
%% Borrowed from LaTeX general format.
\def\@ifnextchar#1#2#3{%
\let\reserved@d=#1%
\def\reserved@a{#2}\def\reserved@b{#3}%
\futurelet\@let@token\@ifnch}
\def\@ifnch{%
\ifx\@let@token\@sptoken
\let\reserved@c\@xifnch
\else
\ifx\@let@token\reserved@d
\let\reserved@c\reserved@a
\else
\let\reserved@c\reserved@b
\fi
\fi
\reserved@c}
\def\:{\let\@sptoken= } \: % this makes \@sptoken a space token
\def\:{\@xifnch} \expandafter\def\: {\futurelet\@let@token\@ifnch}
\makeatother
|