OSDN Git Service

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