OSDN Git Service

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