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