OSDN Git Service

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