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