OSDN Git Service

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