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