OSDN Git Service

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