src/ltjspf.cls

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