OSDN Git Service

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