OSDN Git Service

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