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