OSDN Git Service

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