src/ltjsarticle.cls

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