OSDN Git Service

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