OSDN Git Service

Add ltjclasses and ltjsclasses.
[luatex-ja/luatexja.git] / src / ltjsclasses / ltjsbook.cls
1 %%
2 %% This is file `ltjsbook.cls',
3 %% generated with the docstrip utility.
4 %%
5 %% The original source files were:
6 %%
7 %% ltjsclasses.dtx  (with options: `book')
8 %% 
9 %% IMPORTANT NOTICE:
10 %% 
11 %% For the copyright see the source file.
12 %% 
13 %% Any modified versions of this file must be renamed
14 %% with new filenames distinct from ltjsbook.cls.
15 %% 
16 %% For distribution of the original source see the terms
17 %% for copying and modification in the file ltjsclasses.dtx.
18 %% 
19 %% This generated file may be distributed as long as the
20 %% original source files, as listed above, are part of the
21 %% same distribution. (The sources need not necessarily be
22 %% in the same archive or directory.)
23 %% File: ltjsclasses.dtx
24 %% \CharacterTable
25 %%  {Upper-case    \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z
26 %%   Lower-case    \a\b\c\d\e\f\g\h\i\j\k\l\m\n\o\p\q\r\s\t\u\v\w\x\y\z
27 %%   Digits        \0\1\2\3\4\5\6\7\8\9
28 %%   Exclamation   \!     Double quote  \"     Hash (number) \#
29 %%   Dollar        \$     Percent       \%     Ampersand     \&
30 %%   Acute accent  \'     Left paren    \(     Right paren   \)
31 %%   Asterisk      \*     Plus          \+     Comma         \,
32 %%   Minus         \-     Point         \.     Solidus       \/
33 %%   Colon         \:     Semicolon     \;     Less than     \<
34 %%   Equals        \=     Greater than  \>     Question mark \?
35 %%   Commercial at \@     Left bracket  \[     Backslash     \\
36 %%   Right bracket \]     Circumflex    \^     Underscore    \_
37 %%   Grave accent  \`     Left brace    \{     Vertical bar  \|
38 %%   Right brace   \}     Tilde         \~}
39 \NeedsTeXFormat{LaTeX2e}
40 \ProvidesClass{ltjsbook}
41   [2011/10/03 ]
42 \RequirePackage{luatexja}
43 \newif\if@restonecol
44 \newif\if@titlepage
45 \newif\if@openright
46 \newif\if@mainmatter \@mainmattertrue
47 \newif\if@enablejfam \@enablejfamtrue
48 \DeclareOption{a3paper}{%
49   \setlength\paperheight {420mm}%
50   \setlength\paperwidth  {297mm}}
51 \DeclareOption{a4paper}{%
52   \setlength\paperheight {297mm}%
53   \setlength\paperwidth  {210mm}}
54 \DeclareOption{a5paper}{%
55   \setlength\paperheight {210mm}%
56   \setlength\paperwidth  {148mm}}
57 \DeclareOption{a6paper}{%
58   \setlength\paperheight {148mm}%
59   \setlength\paperwidth  {105mm}}
60 \DeclareOption{b4paper}{%
61   \setlength\paperheight {364mm}%
62   \setlength\paperwidth  {257mm}}
63 \DeclareOption{b5paper}{%
64   \setlength\paperheight {257mm}%
65   \setlength\paperwidth  {182mm}}
66 \DeclareOption{b6paper}{%
67   \setlength\paperheight {182mm}%
68   \setlength\paperwidth  {128mm}}
69 \DeclareOption{a4j}{%
70   \setlength\paperheight {297mm}%
71   \setlength\paperwidth  {210mm}}
72 \DeclareOption{a5j}{%
73   \setlength\paperheight {210mm}%
74   \setlength\paperwidth  {148mm}}
75 \DeclareOption{b4j}{%
76   \setlength\paperheight {364mm}%
77   \setlength\paperwidth  {257mm}}
78 \DeclareOption{b5j}{%
79   \setlength\paperheight {257mm}%
80   \setlength\paperwidth  {182mm}}
81 \DeclareOption{a4var}{%
82   \setlength\paperheight {283mm}%
83   \setlength\paperwidth  {210mm}}
84 \DeclareOption{b5var}{%
85   \setlength\paperheight {230mm}%
86   \setlength\paperwidth  {182mm}}
87 \DeclareOption{letterpaper}{%
88   \setlength\paperheight {11in}%
89   \setlength\paperwidth  {8.5in}}
90 \DeclareOption{legalpaper}{%
91   \setlength\paperheight {14in}%
92   \setlength\paperwidth  {8.5in}}
93 \DeclareOption{executivepaper}{%
94   \setlength\paperheight {10.5in}%
95   \setlength\paperwidth  {7.25in}}
96 \newif\if@landscape
97 \@landscapefalse
98 \DeclareOption{landscape}{\@landscapetrue}
99 \newif\if@slide
100 \@slidefalse
101 \newcommand{\@ptsize}{0}
102 \DeclareOption{slide}{\@slidetrue\renewcommand{\@ptsize}{26}\@landscapetrue\@titlepagetrue}
103 \DeclareOption{8pt}{\renewcommand{\@ptsize}{-2}}
104 \DeclareOption{9pt}{\renewcommand{\@ptsize}{-1}}
105 \DeclareOption{10pt}{\renewcommand{\@ptsize}{0}}
106 \DeclareOption{11pt}{\renewcommand{\@ptsize}{1}}
107 \DeclareOption{12pt}{\renewcommand{\@ptsize}{2}}
108 \DeclareOption{14pt}{\renewcommand{\@ptsize}{4}}
109 \DeclareOption{17pt}{\renewcommand{\@ptsize}{7}}
110 \DeclareOption{20pt}{\renewcommand{\@ptsize}{10}}
111 \DeclareOption{21pt}{\renewcommand{\@ptsize}{11}}
112 \DeclareOption{25pt}{\renewcommand{\@ptsize}{15}}
113 \DeclareOption{30pt}{\renewcommand{\@ptsize}{20}}
114 \DeclareOption{36pt}{\renewcommand{\@ptsize}{26}}
115 \DeclareOption{43pt}{\renewcommand{\@ptsize}{33}}
116 \DeclareOption{12Q}{\renewcommand{\@ptsize}{1200}}
117 \DeclareOption{14Q}{\renewcommand{\@ptsize}{1400}}
118 \hour\time \divide\hour by 60\relax
119 \@tempcnta\hour \multiply\@tempcnta 60\relax
120 \minute\time \advance\minute-\@tempcnta
121 \DeclareOption{tombow}{%
122   \tombowtrue \tombowdatetrue
123   \setlength{\@tombowwidth}{.1\p@}%
124   \@bannertoken{%
125      \jobname\space(\number\year-\two@digits\month-\two@digits\day
126      \space\two@digits\hour:\two@digits\minute)}%
127   \maketombowbox}
128 \DeclareOption{tombo}{%
129   \tombowtrue \tombowdatefalse
130   \setlength{\@tombowwidth}{.1\p@}%
131   \maketombowbox}
132 \DeclareOption{mentuke}{%
133   \tombowtrue \tombowdatefalse
134   \setlength{\@tombowwidth}{\z@}%
135   \maketombowbox}
136 \DeclareOption{oneside}{\@twosidefalse \@mparswitchfalse}
137 \DeclareOption{twoside}{\@twosidetrue \@mparswitchtrue}
138 \DeclareOption{vartwoside}{\@twosidetrue \@mparswitchfalse}
139 \DeclareOption{onecolumn}{\@twocolumnfalse}
140 \DeclareOption{twocolumn}{\@twocolumntrue}
141 \DeclareOption{titlepage}{\@titlepagetrue}
142 \DeclareOption{notitlepage}{\@titlepagefalse}
143 \DeclareOption{openright}{\@openrighttrue}
144 \DeclareOption{openany}{\@openrightfalse}
145 \def\eqnarray{%
146    \stepcounter{equation}%
147    \def\@currentlabel{\p@equation\theequation}%
148    \global\@eqnswtrue
149    \m@th
150    \global\@eqcnt\z@
151    \tabskip\@centering
152    \let\\\@eqncr
153    $$\everycr{}\halign to\displaywidth\bgroup
154        \hskip\@centering$\displaystyle\tabskip\z@skip{##}$\@eqnsel
155       &\global\@eqcnt\@ne \hfil$\displaystyle{{}##{}}$\hfil
156       &\global\@eqcnt\tw@ $\displaystyle{##}$\hfil\tabskip\@centering
157       &\global\@eqcnt\thr@@ \hb@xt@\z@\bgroup\hss##\egroup
158          \tabskip\z@skip
159       \cr}
160 \DeclareOption{leqno}{\input{leqno.clo}}
161 \DeclareOption{fleqn}{\input{fleqn.clo}%
162   \def\eqnarray{%
163     \stepcounter{equation}%
164     \def\@currentlabel{\p@equation\theequation}%
165     \global\@eqnswtrue\m@th
166     \global\@eqcnt\z@
167     \tabskip\mathindent
168     \let\\=\@eqncr
169     \setlength\abovedisplayskip{\topsep}%
170     \ifvmode
171       \addtolength\abovedisplayskip{\partopsep}%
172     \fi
173     \addtolength\abovedisplayskip{\parskip}%
174     \setlength\belowdisplayskip{\abovedisplayskip}%
175     \setlength\belowdisplayshortskip{\abovedisplayskip}%
176     \setlength\abovedisplayshortskip{\abovedisplayskip}%
177     $$\everycr{}\halign to\linewidth% $$
178     \bgroup
179       \hskip\@centering$\displaystyle\tabskip\z@skip{##}$\@eqnsel
180       &\global\@eqcnt\@ne \hfil$\displaystyle{{}##{}}$\hfil
181       &\global\@eqcnt\tw@
182         $\displaystyle{##}$\hfil \tabskip\@centering
183       &\global\@eqcnt\thr@@ \hb@xt@\z@\bgroup\hss##\egroup
184     \tabskip\z@skip\cr
185     }}
186 \DeclareOption{disablejfam}{\@enablejfamfalse}
187 \newif\ifdraft
188 \DeclareOption{draft}{\drafttrue \setlength\overfullrule{5pt}}
189 \DeclareOption{final}{\draftfalse \setlength\overfullrule{0pt}}
190 \newif\ifwinjis
191 \winjisfalse
192 \newif\ifmingoth
193 \mingothfalse
194 \newif\ifjisfont
195 \jisfontfalse
196 \newif\if@jsc@uplatex
197 \@jsc@uplatexfalse
198 \DeclareOption{mingoth}{\mingothtrue}
199 \DeclareOption{winjis}{\winjistrue}
200 \DeclareOption{jis}{\jisfonttrue}
201 \DeclareOption{uplatex}{\@jsc@uplatextrue\winjisfalse}
202 \newif\ifpapersize
203 \papersizefalse
204 \DeclareOption{papersize}{\papersizetrue}
205 \newif\if@english
206 \@englishfalse
207 \DeclareOption{english}{\@englishtrue}
208 \newif\if@report
209 \@reportfalse
210 \DeclareOption{report}{\@reporttrue\@openrightfalse\@twosidefalse\@mparswitchfalse}
211 \ExecuteOptions{a4paper,twoside,onecolumn,titlepage,openright,final}
212 \ProcessOptions
213 \if@slide
214   \def\maybeblue{\@ifundefined{ver@color.sty}{}{\color{blue}}}
215 \fi
216 \if@landscape
217   \setlength\@tempdima  {\paperheight}
218   \setlength\paperheight{\paperwidth}
219   \setlength\paperwidth {\@tempdima}
220 \fi
221 \setlength{\@tempdima}{\paperwidth}
222 \setlength{\@tempdimb}{\paperheight}
223 \iftombow
224   \advance \@tempdima 2in
225   \advance \@tempdimb 2in
226 \fi
227 \setlength{\pdfpagewidth}{\@tempdima}
228 \setlength{\pdfpageheight}{\@tempdimb}
229 \if@slide\def\n@baseline{13}\else\def\n@baseline{16}\fi
230 \def\inv@mag{1}
231 \ifnum\@ptsize=-2
232   \mag 833
233   \def\inv@mag{1.20048}
234   \def\n@baseline{15}%
235 \fi
236 \ifnum\@ptsize=-1
237   \mag 913 % formerly 900
238   \def\inv@mag{1.09529}
239   \def\n@baseline{15}%
240 \fi
241 \ifnum\@ptsize=1
242   \mag 1095 % formerly 1100
243   \def\inv@mag{0.913242}
244 \fi
245 \ifnum\@ptsize=2
246   \mag 1200
247   \def\inv@mag{0.833333}
248 \fi
249 \ifnum\@ptsize=4
250   \mag 1440
251   \def\inv@mag{0.694444}
252 \fi
253 \ifnum\@ptsize=7
254   \mag 1728
255   \def\inv@mag{0.578704}
256 \fi
257 \ifnum\@ptsize=10
258   \mag 2000
259   \def\inv@mag{0.5}
260 \fi
261 \ifnum\@ptsize=11
262   \mag 2074
263   \def\inv@mag{0.48216}
264 \fi
265 \ifnum\@ptsize=15
266   \mag 2488
267   \def\inv@mag{0.401929}
268 \fi
269 \ifnum\@ptsize=20
270   \mag 2986
271   \def\inv@mag{0.334896}
272 \fi
273 \ifnum\@ptsize=26
274   \mag 3583
275   \def\inv@mag{0.279096}
276 \fi
277 \ifnum\@ptsize=33
278   \mag 4300
279   \def\inv@mag{0.232558}
280 \fi
281 \ifnum\@ptsize=1200
282   \mag 923
283   \def\inv@mag{1.0834236}
284 \fi
285 \ifnum\@ptsize=1400
286   \mag 1077
287   \def\inv@mag{0.928505}
288 \fi
289 \setlength\paperwidth{\inv@mag\paperwidth}%
290 \setlength\paperheight{\inv@mag\paperheight}%
291 \DeclareFontShape{JY3}{mc}{bx}{n}{<->ssub*gt/m/n}{}
292 \DeclareFontShape{JY3}{gt}{bx}{n}{<->ssub*gt/m/n}{}
293 \DeclareFontShape{JY3}{mc}{m}{it}{<->ssub*mc/m/n}{}
294 \DeclareFontShape{JY3}{mc}{m}{sl}{<->ssub*mc/m/n}{}
295 \DeclareFontShape{JY3}{mc}{m}{sc}{<->ssub*mc/m/n}{}
296 \DeclareFontShape{JY3}{gt}{m}{it}{<->ssub*gt/m/n}{}
297 \DeclareFontShape{JY3}{gt}{m}{sl}{<->ssub*gt/m/n}{}
298 \DeclareFontShape{JY3}{mc}{bx}{it}{<->ssub*gt/m/n}{}
299 \DeclareFontShape{JY3}{mc}{bx}{sl}{<->ssub*gt/m/n}{}
300 %% \DeclareFontShape{JT3}{mc}{m}{it}{<->ssub*mc/m/n}{}
301 %% \DeclareFontShape{JT3}{mc}{m}{sl}{<->ssub*mc/m/n}{}
302 %% \DeclareFontShape{JT3}{mc}{m}{sc}{<->ssub*mc/m/n}{}
303 %% \DeclareFontShape{JT3}{gt}{m}{it}{<->ssub*gt/m/n}{}
304 %% \DeclareFontShape{JT3}{gt}{m}{sl}{<->ssub*gt/m/n}{}
305 %% \DeclareFontShape{JT3}{mc}{bx}{it}{<->ssub*gt/m/n}{}
306 %% \DeclareFontShape{JT3}{mc}{bx}{sl}{<->ssub*gt/m/n}{}
307 \DeclareRobustCommand\rmfamily
308         {\not@math@alphabet\rmfamily\mathrm
309          \romanfamily\rmdefault\kanjifamily\mcdefault\selectfont}
310 \DeclareRobustCommand\sffamily
311         {\not@math@alphabet\sffamily\mathsf
312          \romanfamily\sfdefault\kanjifamily\gtdefault\selectfont}
313 \DeclareRobustCommand\ttfamily
314         {\not@math@alphabet\ttfamily\mathtt
315          \romanfamily\ttdefault\kanjifamily\gtdefault\selectfont}
316 \def\textmc#1{\relax\ifmmode\hbox\fi{\mcfamily #1}}
317 \def\textgt#1{\relax\ifmmode\hbox\fi{\gtfamily #1}}
318 %% \def\reDeclareMathAlphabet#1#2#3{%
319 %%   \edef\@tempa{\expandafter\@gobble\string#2}%
320 %%   \edef\@tempb{\expandafter\@gobble\string#3}%
321 %%   \edef\@tempc{\string @\expandafter\@gobbletwo\string#2}%
322 %%   \ifx\@tempc\@tempa%
323 %%     \edef\@tempa{\expandafter\@gobbletwo\string#2}%
324 %%     \edef\@tempb{\expandafter\@gobbletwo\string#3}%
325 %%   \fi
326 %%   \begingroup
327 %%     \let\protect\noexpand
328 %%     \def\@tempaa{\relax}%
329 %%     \expandafter\ifx\csname RDMAorg@\@tempa\endcsname\relax
330 %%       \edef\@tempaa{\expandafter\def\expandafter\noexpand%
331 %%         \csname RDMAorg@\@tempa\endcsname{%
332 %%           \expandafter\noexpand\csname\@tempa\endcsname}}%
333 %%     \fi
334 %%     \def\@tempbb{\relax}%
335 %%     \expandafter\ifx\csname RDMAorg@\@tempb\endcsname\relax
336 %%       \edef\@tempbb{\expandafter\def\expandafter\noexpand%
337 %%         \csname RDMAorg@\@tempb\endcsname{%
338 %%           \expandafter\noexpand\csname\@tempb\endcsname}}%
339 %%     \fi
340 %%     \edef\@tempc{\@tempaa\@tempbb}%
341 %%   \expandafter\endgroup\@tempc%
342 %%   \edef#1{\noexpand\protect\expandafter\noexpand\csname%
343 %%     \expandafter\@gobble\string#1\space\space\endcsname}%
344 %%   \expandafter\edef\csname\expandafter\@gobble\string#1\space\space\endcsname%
345 %%     {\noexpand\DualLang@mathalph@bet%
346 %%       {\expandafter\noexpand\csname RDMAorg@\@tempa\endcsname}%
347 %%       {\expandafter\noexpand\csname RDMAorg@\@tempb\endcsname}%
348 %%   }%
349 %% }
350 %% \@onlypreamble\reDeclareMathAlphabet
351 %% \def\DualLang@mathalph@bet#1#2{%
352 %%   \relax\ifmmode
353 %%     \ifx\math@bgroup\bgroup%     2e normal style     (\mathrm{...})
354 %%       \bgroup\let\DualLang@Mfontsw\DLMfontsw@standard
355 %%     \else
356 %%       \ifx\math@bgroup\relax%    2e two letter style (\rm->\mathrm)
357 %%         \let\DualLang@Mfontsw\DLMfontsw@oldstyle
358 %%       \else
359 %%         \ifx\math@bgroup\@empty% 2.09 oldlfont style ({\mathrm ...})
360 %%           \let\DualLang@Mfontsw\DLMfontsw@oldlfont
361 %%         \else%                   panic! assume 2e normal style
362 %%           \bgroup\let\DualLang@Mfontsw\DLMfontsw@standard
363 %%         \fi
364 %%       \fi
365 %%     \fi
366 %%   \else
367 %%     \let\DualLang@Mfontsw\@firstoftwo
368 %%   \fi
369 %%   \DualLang@Mfontsw{#1}{#2}%
370 %% }
371 %% \def\DLMfontsw@standard#1#2#3{#1{#2{#3}}\egroup}
372 %% \def\DLMfontsw@oldstyle#1#2{#1\relax\@fontswitch\relax{#2}}
373 %% \def\DLMfontsw@oldlfont#1#2{#1\relax#2\relax}
374 %% \if@compatibility\else
375 %%   \DeclareSymbolFont{mincho}{JY3}{mc}{m}{n}
376 %%   \DeclareSymbolFontAlphabet{\mathmc}{mincho}
377 %%   \SetSymbolFont{mincho}{bold}{JY3}{gt}{m}{n}
378 %%   \jfam\symmincho
379 %%   \DeclareMathAlphabet{\mathgt}{JY3}{gt}{m}{n}
380 %% \fi
381 %% \AtBeginDocument{%
382 %%   \reDeclareMathAlphabet{\mathrm}{\@mathrm}{\@mathmc}
383 %%   \reDeclareMathAlphabet{\mathbf}{\@mathbf}{\@mathgt}}
384 \ltjsetparameter{jaxspmode={`〒,2}}
385 \ltjsetparameter{alxspmode={`+,3}}
386 \ltjsetparameter{alxspmode={`\%,3}}
387 \def\@{\spacefactor3000\space}
388 \def\@setfontsize#1#2#3{%
389   \ifx\protect\@typeset@protect
390     \let\@currsize#1%
391   \fi
392   \fontsize{#2}{#3}\selectfont
393   \ifdim\parindent>\z@
394     \if@english
395       \parindent=1em
396     \else
397       \parindent=1\zw
398     \fi
399   \fi
400   \ltjsetparameter{kanjiskip={0\zw plus .1\zw minus .01\zw}}
401   \if@slide \ltjsetparameter{xkanjiskip={0.1em}} \else
402     \ltjsetparameter{xkanjiskip={0.25em plus 0.15em minus 0.06em}}
403   \fi}
404 \emergencystretch 3\zw
405 \newif\ifnarrowbaselines
406 \if@english
407   \narrowbaselinestrue
408 \fi
409 \def\narrowbaselines{%
410   \narrowbaselinestrue
411   \skip0=\abovedisplayskip
412   \skip2=\abovedisplayshortskip
413   \skip4=\belowdisplayskip
414   \skip6=\belowdisplayshortskip
415   \@currsize\selectfont
416   \abovedisplayskip=\skip0
417   \abovedisplayshortskip=\skip2
418   \belowdisplayskip=\skip4
419   \belowdisplayshortskip=\skip6\relax}
420 \def\widebaselines{\narrowbaselinesfalse\@currsize\selectfont}
421 \renewcommand{\normalsize}{%
422   \ifnarrowbaselines
423     \@setfontsize\normalsize\@xpt\@xiipt
424   \else
425     \@setfontsize\normalsize\@xpt{\n@baseline}%
426   \fi
427   \abovedisplayskip 11\p@ \@plus3\p@ \@minus4\p@
428   \abovedisplayshortskip \z@ \@plus3\p@
429   \belowdisplayskip 9\p@ \@plus3\p@ \@minus4\p@
430   \belowdisplayshortskip \belowdisplayskip
431   \let\@listi\@listI}
432 \normalsize
433 \setbox0\hbox{\char"3000}% 全角スペース
434 \setlength\Cht{\ht0}
435 \setlength\Cdp{\dp0}
436 \setlength\Cwd{\wd0}
437 \setlength\Cvs{\baselineskip}
438 \setlength\Chs{\wd0}
439 \newcommand{\small}{%
440   \ifnarrowbaselines
441     \@setfontsize\small\@ixpt{11}%
442   \else
443     \@setfontsize\small\@ixpt{13}%
444   \fi
445   \abovedisplayskip 9\p@ \@plus3\p@ \@minus4\p@
446   \abovedisplayshortskip  \z@ \@plus3\p@
447   \belowdisplayskip \abovedisplayskip
448   \belowdisplayshortskip \belowdisplayskip
449   \def\@listi{\leftmargin\leftmargini
450               \topsep \z@
451               \parsep \z@
452               \itemsep \parsep}}
453 \newcommand{\footnotesize}{%
454   \ifnarrowbaselines
455     \@setfontsize\footnotesize\@viiipt{9.5}%
456   \else
457     \@setfontsize\footnotesize\@viiipt{11}%
458   \fi
459   \abovedisplayskip 6\p@ \@plus2\p@ \@minus3\p@
460   \abovedisplayshortskip  \z@ \@plus2\p@
461   \belowdisplayskip \abovedisplayskip
462   \belowdisplayshortskip \belowdisplayskip
463   \def\@listi{\leftmargin\leftmargini
464               \topsep \z@
465               \parsep \z@
466               \itemsep \parsep}}
467 \newcommand{\scriptsize}{\@setfontsize\scriptsize\@viipt\@viiipt}
468 \newcommand{\tiny}{\@setfontsize\tiny\@vpt\@vipt}
469 \if@twocolumn
470   \newcommand{\large}{\@setfontsize\large\@xiipt{\n@baseline}}
471 \else
472   \newcommand{\large}{\@setfontsize\large\@xiipt{17}}
473 \fi
474 \newcommand{\Large}{\@setfontsize\Large\@xivpt{21}}
475 \newcommand{\LARGE}{\@setfontsize\LARGE\@xviipt{25}}
476 \newcommand{\huge}{\@setfontsize\huge\@xxpt{28}}
477 \newcommand{\Huge}{\@setfontsize\Huge\@xxvpt{33}}
478 \newcommand{\HUGE}{\@setfontsize\HUGE{30}{40}}
479 \everydisplay=\expandafter{\the\everydisplay \narrowbaselines}
480 \newcommand{\headfont}{\gtfamily\sffamily}
481 \setlength\columnsep{2\zw}
482 \setlength\columnseprule{0\p@}
483 \setlength\lineskip{1\p@}
484 \setlength\normallineskip{1\p@}
485 \setlength\lineskiplimit{1\p@}
486 \setlength\normallineskiplimit{1\p@}
487 \renewcommand{\baselinestretch}{}
488 \setlength\parskip{0\p@}
489 \if@slide
490   \setlength\parindent{0\zw}
491 \else
492   \setlength\parindent{1\zw}
493 \fi
494 \@lowpenalty   51
495 \@medpenalty  151
496 \@highpenalty 301
497 \setlength\topskip{10\p@}
498 \if@slide
499   \setlength\headheight{0\p@}
500 \else
501   \setlength\headheight{2\topskip}
502 \fi
503 \if@report
504   \setlength\footskip{0.03367\paperheight}
505   \ifdim\footskip<\baselineskip
506     \setlength\footskip{\baselineskip}
507   \fi
508 \else
509   \setlength\footskip{0pt}
510 \fi
511 \if@report
512   \setlength\headsep{\footskip}
513   \addtolength\headsep{-\topskip}
514 \else
515   \setlength\headsep{6mm}
516 \fi
517 \setlength\maxdepth{.5\topskip}
518 \newdimen\fullwidth
519 \if@report
520   \setlength\fullwidth{0.76\paperwidth}
521 \else
522   \setlength\fullwidth{\paperwidth}
523   \addtolength\fullwidth{-36mm}
524 \fi
525 \if@twocolumn \@tempdima=2\zw \else \@tempdima=1\zw \fi
526 \divide\fullwidth\@tempdima \multiply\fullwidth\@tempdima
527 \setlength\textwidth{\fullwidth}
528 \if@report \else
529   \if@twocolumn \else
530     \ifdim \fullwidth>40\zw
531       \setlength\textwidth{40\zw}
532     \fi
533   \fi
534 \fi
535 \if@slide
536   \setlength{\textheight}{0.95\paperheight}
537 \else
538   \setlength{\textheight}{0.83\paperheight}
539 \fi
540 \addtolength{\textheight}{-\topskip}
541 \addtolength{\textheight}{-\headsep}
542 \addtolength{\textheight}{-\footskip}
543 \addtolength{\textheight}{-\topskip}
544 \divide\textheight\baselineskip
545 \multiply\textheight\baselineskip
546 \addtolength{\textheight}{\topskip}
547 \addtolength{\textheight}{0.1\p@}
548 \setlength\marginparsep{\columnsep}
549 \setlength\marginparpush{\baselineskip}
550 \setlength{\oddsidemargin}{\paperwidth}
551 \addtolength{\oddsidemargin}{-\fullwidth}
552 \setlength{\oddsidemargin}{.5\oddsidemargin}
553 \iftombow
554   \addtolength{\oddsidemargin}{-1in}
555 \else
556   \addtolength{\oddsidemargin}{-\inv@mag in}
557 \fi
558 \setlength{\evensidemargin}{\oddsidemargin}
559 \if@mparswitch
560   \addtolength{\evensidemargin}{\fullwidth}
561   \addtolength{\evensidemargin}{-\textwidth}
562 \fi
563 \setlength\marginparwidth{\paperwidth}
564 \addtolength\marginparwidth{-\oddsidemargin}
565 \addtolength\marginparwidth{-\inv@mag in}
566 \addtolength\marginparwidth{-\textwidth}
567 \addtolength\marginparwidth{-1cm}
568 \addtolength\marginparwidth{-\marginparsep}
569 \@tempdima=1\zw
570 \divide\marginparwidth\@tempdima
571 \multiply\marginparwidth\@tempdima
572 \setlength\topmargin{\paperheight}
573 \addtolength\topmargin{-\textheight}
574 \if@slide
575   \addtolength\topmargin{-\headheight}
576 \else
577   \addtolength\topmargin{-\topskip}
578 \fi
579 \addtolength\topmargin{-\headsep}
580 \addtolength\topmargin{-\footskip}
581 \setlength\topmargin{0.5\topmargin}
582 \iftombow
583   \addtolength\topmargin{-1in}
584 \else
585   \addtolength\topmargin{-\inv@mag in}
586 \fi
587 {\footnotesize\global\setlength\footnotesep{\baselineskip}}
588 \setlength\footnotesep{0.7\footnotesep}
589 \setlength{\skip\footins}{16\p@ \@plus 5\p@ \@minus 2\p@}
590 \setcounter{topnumber}{9}
591 \renewcommand{\topfraction}{.85}
592 \setcounter{bottomnumber}{9}
593 \renewcommand{\bottomfraction}{.8}
594 \setcounter{totalnumber}{20}
595 \renewcommand{\textfraction}{.1}
596 \renewcommand{\floatpagefraction}{.8}
597 \setcounter{dbltopnumber}{9}
598 \renewcommand{\dbltopfraction}{.8}
599 \renewcommand{\dblfloatpagefraction}{.8}
600 \setlength\floatsep    {12\p@ \@plus 2\p@ \@minus 2\p@}
601 \setlength\textfloatsep{20\p@ \@plus 2\p@ \@minus 4\p@}
602 \setlength\intextsep   {12\p@ \@plus 2\p@ \@minus 2\p@}
603 \setlength\dblfloatsep    {12\p@ \@plus 2\p@ \@minus 2\p@}
604 \setlength\dbltextfloatsep{20\p@ \@plus 2\p@ \@minus 4\p@}
605 \setlength\@fptop{0\p@ \@plus 1fil}
606 \setlength\@fpsep{8\p@ \@plus 2fil}
607 \setlength\@fpbot{0\p@ \@plus 1fil}
608 \setlength\@dblfptop{0\p@ \@plus 1fil}
609 \setlength\@dblfpsep{8\p@ \@plus 2fil}
610 \setlength\@dblfpbot{0\p@ \@plus 1fil}
611 \def\ps@plainfoot{%
612   \let\@mkboth\@gobbletwo
613   \let\@oddhead\@empty
614   \def\@oddfoot{\normalfont\hfil\thepage\hfil}%
615   \let\@evenhead\@empty
616   \let\@evenfoot\@oddfoot}
617 \def\ps@plainhead{%
618   \let\@mkboth\@gobbletwo
619   \let\@oddfoot\@empty
620   \let\@evenfoot\@empty
621   \def\@evenhead{%
622     \if@mparswitch \hss \fi
623     \hbox to \fullwidth{\textbf{\thepage}\hfil}%
624     \if@mparswitch\else \hss \fi}%
625   \def\@oddhead{%
626     \hbox to \fullwidth{\hfil\textbf{\thepage}}\hss}}
627 \if@report \let\ps@plain\ps@plainfoot \else \let\ps@plain\ps@plainhead \fi
628 \def\ps@headings{%
629   \let\@oddfoot\@empty
630   \let\@evenfoot\@empty
631   \def\@evenhead{%
632     \if@mparswitch \hss \fi
633     \underline{\hbox to \fullwidth{\autoxspacing
634         \textbf{\thepage}\hfil\leftmark}}%
635     \if@mparswitch\else \hss \fi}%
636   \def\@oddhead{\underline{\hbox to \fullwidth{\autoxspacing
637         {\if@twoside\rightmark\else\leftmark\fi}\hfil\textbf{\thepage}}}\hss}%
638   \let\@mkboth\markboth
639   \def\chaptermark##1{\markboth{%
640     \ifnum \c@secnumdepth >\m@ne
641       \if@mainmatter
642         \@chapapp\thechapter\@chappos\hskip1\zw
643       \fi
644     \fi
645     ##1}{}}%
646   \def\sectionmark##1{\markright{%
647     \ifnum \c@secnumdepth >\z@ \thesection \hskip1\zw\fi
648     ##1}}}%
649 \def\ps@myheadings{%
650   \let\@oddfoot\@empty\let\@evenfoot\@empty
651   \def\@evenhead{%
652     \if@mparswitch \hss \fi%
653     \hbox to \fullwidth{\thepage\hfil\leftmark}%
654     \if@mparswitch\else \hss \fi}%
655   \def\@oddhead{%
656     \hbox to \fullwidth{\rightmark\hfil\thepage}\hss}%
657   \let\@mkboth\@gobbletwo
658   \let\chaptermark\@gobble
659   \let\sectionmark\@gobble
660 }
661 \def\plainifnotempty{%
662   \ifx \@oddhead \@empty
663     \ifx \@oddfoot \@empty
664     \else
665       \thispagestyle{plainfoot}%
666     \fi
667   \else
668     \thispagestyle{plainhead}%
669   \fi}
670 \if@titlepage
671   \newcommand{\maketitle}{%
672     \begin{titlepage}%
673       \let\footnotesize\small
674       \let\footnoterule\relax
675       \let\footnote\thanks
676       \null\vfil
677       \if@slide
678         {\footnotesize \@date}%
679         \begin{center}
680           \mbox{} \\[1\zw]
681           \large
682           {\maybeblue\hrule height0pt depth2pt\relax}\par
683           \smallskip
684           \@title
685           \smallskip
686           {\maybeblue\hrule height0pt depth2pt\relax}\par
687           \vfill
688           {\small \@author}%
689         \end{center}
690       \else
691       \vskip 60\p@
692       \begin{center}%
693         {\LARGE \@title \par}%
694         \vskip 3em%
695         {\large
696           \lineskip .75em
697           \begin{tabular}[t]{c}%
698             \@author
699           \end{tabular}\par}%
700         \vskip 1.5em
701         {\large \@date \par}%
702       \end{center}%
703       \fi
704       \par
705       \@thanks\vfil\null
706     \end{titlepage}%
707     \setcounter{footnote}{0}%
708     \global\let\thanks\relax
709     \global\let\maketitle\relax
710     \global\let\@thanks\@empty
711     \global\let\@author\@empty
712     \global\let\@date\@empty
713     \global\let\@title\@empty
714     \global\let\title\relax
715     \global\let\author\relax
716     \global\let\date\relax
717     \global\let\and\relax
718   }%
719 \else
720   \newcommand{\maketitle}{\par
721     \begingroup
722       \renewcommand\thefootnote{\@fnsymbol\c@footnote}%
723       \def\@makefnmark{\rlap{\@textsuperscript{\normalfont\@thefnmark}}}%
724       \long\def\@makefntext##1{\advance\leftskip 3\zw
725         \parindent 1\zw\noindent
726         \llap{\@textsuperscript{\normalfont\@thefnmark}\hskip0.3\zw}##1}%
727       \if@twocolumn
728         \ifnum \col@number=\@ne
729           \@maketitle
730         \else
731           \twocolumn[\@maketitle]%
732         \fi
733       \else
734         \newpage
735         \global\@topnum\z@  % Prevents figures from going at top of page.
736         \@maketitle
737       \fi
738       \plainifnotempty
739       \@thanks
740     \endgroup
741     \setcounter{footnote}{0}%
742     \global\let\thanks\relax
743     \global\let\maketitle\relax
744     \global\let\@thanks\@empty
745     \global\let\@author\@empty
746     \global\let\@date\@empty
747     \global\let\@title\@empty
748     \global\let\title\relax
749     \global\let\author\relax
750     \global\let\date\relax
751     \global\let\and\relax
752   }
753   \def\@maketitle{%
754     \newpage\null
755     \vskip 2em
756     \begin{center}%
757       \let\footnote\thanks
758       {\LARGE \@title \par}%
759       \vskip 1.5em
760       {\large
761         \lineskip .5em
762         \begin{tabular}[t]{c}%
763           \@author
764         \end{tabular}\par}%
765       \vskip 1em
766       {\large \@date}%
767     \end{center}%
768     \par\vskip 1.5em
769   }
770 \fi
771 \def\@startsection#1#2#3#4#5#6{%
772   \if@noskipsec \leavevmode \fi
773   \par
774   \@tempskipa #4\relax
775   \if@english \@afterindentfalse \else \@afterindenttrue \fi
776   \ifdim \@tempskipa <\z@
777     \@tempskipa -\@tempskipa \@afterindentfalse
778   \fi
779   \if@nobreak
780     \everypar{}%
781   \else
782     \addpenalty\@secpenalty
783     \ifdim \@tempskipa >\z@
784       \if@slide\else
785         \null
786         \vspace*{-\baselineskip}%
787       \fi
788       \vskip\@tempskipa
789     \fi
790   \fi
791   \noindent
792   \@ifstar
793     {\@ssect{#3}{#4}{#5}{#6}}%
794     {\@dblarg{\@sect{#1}{#2}{#3}{#4}{#5}{#6}}}}
795 \def\@sect#1#2#3#4#5#6[#7]#8{%
796   \ifnum #2>\c@secnumdepth
797     \let\@svsec\@empty
798   \else
799     \refstepcounter{#1}%
800     \protected@edef\@svsec{\@seccntformat{#1}\relax}%
801   \fi
802   \@tempskipa #5\relax
803   \ifdim \@tempskipa<\z@
804     \def\@svsechd{%
805       #6{\hskip #3\relax
806       \@svsec #8}%
807       \csname #1mark\endcsname{#7}%
808       \addcontentsline{toc}{#1}{%
809         \ifnum #2>\c@secnumdepth \else
810           \protect\numberline{\csname the#1\endcsname}%
811         \fi
812         #7}}% 目次にフルネームを載せるなら #8
813   \else
814     \begingroup
815       \interlinepenalty \@M % 下から移動
816       #6{%
817         \@hangfrom{\hskip #3\relax\@svsec}%
818         #8\@@par}%
819     \endgroup
820     \csname #1mark\endcsname{#7}%
821     \addcontentsline{toc}{#1}{%
822       \ifnum #2>\c@secnumdepth \else
823         \protect\numberline{\csname the#1\endcsname}%
824       \fi
825       #7}% 目次にフルネームを載せるならここは #8
826   \fi
827   \@xsect{#5}}
828 \def\@xsect#1{%
829   \@tempskipa #1\relax
830   \ifdim \@tempskipa<\z@
831     \@nobreakfalse
832     \global\@noskipsectrue
833     \everypar{%
834       \if@noskipsec
835         \global\@noskipsecfalse
836        {\setbox\z@\lastbox}%
837         \clubpenalty\@M
838         \begingroup \@svsechd \endgroup
839         \unskip
840         \@tempskipa #1\relax
841         \hskip -\@tempskipa
842       \else
843         \clubpenalty \@clubpenalty
844         \everypar{\everyparhook}%
845       \fi\everyparhook}%
846   \else
847     \par \nobreak
848     \vskip \@tempskipa
849     \@afterheading
850   \fi
851   \if@slide
852     {\vskip-6pt\maybeblue\hrule height0pt depth1pt\vskip7pt\relax}%
853   \fi
854   \par  % 2000-12-18
855   \ignorespaces}
856 \def\@ssect#1#2#3#4#5{%
857   \@tempskipa #3\relax
858   \ifdim \@tempskipa<\z@
859     \def\@svsechd{#4{\hskip #1\relax #5}}%
860   \else
861     \begingroup
862       #4{%
863         \@hangfrom{\hskip #1}%
864           \interlinepenalty \@M #5\@@par}%
865     \endgroup
866   \fi
867   \@xsect{#3}}
868 \newcommand*\chaptermark[1]{}
869 \setcounter{secnumdepth}{2}
870 \newcounter{part}
871 \newcounter{chapter}
872 \newcounter{section}[chapter]
873 \newcounter{subsection}[section]
874 \newcounter{subsubsection}[subsection]
875 \newcounter{paragraph}[subsubsection]
876 \newcounter{subparagraph}[paragraph]
877 \renewcommand{\thepart}{\@Roman\c@part}
878 \renewcommand{\thechapter}{\@arabic\c@chapter}
879 \renewcommand{\thesection}{\thechapter.\@arabic\c@section}
880 \renewcommand{\thesubsection}{\thesection.\@arabic\c@subsection}
881 \renewcommand{\thesubsubsection}{%
882    \thesubsection.\@arabic\c@subsubsection}
883 \renewcommand{\theparagraph}{%
884    \thesubsubsection.\@arabic\c@paragraph}
885 \renewcommand{\thesubparagraph}{%
886    \theparagraph.\@arabic\c@subparagraph}
887 \newcommand{\@chapapp}{\prechaptername}
888 \newcommand{\@chappos}{\postchaptername}
889 \newcommand\frontmatter{%
890   \if@openright
891     \cleardoublepage
892   \else
893     \clearpage
894   \fi
895   \@mainmatterfalse
896   \pagenumbering{roman}}
897 \newcommand\mainmatter{%
898     \cleardoublepage
899   \@mainmattertrue
900   \pagenumbering{arabic}}
901 \newcommand\backmatter{%
902   \if@openright
903     \cleardoublepage
904   \else
905     \clearpage
906   \fi
907   \@mainmatterfalse}
908 \newcommand\part{%
909   \if@openright
910     \cleardoublepage
911   \else
912     \clearpage
913   \fi
914   \thispagestyle{empty}% 欧文用標準スタイルでは plain
915   \if@twocolumn
916     \onecolumn
917     \@restonecoltrue
918   \else
919     \@restonecolfalse
920   \fi
921   \null\vfil
922   \secdef\@part\@spart}
923 \def\@part[#1]#2{%
924   \ifnum \c@secnumdepth >-2\relax
925     \refstepcounter{part}%
926     \addcontentsline{toc}{part}{%
927       \prepartname\thepart\postpartname\hspace{1\zw}#1}%
928   \else
929     \addcontentsline{toc}{part}{#1}%
930   \fi
931   \markboth{}{}%
932   {\centering
933     \interlinepenalty \@M
934     \normalfont
935     \ifnum \c@secnumdepth >-2\relax
936       \huge\headfont \prepartname\thepart\postpartname
937       \par\vskip20\p@
938     \fi
939     \Huge \headfont #2\par}%
940   \@endpart}
941 \def\@spart#1{{%
942     \centering
943     \interlinepenalty \@M
944     \normalfont
945     \Huge \headfont #1\par}%
946   \@endpart}
947 \def\@endpart{\vfil\newpage
948   \if@twoside
949     \null
950     \thispagestyle{empty}%
951     \newpage
952   \fi
953   \if@restonecol
954     \twocolumn
955   \fi}
956 \newcommand{\chapter}{%
957   \if@openright\cleardoublepage\else\clearpage\fi
958   \plainifnotempty % 元: \thispagestyle{plain}
959   \global\@topnum\z@
960   \if@english \@afterindentfalse \else \@afterindenttrue \fi
961   \secdef\@chapter\@schapter}
962 \def\@chapter[#1]#2{%
963   \ifnum \c@secnumdepth >\m@ne
964     \if@mainmatter
965       \refstepcounter{chapter}%
966       \typeout{\@chapapp\thechapter\@chappos}%
967       \addcontentsline{toc}{chapter}%
968         {\protect\numberline
969         {\if@english\thechapter\else\@chapapp\thechapter\@chappos\fi}%
970         #1}%
971     \else\addcontentsline{toc}{chapter}{#1}\fi
972   \else
973     \addcontentsline{toc}{chapter}{#1}%
974   \fi
975   \chaptermark{#1}%
976   \addtocontents{lof}{\protect\addvspace{10\p@}}%
977   \addtocontents{lot}{\protect\addvspace{10\p@}}%
978   \if@twocolumn
979     \@topnewpage[\@makechapterhead{#2}]%
980   \else
981     \@makechapterhead{#2}%
982     \@afterheading
983   \fi}
984 \def\@makechapterhead#1{%
985   \vspace*{2\Cvs}% 欧文は50pt
986   {\parindent \z@ \raggedright \normalfont
987     \ifnum \c@secnumdepth >\m@ne
988       \if@mainmatter
989         \huge\headfont \@chapapp\thechapter\@chappos
990         \par\nobreak
991         \vskip \Cvs % 欧文は20pt
992       \fi
993     \fi
994     \interlinepenalty\@M
995     \Huge \headfont #1\par\nobreak
996     \vskip 3\Cvs}} % 欧文は40pt
997 \def\@schapter#1{%
998   \chaptermark{#1}%
999   \if@twocolumn
1000     \@topnewpage[\@makeschapterhead{#1}]%
1001   \else
1002     \@makeschapterhead{#1}\@afterheading
1003   \fi}
1004 \def\@makeschapterhead#1{%
1005   \vspace*{2\Cvs}% 欧文は50pt
1006   {\parindent \z@ \raggedright
1007     \normalfont
1008     \interlinepenalty\@M
1009     \Huge \headfont #1\par\nobreak
1010     \vskip 3\Cvs}} % 欧文は40pt
1011 \if@twocolumn
1012   \newcommand{\section}{%
1013     \@startsection{section}{1}{\z@}%
1014     {0.6\Cvs}{0.4\Cvs}%
1015     {\normalfont\large\headfont\raggedright}}
1016 \else
1017   \newcommand{\section}{%
1018     \if@slide\clearpage\fi
1019     \@startsection{section}{1}{\z@}%
1020     {\Cvs \@plus.5\Cdp \@minus.2\Cdp}% 前アキ
1021     {.5\Cvs \@plus.3\Cdp}% 後アキ
1022     {\normalfont\Large\headfont\raggedright}}
1023 \fi
1024 \if@twocolumn
1025   \newcommand{\subsection}{\@startsection{subsection}{2}{\z@}%
1026     {\z@}{\z@}%
1027     {\normalfont\normalsize\headfont}}
1028 \else
1029   \newcommand{\subsection}{\@startsection{subsection}{2}{\z@}%
1030     {\Cvs \@plus.5\Cdp \@minus.2\Cdp}% 前アキ
1031     {.5\Cvs \@plus.3\Cdp}% 後アキ
1032     {\normalfont\large\headfont}}
1033 \fi
1034 \if@twocolumn
1035   \newcommand{\subsubsection}{\@startsection{subsubsection}{3}{\z@}%
1036     {\z@}{\z@}%
1037     {\normalfont\normalsize\headfont}}
1038 \else
1039   \newcommand{\subsubsection}{\@startsection{subsubsection}{3}{\z@}%
1040     {\Cvs \@plus.5\Cdp \@minus.2\Cdp}%
1041     {\z@}%
1042     {\normalfont\normalsize\headfont}}
1043 \fi
1044 \if@twocolumn
1045   \newcommand{\paragraph}{\@startsection{paragraph}{4}{\z@}%
1046     {\z@}{-1\zw}% 改行せず 1\zw のアキ
1047     {\normalfont\normalsize\headfont ■}}
1048 \else
1049   \newcommand{\paragraph}{\@startsection{paragraph}{4}{\z@}%
1050     {0.5\Cvs \@plus.5\Cdp \@minus.2\Cdp}%
1051     {-1\zw}% 改行せず 1\zw のアキ
1052     {\normalfont\normalsize\headfont ■}}
1053 \fi
1054 \newcommand{\subparagraph}{\@startsection{subparagraph}{5}{\z@}%
1055    {\z@}{-1\zw}%
1056    {\normalfont\normalsize\headfont}}
1057 \if@slide
1058   \setlength\leftmargini{1\zw}
1059 \else
1060   \if@twocolumn
1061     \setlength\leftmargini{2\zw}
1062   \else
1063     \setlength\leftmargini{3\zw}
1064   \fi
1065 \fi
1066 \if@slide
1067   \setlength\leftmarginii {1\zw}
1068   \setlength\leftmarginiii{1\zw}
1069   \setlength\leftmarginiv {1\zw}
1070   \setlength\leftmarginv  {1\zw}
1071   \setlength\leftmarginvi {1\zw}
1072 \else
1073   \setlength\leftmarginii {2\zw}
1074   \setlength\leftmarginiii{2\zw}
1075   \setlength\leftmarginiv {2\zw}
1076   \setlength\leftmarginv  {1\zw}
1077   \setlength\leftmarginvi {1\zw}
1078 \fi
1079 \setlength  \labelsep  {0.5\zw} % .5em
1080 \setlength  \labelwidth{\leftmargini}
1081 \addtolength\labelwidth{-\labelsep}
1082 \setlength\partopsep{\z@} % {2\p@ \@plus 1\p@ \@minus 1\p@}
1083 \@beginparpenalty -\@lowpenalty
1084 \@endparpenalty   -\@lowpenalty
1085 \@itempenalty     -\@lowpenalty
1086 \def\@listi{\leftmargin\leftmargini
1087   \parsep \z@
1088   \topsep 0.5\baselineskip
1089   \itemsep \z@ \relax}
1090 \let\@listI\@listi
1091 \@listi
1092 \def\@listii{\leftmargin\leftmarginii
1093   \labelwidth\leftmarginii \advance\labelwidth-\labelsep
1094   \topsep \z@
1095   \parsep \z@
1096   \itemsep\parsep}
1097 \def\@listiii{\leftmargin\leftmarginiii
1098   \labelwidth\leftmarginiii \advance\labelwidth-\labelsep
1099   \topsep \z@
1100   \parsep \z@
1101   \itemsep\parsep}
1102 \def\@listiv {\leftmargin\leftmarginiv
1103               \labelwidth\leftmarginiv
1104               \advance\labelwidth-\labelsep}
1105 \def\@listv  {\leftmargin\leftmarginv
1106               \labelwidth\leftmarginv
1107               \advance\labelwidth-\labelsep}
1108 \def\@listvi {\leftmargin\leftmarginvi
1109               \labelwidth\leftmarginvi
1110               \advance\labelwidth-\labelsep}
1111 \renewcommand{\theenumi}{\@arabic\c@enumi}
1112 \renewcommand{\theenumii}{\@alph\c@enumii}
1113 \renewcommand{\theenumiii}{\@roman\c@enumiii}
1114 \renewcommand{\theenumiv}{\@Alph\c@enumiv}
1115 \newcommand{\labelenumi}{\theenumi.}
1116 \newcommand{\labelenumii}{\inhibitglue(\theenumii)\inhibitglue}
1117 \newcommand{\labelenumiii}{\theenumiii.}
1118 \newcommand{\labelenumiv}{\theenumiv.}
1119 \renewcommand{\p@enumii}{\theenumi}
1120 \renewcommand{\p@enumiii}{\theenumi\inhibitglue(\theenumii)}
1121 \renewcommand{\p@enumiv}{\p@enumiii\theenumiii}
1122 \newcommand\labelitemi{\textbullet}
1123 \newcommand\labelitemii{\normalfont\bfseries \textendash}
1124 \newcommand\labelitemiii{\textasteriskcentered}
1125 \newcommand\labelitemiv{\textperiodcentered}
1126 \newenvironment{description}{%
1127   \list{}{%
1128     \labelwidth=\leftmargin
1129     \labelsep=1\zw
1130     \advance \labelwidth by -\labelsep
1131     \let \makelabel=\descriptionlabel}}{\endlist}
1132 \newcommand*\descriptionlabel[1]{\normalfont\headfont #1\hfil}
1133 \newenvironment{abstract}{%
1134   \begin{list}{}{%
1135     \listparindent=1\zw
1136     \itemindent=\listparindent
1137     \rightmargin=0pt
1138     \leftmargin=5\zw}\item[]}{\end{list}\vspace{\baselineskip}}
1139 \newenvironment{verse}{%
1140   \let \\=\@centercr
1141   \list{}{%
1142     \itemsep \z@
1143     \itemindent -2\zw % 元: -1.5em
1144     \listparindent\itemindent
1145     \rightmargin \z@
1146     \advance\leftmargin 2\zw}% 元: 1.5em
1147   \item\relax}{\endlist}
1148 \newenvironment{quotation}{%
1149   \list{}{%
1150     \listparindent\parindent
1151     \itemindent\listparindent
1152     \rightmargin \z@}%
1153   \item\relax}{\endlist}
1154 \newenvironment{quote}%
1155   {\list{}{\rightmargin\z@}\item\relax}{\endlist}
1156 \def\@begintheorem#1#2{\trivlist\labelsep=1\zw
1157    \item[\hskip \labelsep{\headfont #1\ #2}]}
1158 \def\@opargbegintheorem#1#2#3{\trivlist\labelsep=1\zw
1159       \item[\hskip \labelsep{\headfont #1\ #2(#3)}]}
1160 \newenvironment{titlepage}{%
1161     \cleardoublepage
1162     \if@twocolumn
1163       \@restonecoltrue\onecolumn
1164     \else
1165       \@restonecolfalse\newpage
1166     \fi
1167     \thispagestyle{empty}%
1168     \setcounter{page}\@ne
1169   }%
1170   {\if@restonecol\twocolumn \else \newpage \fi
1171     \if@twoside\else
1172       \setcounter{page}\@ne
1173     \fi}
1174 \newcommand{\appendix}{\par
1175   \setcounter{chapter}{0}%
1176   \setcounter{section}{0}%
1177   \gdef\@chapapp{\appendixname}%
1178   \gdef\@chappos{}%
1179   \gdef\thechapter{\@Alph\c@chapter}}
1180 \setlength\arraycolsep{5\p@}
1181 \setlength\tabcolsep{6\p@}
1182 \setlength\arrayrulewidth{.4\p@}
1183 \setlength\doublerulesep{2\p@}
1184 \setlength\tabbingsep{\labelsep}
1185 \skip\@mpfootins = \skip\footins
1186 \setlength\fboxsep{3\p@}
1187 \setlength\fboxrule{.4\p@}
1188 \@addtoreset{equation}{chapter}
1189 \renewcommand\theequation
1190   {\ifnum \c@chapter>\z@ \thechapter.\fi \@arabic\c@equation}
1191 \newcounter{figure}[chapter]
1192 \renewcommand \thefigure
1193      {\ifnum \c@chapter>\z@ \thechapter.\fi \@arabic\c@figure}
1194 \def\fps@figure{tbp}
1195 \def\ftype@figure{1}
1196 \def\ext@figure{lof}
1197 \def\fnum@figure{\figurename\nobreak\thefigure}
1198 \newenvironment{figure}%
1199                {\@float{figure}}%
1200                {\end@float}
1201 \newenvironment{figure*}%
1202                {\@dblfloat{figure}}%
1203                {\end@dblfloat}
1204 \newcounter{table}[chapter]
1205 \renewcommand \thetable
1206      {\ifnum \c@chapter>\z@ \thechapter.\fi \@arabic\c@table}
1207 \def\fps@table{tbp}
1208 \def\ftype@table{2}
1209 \def\ext@table{lot}
1210 \def\fnum@table{\tablename\nobreak\thetable}
1211 \newenvironment{table}%
1212                {\@float{table}}%
1213                {\end@float}
1214 \newenvironment{table*}%
1215                {\@dblfloat{table}}%
1216                {\end@dblfloat}
1217 \newlength\abovecaptionskip
1218 \newlength\belowcaptionskip
1219 \setlength\abovecaptionskip{5\p@} % 元: 10\p@
1220 \setlength\belowcaptionskip{5\p@} % 元: 0\p@
1221 \long\def\@makecaption#1#2{{\small
1222   \advance\leftskip .0628\linewidth
1223   \advance\rightskip .0628\linewidth
1224   \vskip\abovecaptionskip
1225   \sbox\@tempboxa{#1\hskip1\zw\relax #2}%
1226   \ifdim \wd\@tempboxa <\hsize \centering \fi
1227   #1\hskip1\zw\relax #2\par
1228   \vskip\belowcaptionskip}}
1229 \DeclareOldFontCommand{\mc}{\normalfont\mcfamily}{\mathmc}
1230 \DeclareOldFontCommand{\gt}{\normalfont\gtfamily}{\mathgt}
1231 \DeclareOldFontCommand{\rm}{\normalfont\rmfamily}{\mathrm}
1232 \DeclareOldFontCommand{\sf}{\normalfont\sffamily}{\mathsf}
1233 \DeclareOldFontCommand{\tt}{\normalfont\ttfamily}{\mathtt}
1234 \DeclareOldFontCommand{\bf}{\normalfont\bfseries}{\mathbf}
1235 \DeclareOldFontCommand{\it}{\normalfont\itshape}{\mathit}
1236 \DeclareOldFontCommand{\sl}{\normalfont\slshape}{\@nomath\sl}
1237 \DeclareOldFontCommand{\sc}{\normalfont\scshape}{\@nomath\sc}
1238 \DeclareRobustCommand*{\cal}{\@fontswitch\relax\mathcal}
1239 \DeclareRobustCommand*{\mit}{\@fontswitch\relax\mathnormal}
1240 \newcommand\@pnumwidth{1.55em}
1241 \newcommand\@tocrmarg{2.55em}
1242 \newcommand\@dotsep{4.5}
1243 \setcounter{tocdepth}{1}
1244 \newcommand{\tableofcontents}{%
1245   \if@twocolumn
1246     \@restonecoltrue\onecolumn
1247   \else
1248     \@restonecolfalse
1249   \fi
1250   \chapter*{\contentsname}%
1251   \@mkboth{\contentsname}{}%
1252   \@starttoc{toc}%
1253   \if@restonecol\twocolumn\fi
1254 }
1255 \newcommand*{\l@part}[2]{%
1256   \ifnum \c@tocdepth >-2\relax
1257     \addpenalty{-\@highpenalty}%
1258     \addvspace{2.25em \@plus\p@}%
1259     \begingroup
1260       \parindent \z@
1261       \rightskip \@tocrmarg
1262       \parfillskip -\rightskip
1263       {\leavevmode
1264         \large \headfont
1265         \setlength\@lnumwidth{4\zw}%
1266         #1\hfil \hb@xt@\@pnumwidth{\hss #2}}\par
1267       \nobreak
1268     \global\@nobreaktrue
1269     \everypar{\global\@nobreakfalse\everypar{}}%
1270     \endgroup
1271   \fi}
1272 \newcommand*{\l@chapter}[2]{%
1273   \ifnum \c@tocdepth >\m@ne
1274     \addpenalty{-\@highpenalty}%
1275     \addvspace{1.0em \@plus\p@}
1276     \begingroup
1277       \parindent\z@
1278       \rightskip\@tocrmarg
1279       \parfillskip-\rightskip
1280       \leavevmode\headfont
1281       \if@english\setlength\@lnumwidth{5.5em}\else\setlength\@lnumwidth{4.683\zw}\fi
1282       \advance\leftskip\@lnumwidth \hskip-\leftskip
1283       #1\nobreak\hfil\nobreak\hbox to\@pnumwidth{\hss#2}\par
1284       \penalty\@highpenalty
1285     \endgroup
1286   \fi}
1287 \newcommand*{\l@section}{\@dottedtocline{1}{1\zw}{3.683\zw}}
1288 \newcommand*{\l@subsection}   {\@dottedtocline{2}{3.8em}{3.2em}}
1289 \newcommand*{\l@subsubsection}{\@dottedtocline{3}{7.0em}{4.1em}}
1290 \newcommand*{\l@paragraph}    {\@dottedtocline{4}{10em}{5em}}
1291 \newcommand*{\l@subparagraph} {\@dottedtocline{5}{12em}{6em}}
1292 \newdimen\@lnumwidth
1293 \def\numberline#1{\hb@xt@\@lnumwidth{#1\hfil}\hspace{0pt}}
1294 \def\@dottedtocline#1#2#3#4#5{\ifnum #1>\c@tocdepth \else
1295   \vskip \z@ \@plus.2\p@
1296   {\leftskip #2\relax \rightskip \@tocrmarg \parfillskip -\rightskip
1297     \parindent #2\relax\@afterindenttrue
1298    \interlinepenalty\@M
1299    \leavevmode
1300    \@lnumwidth #3\relax
1301    \advance\leftskip \@lnumwidth \null\nobreak\hskip -\leftskip
1302     {#4}\nobreak
1303     \leaders\hbox{$\m@th \mkern \@dotsep mu\hbox{.}\mkern \@dotsep
1304        mu$}\hfill \nobreak\hb@xt@\@pnumwidth{%
1305          \hfil\normalfont \normalcolor #5}\par}\fi}
1306 \newcommand{\listoffigures}{%
1307   \if@twocolumn\@restonecoltrue\onecolumn
1308   \else\@restonecolfalse\fi
1309   \chapter*{\listfigurename}%
1310   \@mkboth{\listfigurename}{}%
1311   \@starttoc{lof}%
1312   \if@restonecol\twocolumn\fi
1313 }
1314 \newcommand*{\l@figure}{\@dottedtocline{1}{1\zw}{3.683\zw}}
1315 \newcommand{\listoftables}{%
1316   \if@twocolumn\@restonecoltrue\onecolumn
1317   \else\@restonecolfalse\fi
1318   \chapter*{\listtablename}%
1319   \@mkboth{\listtablename}{}%
1320   \@starttoc{lot}%
1321   \if@restonecol\twocolumn\fi
1322 }
1323 \let\l@table\l@figure
1324 \newdimen\bibindent
1325 \setlength\bibindent{2\zw}
1326 \newenvironment{thebibliography}[1]{%
1327   \global\let\presectionname\relax
1328   \global\let\postsectionname\relax
1329   \chapter*{\bibname}\@mkboth{\bibname}{}%
1330   \addcontentsline{toc}{chapter}{\bibname}%
1331    \list{\@biblabel{\@arabic\c@enumiv}}%
1332         {\settowidth\labelwidth{\@biblabel{#1}}%
1333          \leftmargin\labelwidth
1334          \advance\leftmargin\labelsep
1335          \@openbib@code
1336          \usecounter{enumiv}%
1337          \let\p@enumiv\@empty
1338          \renewcommand\theenumiv{\@arabic\c@enumiv}}%
1339    \sloppy
1340    \clubpenalty4000
1341    \@clubpenalty\clubpenalty
1342    \widowpenalty4000%
1343    \sfcode`\.\@m}
1344   {\def\@noitemerr
1345     {\@latex@warning{Empty `thebibliography' environment}}%
1346    \endlist}
1347 \newcommand{\newblock}{\hskip .11em\@plus.33em\@minus.07em}
1348 \let\@openbib@code\@empty
1349 \newenvironment{theindex}{% 索引を3段組で出力する環境
1350     \if@twocolumn
1351       \onecolumn\@restonecolfalse
1352     \else
1353       \clearpage\@restonecoltrue
1354     \fi
1355     \columnseprule.4pt \columnsep 2\zw
1356     \ifx\multicols\@undefined
1357       \twocolumn[\@makeschapterhead{\indexname}%
1358       \addcontentsline{toc}{chapter}{\indexname}]%
1359     \else
1360       \ifdim\textwidth<\fullwidth
1361         \setlength{\evensidemargin}{\oddsidemargin}
1362         \setlength{\textwidth}{\fullwidth}
1363         \setlength{\linewidth}{\fullwidth}
1364         \begin{multicols}{3}[\chapter*{\indexname}%
1365         \addcontentsline{toc}{chapter}{\indexname}]%
1366       \else
1367         \begin{multicols}{2}[\chapter*{\indexname}%
1368         \addcontentsline{toc}{chapter}{\indexname}]%
1369       \fi
1370     \fi
1371     \@mkboth{\indexname}{}%
1372     \plainifnotempty % \thispagestyle{plain}
1373     \parindent\z@
1374     \parskip\z@ \@plus .3\p@\relax
1375     \let\item\@idxitem
1376     \raggedright
1377     \footnotesize\narrowbaselines
1378   }{
1379     \ifx\multicols\@undefined
1380       \if@restonecol\onecolumn\fi
1381     \else
1382       \end{multicols}
1383     \fi
1384     \clearpage
1385   }
1386 \newcommand{\@idxitem}{\par\hangindent 4\zw} % 元 40pt
1387 \newcommand{\subitem}{\@idxitem \hspace*{2\zw}} % 元 20pt
1388 \newcommand{\subsubitem}{\@idxitem \hspace*{3\zw}} % 元 30pt
1389 \newcommand{\indexspace}{\par \vskip 10\p@ \@plus5\p@ \@minus3\p@\relax}
1390 \newcommand\seename{\if@english see\else →\fi}
1391 \newcommand\alsoname{\if@english see also\else →\fi}
1392 \let\footnotes@ve=\footnote
1393 \def\footnote{\inhibitglue\footnotes@ve}
1394 \let\footnotemarks@ve=\footnotemark
1395 \def\footnotemark{\inhibitglue\footnotemarks@ve}
1396 \def\thefootnote{\ifnum\c@footnote>\z@\leavevmode\lower.5ex\hbox{*}\@arabic\c@footnote\fi}
1397 \renewcommand{\footnoterule}{%
1398   \kern-3\p@
1399   \hrule width .4\columnwidth
1400   \kern 2.6\p@}
1401 \@addtoreset{footnote}{chapter}
1402 \long\def\@footnotetext{%
1403   \insert\footins\bgroup
1404     \normalfont\footnotesize
1405     \interlinepenalty\interfootnotelinepenalty
1406     \splittopskip\footnotesep
1407     \splitmaxdepth \dp\strutbox \floatingpenalty \@MM
1408     \hsize\columnwidth \@parboxrestore
1409     \protected@edef\@currentlabel{%
1410        \csname p@footnote\endcsname\@thefnmark
1411     }%
1412     \color@begingroup
1413       \@makefntext{%
1414         \rule\z@\footnotesep\ignorespaces}%
1415       \futurelet\next\fo@t}
1416 \def\fo@t{\ifcat\bgroup\noexpand\next \let\next\f@@t
1417                                 \else \let\next\f@t\fi \next}
1418 \def\f@@t{\bgroup\aftergroup\@foot\let\next}
1419 \def\f@t#1{#1\@foot}
1420 \def\@foot{\@finalstrut\strutbox\color@endgroup\egroup}
1421 \newcommand\@makefntext[1]{%
1422   \advance\leftskip 3\zw
1423   \parindent 1\zw
1424   \noindent
1425   \llap{\@makefnmark\hskip0.3\zw}#1}
1426 \def\@inhibitglue{%
1427   \futurelet\@let@token\@@inhibitglue}
1428 \def\@@inhibitglue{%
1429   \ifx\@let@token「
1430     \inhibitglue
1431   \else
1432     \ifx\@let@token(
1433       \inhibitglue
1434     \else
1435       \ifx\@let@token『
1436         \inhibitglue
1437       \else
1438         \ifx\@let@token[
1439           \inhibitglue
1440         \fi
1441       \fi
1442     \fi
1443   \fi}
1444 \let\everyparhook=\@inhibitglue
1445 \AtBeginDocument{\everypar{\everyparhook}}
1446 \def\@doendpe{%
1447   \@endpetrue
1448   \def\par{%
1449     \@restorepar\everypar{\everyparhook}\par\@endpefalse}%
1450   \everypar{{\setbox\z@\lastbox}\everypar{\everyparhook}\@endpefalse\everyparhook}}
1451 \def\@item[#1]{%
1452   \if@noparitem
1453     \@donoparitem
1454   \else
1455     \if@inlabel
1456       \indent \par
1457     \fi
1458     \ifhmode
1459       \unskip\unskip \par
1460     \fi
1461     \if@newlist
1462       \if@nobreak
1463         \@nbitem
1464       \else
1465         \addpenalty\@beginparpenalty
1466         \addvspace\@topsep
1467         \addvspace{-\parskip}%
1468       \fi
1469     \else
1470       \addpenalty\@itempenalty
1471       \addvspace\itemsep
1472     \fi
1473     \global\@inlabeltrue
1474   \fi
1475   \everypar{%
1476     \@minipagefalse
1477     \global\@newlistfalse
1478     \if@inlabel
1479       \global\@inlabelfalse
1480       {\setbox\z@\lastbox
1481        \ifvoid\z@
1482          \kern-\itemindent
1483        \fi}%
1484       \box\@labels
1485       \penalty\z@
1486     \fi
1487     \if@nobreak
1488       \@nobreakfalse
1489       \clubpenalty \@M
1490     \else
1491       \clubpenalty \@clubpenalty
1492       \everypar{\everyparhook}%
1493     \fi\everyparhook}%
1494   \if@noitemarg
1495     \@noitemargfalse
1496     \if@nmbrlist
1497       \refstepcounter\@listctr
1498     \fi
1499   \fi
1500   \sbox\@tempboxa{\makelabel{#1}}%
1501   \global\setbox\@labels\hbox{%
1502     \unhbox\@labels
1503     \hskip \itemindent
1504     \hskip -\labelwidth
1505     \hskip -\labelsep
1506     \ifdim \wd\@tempboxa >\labelwidth
1507       \box\@tempboxa
1508     \else
1509       \hbox to\labelwidth {\unhbox\@tempboxa}%
1510     \fi
1511     \hskip \labelsep}%
1512   \ignorespaces}
1513 \def\@afterheading{%
1514   \@nobreaktrue
1515   \everypar{%
1516     \if@nobreak
1517       \@nobreakfalse
1518       \clubpenalty \@M
1519       \if@afterindent \else
1520         {\setbox\z@\lastbox}%
1521       \fi
1522     \else
1523       \clubpenalty \@clubpenalty
1524       \everypar{\everyparhook}%
1525     \fi\everyparhook}}
1526 \def\@gnewline #1{%
1527   \ifvmode
1528     \@nolnerr
1529   \else
1530     \unskip \reserved@e {\reserved@f#1}\nobreak \hfil \break \null
1531     \inhibitglue \ignorespaces
1532   \fi}
1533 \def\Shou#1{\hbox{$\m@th$%
1534   \csname S@\f@size\endcsname
1535   \fontsize\sf@size\z@
1536   \math@fontsfalse\selectfont
1537   #1}}
1538 \def\UeShou#1{{\sbox\z@ T\vbox to\ht0{\Shou{#1}\vss}}}
1539 \def\cmrTeX{%
1540   \ifdim \fontdimen\@ne\font >\z@
1541     T\kern-.25em\lower.5ex\hbox{E}\kern-.125emX\@
1542   \else
1543     T\kern-.1667em\lower.5ex\hbox{E}\kern-.125emX\@
1544   \fi}
1545 \def\cmrLaTeX{%
1546   \ifdim \fontdimen\@ne\font >\z@
1547     L\kern-.32em\UeShou{A}\kern-.22em\cmrTeX
1548   \else
1549     L\kern-.36em\UeShou{A}\kern-.15em\cmrTeX
1550   \fi}
1551 \def\sfTeX{T\kern-.1em\lower.4ex\hbox{E}\kern-.07emX\@}
1552 \def\sfLaTeX{L\kern-.25em\UeShou{A}\kern-.08em\sfTeX}
1553 \def\ptmTeX{%
1554   \ifdim \fontdimen\@ne\font >\z@
1555     T\kern-.12em\lower.37ex\hbox{E}\kern-.02emX\@
1556   \else
1557     T\kern-.07em\lower.37ex\hbox{E}\kern-.05emX\@
1558   \fi}
1559 \def\ptmLaTeX{%
1560   \ifdim \fontdimen\@ne\font >\z@
1561     L\kern-.2em\UeShou{A}\kern-.1em\ptmTeX
1562   \else
1563     L\kern-.3em\UeShou{A}\kern-.1em\ptmTeX
1564   \fi}
1565 \def\pncTeX{%
1566   \ifdim \fontdimen\@ne\font >\z@
1567     T\kern-.2em\lower.5ex\hbox{E}\kern-.08emX\@
1568   \else
1569     T\kern-.13em\lower.5ex\hbox{E}\kern-.13emX\@
1570   \fi}
1571 \def\pncLaTeX{%
1572   \ifdim \fontdimen\@ne\font >\z@
1573     L\kern-.3em\UeShou{A}\kern-.1em\pncTeX
1574   \else
1575     L\kern-.3em\UeShou{A}\kern-.1em\pncTeX
1576   \fi}
1577 \def\pplTeX{%
1578   \ifdim \fontdimen\@ne\font >\z@
1579     T\kern-.17em\lower.32ex\hbox{E}\kern-.15emX\@
1580   \else
1581     T\kern-.12em\lower.34ex\hbox{E}\kern-.1emX\@
1582   \fi}
1583 \def\pplLaTeX{%
1584   \ifdim \fontdimen\@ne\font >\z@
1585     L\kern-.27em\UeShou{A}\kern-.12em\pplTeX
1586   \else
1587     L\kern-.3em\UeShou{A}\kern-.15em\pplTeX
1588   \fi}
1589 \def\ugmTeX{%
1590   \ifdim \fontdimen\@ne\font >\z@
1591     T\kern-.1em\lower.32ex\hbox{E}\kern-.06emX\@
1592   \else
1593     T\kern-.12em\lower.34ex\hbox{E}\kern-.1emX\@
1594   \fi}
1595 \def\ugmLaTeX{%
1596   \ifdim \fontdimen\@ne\font >\z@
1597     L\kern-.2em\UeShou{A}\kern-.13em\ugmTeX
1598   \else
1599     L\kern-.3em\UeShou{A}\kern-.13em\ugmTeX
1600   \fi}
1601 \DeclareRobustCommand{\TeX}{%
1602   \def\@tempa{cmr}%
1603   \ifx\f@family\@tempa\cmrTeX
1604   \else
1605     \def\@tempa{ptm}%
1606     \ifx\f@family\@tempa\ptmTeX
1607     \else
1608       \def\@tempa{txr}%
1609       \ifx\f@family\@tempa\ptmTeX
1610       \else
1611         \def\@tempa{pnc}%
1612         \ifx\f@family\@tempa\pncTeX
1613         \else
1614           \def\@tempa{ppl}%
1615           \ifx\f@family\@tempa\pplTeX
1616           \else
1617             \def\@tempa{ugm}%
1618             \ifx\f@family\@tempa\ugmTeX
1619             \else\sfTeX
1620             \fi
1621           \fi
1622         \fi
1623       \fi
1624     \fi
1625   \fi}
1626
1627 \DeclareRobustCommand{\LaTeX}{%
1628   \def\@tempa{cmr}%
1629   \ifx\f@family\@tempa\cmrLaTeX
1630   \else
1631     \def\@tempa{ptm}%
1632     \ifx\f@family\@tempa\ptmLaTeX
1633     \else
1634       \def\@tempa{txr}%
1635       \ifx\f@family\@tempa\ptmLaTeX
1636       \else
1637         \def\@tempa{pnc}%
1638         \ifx\f@family\@tempa\pncLaTeX
1639         \else
1640           \def\@tempa{ppl}%
1641           \ifx\f@family\@tempa\pplLaTeX
1642           \else
1643             \def\@tempa{ugm}%
1644             \ifx\f@family\@tempa\ugmLaTeX
1645             \else\sfLaTeX
1646             \fi
1647           \fi
1648         \fi
1649       \fi
1650     \fi
1651   \fi}
1652 \DeclareRobustCommand{\LaTeXe}{$\mbox{%
1653   \if b\expandafter\@car\f@series\@nil\boldmath\fi
1654   \LaTeX\kern.15em2\raisebox{-.37ex}{$\textstyle\varepsilon$}}$}
1655 \def\pTeX{p\kern-.05em\TeX}
1656 \def\pLaTeX{p\LaTeX}
1657 \def\pLaTeXe{p\LaTeXe}
1658 \def\AmSTeX{\protect\AmS-\protect\TeX{}}
1659 \DeclareRobustCommand{\BibTeX}{B\kern-.05em\Shou{I\kern-.025em B}%
1660   \ifx\f@family\cmr\kern-.08em\else\kern-.15em\fi\TeX}
1661 \DeclareRobustCommand{\SliTeX}{%
1662   S\kern-.06emL\kern-.18em\UeShou{I}\kern -.03em\TeX}
1663 \newcommand{\prepartname}{\if@english Part~\else 第\fi}
1664 \newcommand{\postpartname}{\if@english\else 部\fi}
1665 \newcommand{\prechaptername}{\if@english Chapter~\else 第\fi}
1666 \newcommand{\postchaptername}{\if@english\else 章\fi}
1667 \newcommand{\presectionname}{}%  第
1668 \newcommand{\postsectionname}{}% 節
1669 \newcommand{\contentsname}{\if@english Contents\else 目次\fi}
1670 \newcommand{\listfigurename}{\if@english List of Figures\else 図目次\fi}
1671 \newcommand{\listtablename}{\if@english List of Tables\else 表目次\fi}
1672 \newcommand{\refname}{\if@english References\else 参考文献\fi}
1673 \newcommand{\bibname}{\if@english Bibliography\else 参考文献\fi}
1674 \newcommand{\indexname}{\if@english Index\else 索引\fi}
1675 \newcommand{\figurename}{\if@english Fig.~\else 図\fi}
1676 \newcommand{\tablename}{\if@english Table.~\else 表\fi}
1677 \newcommand{\appendixname}{\if@english Appendix~\else 付録\fi}
1678 \newif\ifSeireki \Seirekitrue
1679 \def\Seireki{\Seirekitrue}
1680 \def\Wareki{\Seirekifalse}
1681 \newcount\heisei \heisei\year \advance\heisei-1988\relax
1682 \def\today{%
1683   \if@english
1684     \ifcase\month\or
1685       January\or February\or March\or April\or May\or June\or
1686       July\or August\or September\or October\or November\or December\fi
1687       \space\number\day, \number\year
1688   \else
1689     \ifSeireki
1690       \number\year 年
1691       \number\month 月
1692       \number\day 日
1693     \else
1694       平成\number\heisei 年
1695       \number\month 月
1696       \number\day 日
1697     \fi
1698   \fi}
1699 \hyphenation{ado-be post-script ghost-script phe-nom-e-no-log-i-cal man-u-script}
1700 \if@report \pagestyle{plain} \else \pagestyle{headings} \fi
1701 \pagenumbering{arabic}
1702 \if@twocolumn
1703   \twocolumn
1704   \sloppy
1705   \flushbottom
1706 \else
1707   \onecolumn
1708   \raggedbottom
1709 \fi
1710 \if@slide
1711   \renewcommand\kanjifamilydefault{\gtdefault}
1712   \renewcommand\familydefault{\sfdefault}
1713   \raggedright
1714   \ltjsetparameter{xkanjiskip={0.1em}}\relax
1715 \fi
1716 \endinput
1717 %%
1718 %% End of file `ltjsbook.cls'.