OSDN Git Service

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