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