OSDN Git Service

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