OSDN Git Service

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