OSDN Git Service

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