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