src/ltjsbook.cls

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