OSDN Git Service

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