src/ltjsbook.cls

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