src/ltjtbook.cls

   1 %%
   2 %% This is file `ltjtbook.cls',
   3 %% generated with the docstrip utility.
   4 %%
   5 %% The original source files were:
   6 %%
   7 %% ltjclasses.dtx  (with options: `book,tate')
   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 ltjtbook.cls.
  15 %%
  16 %% For distribution of the original source see the terms
  17 %% for copying and modification in the file ltjclasses.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: ltjclasses.dtx
  24 \NeedsTeXFormat{LaTeX2e}
  25 \ProvidesClass{ltjtbook}
  26   [2017/02/19 v1.7d-ltj-13
  27  Standard LuaLaTeX-ja class]
  28 \RequirePackage{luatexja}
  29 \newcounter{@paper}
  30 \newif\if@landscape \@landscapefalse
  31 \newcommand{\@ptsize}{}
  32 \newif\if@restonecol
  33 \newif\if@titlepage
  34 \@titlepagetrue
  35 \newif\if@openright
  36 \newif\if@openleft
  37 \newif\if@mainmatter \@mainmattertrue
  38 \hour\time \divide\hour by 60\relax
  39 \@tempcnta\hour \multiply\@tempcnta 60\relax
  40 \minute\time \advance\minute-\@tempcnta
  41 \newif\if@stysize \@stysizefalse
  42 \newif\if@mathrmmc \@mathrmmcfalse
  43 \DeclareOption{a4paper}{\setcounter{@paper}{1}%
  44   \setlength\paperheight {297mm}%
  45   \setlength\paperwidth  {210mm}}
  46 \DeclareOption{a5paper}{\setcounter{@paper}{2}%
  47   \setlength\paperheight {210mm}
  48   \setlength\paperwidth  {148mm}}
  49 \DeclareOption{b4paper}{\setcounter{@paper}{3}%
  50   \setlength\paperheight {364mm}
  51   \setlength\paperwidth  {257mm}}
  52 \DeclareOption{b5paper}{\setcounter{@paper}{4}%
  53   \setlength\paperheight {257mm}
  54   \setlength\paperwidth  {182mm}}
  55 \DeclareOption{a4j}{\setcounter{@paper}{1}\@stysizetrue
  56   \setlength\paperheight {297mm}%
  57   \setlength\paperwidth  {210mm}}
  58 \DeclareOption{a5j}{\setcounter{@paper}{2}\@stysizetrue
  59   \setlength\paperheight {210mm}
  60   \setlength\paperwidth  {148mm}}
  61 \DeclareOption{b4j}{\setcounter{@paper}{3}\@stysizetrue
  62   \setlength\paperheight {364mm}
  63   \setlength\paperwidth  {257mm}}
  64 \DeclareOption{b5j}{\setcounter{@paper}{4}\@stysizetrue
  65   \setlength\paperheight {257mm}
  66   \setlength\paperwidth  {182mm}}
  67 \DeclareOption{a4p}{\setcounter{@paper}{1}\@stysizetrue
  68   \setlength\paperheight {297mm}%
  69   \setlength\paperwidth  {210mm}}
  70 \DeclareOption{a5p}{\setcounter{@paper}{2}\@stysizetrue
  71   \setlength\paperheight {210mm}
  72   \setlength\paperwidth  {148mm}}
  73 \DeclareOption{b4p}{\setcounter{@paper}{3}\@stysizetrue
  74   \setlength\paperheight {364mm}
  75   \setlength\paperwidth  {257mm}}
  76 \DeclareOption{b5p}{\setcounter{@paper}{4}\@stysizetrue
  77   \setlength\paperheight {257mm}
  78   \setlength\paperwidth  {182mm}}
  79 \if@compatibility
  80   \renewcommand{\@ptsize}{0}
  81 \else
  82   \DeclareOption{10pt}{\renewcommand{\@ptsize}{0}}
  83 \fi
  84 \DeclareOption{11pt}{\renewcommand{\@ptsize}{1}}
  85 \DeclareOption{12pt}{\renewcommand{\@ptsize}{2}}
  86 \DeclareOption{landscape}{\@landscapetrue
  87   \setlength\@tempdima{\paperheight}%
  88   \setlength\paperheight{\paperwidth}%
  89   \setlength\paperwidth{\@tempdima}}
  90 \DeclareOption{tombow}{%
  91   \tombowtrue \tombowdatetrue
  92   \setlength{\@tombowwidth}{.1\p@}%
  93   \@bannertoken{%
  94      \jobname\space:\space\number\year/\number\month/\number\day
  95       (\number\hour:\number\minute)}
  96   \maketombowbox}
  97 \DeclareOption{tombo}{%
  98   \tombowtrue \tombowdatefalse
  99   \setlength{\@tombowwidth}{.1\p@}%
 100   \maketombowbox}
 101 \DeclareOption{mentuke}{%
 102   \tombowtrue \tombowdatefalse
 103   \setlength{\@tombowwidth}{\z@}%
 104   \maketombowbox}
 105 \DeclareOption{tate}{%
 106   \tate\AtBeginDocument{\message{《縦組モード》}\adjustbaseline}%
 107 }
 108 \AtEndOfPackageFile{everyshi}{%
 109   \def\@EveryShipout@Output{%
 110     \setbox8\vbox{%
 111       \yoko
 112       \@EveryShipout@Hook
 113       \@EveryShipout@AtNextHook
 114       \global\setbox\luatexoutputbox=\box\luatexoutputbox
 115     }%
 116     \gdef\@EveryShipout@AtNextHook{}%
 117     \@EveryShipout@Org@Shipout\box\luatexoutputbox
 118   }}
 119 \DeclareOption{oneside}{\@twosidefalse}
 120 \DeclareOption{twoside}{\@twosidetrue}
 121 \DeclareOption{onecolumn}{\@twocolumnfalse}
 122 \DeclareOption{twocolumn}{\@twocolumntrue}
 123 \DeclareOption{titlepage}{\@titlepagetrue}
 124 \DeclareOption{notitlepage}{\@titlepagefalse}
 125 \if@compatibility
 126 \@openrighttrue
 127 \else
 128 \DeclareOption{openright}{\@openrighttrue\@openleftfalse}
 129 \DeclareOption{openleft}{\@openlefttrue\@openrightfalse}
 130 \DeclareOption{openany}{\@openrightfalse\@openleftfalse}
 131 \fi
 132 \DeclareOption{leqno}{\input{leqno.clo}}
 133 \DeclareOption{fleqn}{\input{fleqn.clo}}
 134 \DeclareOption{openbib}{%
 135   \AtEndOfPackage{%
 136    \renewcommand\@openbib@code{%
 137       \advance\leftmargin\bibindent
 138       \itemindent -\bibindent
 139       \listparindent \itemindent
 140       \parsep \z@
 141       }%
 142    \renewcommand\newblock{\par}}}
 143 \if@compatibility
 144   \@mathrmmctrue
 145 \else
 146   \DeclareOption{disablejfam}{%
 147     \ClassWarningNoLine{\@currname}{The class option 'disablejfam' is obsolete}}
 148   \DeclareOption{mathrmmc}{\@mathrmmctrue}
 149 \fi
 150 \DeclareOption{draft}{\setlength\overfullrule{5pt}}
 151 \DeclareOption{final}{\setlength\overfullrule{0pt}}
 152 \directlua{luatexbase.add_to_callback('luatexja.load_jfm',
 153   function (ji, jn) ji.chars['parbdd'] = 0; return ji end,
 154   'ltj.jclasses_load_jfm', 1)}
 155 {\jfont\g=\ltj@stdmcfont:jfm=min } % loading jfm-min.lua
 156 \expandafter\let\csname JY3/mc/m/n/10\endcsname\relax
 157 \DeclareFontShape{JY3}{mc}{m}{n}{<-> s * [0.962216] \ltj@stdmcfont:jfm=min}{}
 158 \DeclareFontShape{JY3}{gt}{m}{n}{<-> s * [0.962216] \ltj@stdgtfont:jfm=min;jfmvar=goth}{}
 159 \ltjglobalsetparameter{differentjfm=both}
 160 \directlua{luatexbase.remove_from_callback('luatexja.load_jfm', 'ltj.jclasses_load_jfm')}
 161 \ExecuteOptions{a4paper,10pt,twoside,onecolumn,final,openright,tate}
 162 \ProcessOptions\relax
 163 \input{ltjtbk1\@ptsize.clo}
 164 \RequirePackage{lltjext}
 165 \if@stysize
 166   \setlength\columnsep{3\Cwd}
 167 \else
 168   \setlength\columnsep{10\p@}
 169 \fi
 170 \setlength\columnseprule{0\p@}
 171 \iftombow
 172   \newlength{\stockwidth}
 173   \newlength{\stockheight}
 174   \setlength{\stockwidth}{\paperwidth}
 175   \setlength{\stockheight}{\paperheight}
 176   \advance \stockwidth 2in
 177   \advance \stockheight 2in
 178   \ifdefined\pdfpagewidth
 179     \setlength{\pdfpagewidth}{\stockwidth}
 180     \setlength{\pdfpageheight}{\stockheight}
 181   \else
 182     \setlength{\pagewidth}{\stockwidth}
 183     \setlength{\pageheight}{\stockheight}
 184   \fi
 185 \else
 186   \ifdefined\pdfpagewidth
 187     \setlength{\pdfpagewidth}{\paperwidth}
 188     \setlength{\pdfpageheight}{\paperheight}
 189   \else
 190     \setlength{\pagewidth}{\paperwidth}
 191     \setlength{\pageheight}{\paperheight}
 192   \fi
 193 \fi
 194 \setlength\lineskip{1\p@}
 195 \setlength\normallineskip{1\p@}
 196 \renewcommand{\baselinestretch}{}
 197 \setlength\parskip{0\p@ \@plus \p@}
 198 \setlength\parindent{1\Cwd}
 199 \@lowpenalty   51
 200 \@medpenalty  151
 201 \@highpenalty 301
 202 \setcounter{topnumber}{2}
 203 \setcounter{bottomnumber}{1}
 204 \setcounter{totalnumber}{3}
 205 \setcounter{dbltopnumber}{2}
 206 \renewcommand{\topfraction}{.7}
 207 \renewcommand{\bottomfraction}{.3}
 208 \renewcommand{\textfraction}{.2}
 209 \renewcommand{\floatpagefraction}{.5}
 210 \renewcommand{\dbltopfraction}{.7}
 211 \renewcommand{\dblfloatpagefraction}{.5}
 212 \def\pltx@cleartorightpage{\clearpage\if@twoside
 213   \ifodd\c@page
 214     \iftdir
 215       \hbox{}\thispagestyle{empty}\newpage
 216       \if@twocolumn\hbox{}\newpage\fi
 217     \fi
 218   \else
 219     \ifydir
 220       \hbox{}\thispagestyle{empty}\newpage
 221       \if@twocolumn\hbox{}\newpage\fi
 222     \fi
 223   \fi\fi}
 224 \def\pltx@cleartoleftpage{\clearpage\if@twoside
 225   \ifodd\c@page
 226     \ifydir
 227       \hbox{}\thispagestyle{empty}\newpage
 228       \if@twocolumn\hbox{}\newpage\fi
 229     \fi
 230   \else
 231     \iftdir
 232       \hbox{}\thispagestyle{empty}\newpage
 233       \if@twocolumn\hbox{}\newpage\fi
 234     \fi
 235   \fi\fi}
 236 \def\pltx@cleartooddpage{\clearpage\if@twoside
 237   \ifodd\c@page\else
 238     \hbox{}\thispagestyle{empty}\newpage
 239     \if@twocolumn\hbox{}\newpage\fi
 240   \fi\fi}
 241 \def\pltx@cleartoevenpage{\clearpage\if@twoside
 242   \ifodd\c@page
 243     \hbox{}\thispagestyle{empty}\newpage
 244     \if@twocolumn\hbox{}\newpage\fi
 245   \fi\fi}
 246 \if@openleft
 247   \let\cleardoublepage\pltx@cleartoleftpage
 248 \else\if@openright
 249   \let\cleardoublepage\pltx@cleartorightpage
 250 \fi\fi
 251 \def\ps@plain{\let\@mkboth\@gobbletwo
 252    \let\ps@jpl@in\ps@plain
 253    \let\@oddhead\@empty
 254    \def\@oddfoot{\reset@font\hfil\thepage\hfil}%
 255    \let\@evenhead\@empty
 256    \let\@evenfoot\@oddfoot}
 257 \let\ps@jpl@in\ps@plain
 258 \def\ps@headnombre{\let\@mkboth\@gobbletwo
 259     \let\ps@jpl@in\ps@headnombre
 260   \def\@evenhead{\hfil\thepage}%
 261   \def\@oddhead{\thepage\hfil}%
 262   \let\@oddfoot\@empty\let\@evenfoot\@empty}
 263 \def\ps@footnombre{\let\@mkboth\@gobbletwo
 264     \let\ps@jpl@in\ps@footnombre
 265   \def\@evenfoot{\hfil\thepage}%
 266   \def\@oddfoot{\thepage\hfil}%
 267   \let\@oddhead\@empty\let\@evenhead\@empty}
 268 \if@twoside
 269   \def\ps@headings{\let\ps@jpl@in\ps@headnombre
 270     \let\@oddfoot\@empty\let\@evenfoot\@empty
 271     \def\@evenhead{{\leftmark}\hfil\thepage}%
 272     \def\@oddhead{\thepage\hfil\rightmark}%
 273     \let\@mkboth\markboth
 274   \def\chaptermark##1{\markboth{%
 275      \ifnum \c@secnumdepth >\m@ne
 276          \if@mainmatter
 277          \@chapapp\thechapter\@chappos\hskip1\zw
 278          \fi
 279      \fi
 280      ##1}{}}%
 281   \def\sectionmark##1{\markright{%
 282      \ifnum \c@secnumdepth >\z@ \thesection.\hskip1\zw\fi
 283      ##1}}%
 284   }
 285 \else % if not twoside
 286   \def\ps@headings{\let\ps@jpl@in\ps@headnombre
 287     \let\@oddfoot\@empty
 288     \def\@oddhead{\thepage\hfil\rightmark}%
 289     \let\@mkboth\markboth
 290 \def\chaptermark##1{\markright{%
 291    \ifnum \c@secnumdepth >\m@ne
 292          \if@mainmatter
 293        \@chapapp\thechapter\@chappos\hskip1\zw
 294          \fi
 295    \fi
 296    ##1}}%
 297   }
 298 \fi
 299 \if@twoside
 300   \def\ps@bothstyle{\let\ps@jpl@in\ps@footnombre
 301     \def\@evenhead{\hfil\leftmark}% right page
 302     \def\@evenfoot{\hfil\thepage}% right page
 303     \def\@oddhead{\rightmark\hfil}% left page
 304     \def\@oddfoot{\thepage\hfil}% left page
 305   \let\@mkboth\markboth
 306 \def\chaptermark##1{\markboth{%
 307      \ifnum \c@secnumdepth >\m@ne
 308          \if@mainmatter
 309          \@chapapp\thechapter\@chappos\hskip1\zw
 310          \fi
 311      \fi
 312      ##1}{}}%
 313   \def\sectionmark##1{\markright{%
 314      \ifnum \c@secnumdepth >\z@ \thesection.\hskip1\zw\fi
 315      ##1}}%
 316   }
 317 \else % if one column
 318   \def\ps@bothstyle{\let\ps@jpl@in\ps@footnombre
 319     \def\@oddhead{\rightmark\hfil}%
 320     \def\@oddfoot{\thepage\hfil}%
 321     \let\@mkboth\markboth
 322   \def\chaptermark##1{\markright{%
 323      \ifnum \c@secnumdepth >\m@ne
 324          \if@mainmatter
 325          \@chapapp\thechapter\@chappos\hskip1\zw
 326          \fi
 327      \fi
 328      ##1}}%
 329   }
 330 \fi
 331 \def\ps@myheadings{\let\ps@jpl@in\ps@plain%
 332   \let\@oddfoot\@empty\let\@evenfoot\@empty
 333   \def\@evenhead{{\leftmark}\hfil\thepage}%
 334   \def\@oddhead{\thepage\hfil\rightmark}%
 335   \let\@mkboth\@gobbletwo
 336   \let\chaptermark\@gobble
 337   \let\sectionmark\@gobble
 338 }
 339 \if@compatibility
 340 \newenvironment{titlepage}
 341     {%
 342       \cleardoublepage
 343      \if@twocolumn\@restonecoltrue\onecolumn
 344      \else\@restonecolfalse\newpage\fi
 345      \thispagestyle{empty}%
 346      \setcounter{page}\z@
 347     }%
 348     {\if@restonecol\twocolumn\else\newpage\fi
 349     }
 350 +% \changes{v1.7d}{2017/02/15}{bookクラスでtitlepageを必ず奇数ページ
 351 \else
 352 \newenvironment{titlepage}
 353     {%
 354       \pltx@cleartooddpage %% 2017/02/15
 355       \if@twocolumn
 356         \@restonecoltrue\onecolumn
 357       \else
 358         \@restonecolfalse\newpage
 359       \fi
 360       \thispagestyle{empty}%
 361       \ifodd\c@page\setcounter{page}\@ne\else\setcounter{page}\z@\fi %% 2017/02/15
 362     }%
 363     {\if@restonecol\twocolumn \else \newpage \fi
 364      \if@twoside\else
 365         \setcounter{page}\@ne
 366      \fi
 367     }
 368 \fi
 369 \def\p@thanks#1{\footnotemark
 370   \protected@xdef\@thanks{\@thanks
 371     \protect{\noindent\hbox{\yoko$\m@th^\thefootnote$}#1\protect\par}}}
 372 \if@titlepage
 373   \newcommand{\maketitle}{\begin{titlepage}%
 374   \let\footnotesize\small
 375   \let\footnoterule\relax
 376   \let\thanks\p@thanks
 377   \let\footnote\thanks
 378   \vbox to\textheight\bgroup\tate\hsize\textwidth
 379   \null\vfil
 380   \vskip 60\p@
 381   \begin{center}%
 382     {\LARGE \@title \par}%
 383     \vskip 3em%
 384     {\Large
 385      \lineskip .75em%
 386       \begin{tabular}[t]{c}%
 387         \@author
 388       \end{tabular}\par}%
 389       \vskip 1.5em%
 390     {\large \@date \par}%       % Set date in \large size.
 391   \end{center}\par
 392   \vfil{\centering\@thanks}\vfil\null
 393   \egroup
 394   \end{titlepage}%
 395   \setcounter{footnote}{0}%
 396   \global\let\thanks\relax
 397   \global\let\maketitle\relax
 398   \global\let\p@thanks\relax
 399   \global\let\@thanks\@empty
 400   \global\let\@author\@empty
 401   \global\let\@date\@empty
 402   \global\let\@title\@empty
 403   \global\let\title\relax
 404   \global\let\author\relax
 405   \global\let\date\relax
 406   \global\let\and\relax
 407   }%
 408 \else
 409   \newcommand{\maketitle}{\par
 410   \begingroup
 411     \renewcommand{\thefootnote}{\fnsymbol{footnote}}%
 412     \def\@makefnmark{\hbox{\unless\ifnum\ltjgetparameter{direction}=3 $\m@th^{\@thefnmark}$
 413       \else\hbox{\yoko$\m@th^{\@thefnmark}$}\fi}}%
 414     \long\def\@makefntext##1{\parindent 1\zw\noindent
 415        \hb@xt@ 2\zw{\hss\@makefnmark}##1}%
 416     \if@twocolumn
 417       \ifnum \col@number=\@ne \@maketitle
 418       \else \twocolumn[\@maketitle]%
 419       \fi
 420     \else
 421       \newpage
 422       \global\@topnum\z@   % Prevents figures from going at top of page.
 423       \@maketitle
 424     \fi
 425      \thispagestyle{jpl@in}\@thanks
 426   \endgroup
 427   \setcounter{footnote}{0}%
 428   \global\let\thanks\relax
 429   \global\let\maketitle\relax
 430   \global\let\@maketitle\relax
 431   \global\let\p@thanks\relax
 432   \global\let\@thanks\@empty
 433   \global\let\@author\@empty
 434   \global\let\@date\@empty
 435   \global\let\@title\@empty
 436   \global\let\title\relax
 437   \global\let\author\relax
 438   \global\let\date\relax
 439   \global\let\and\relax
 440   }
 441   \def\@maketitle{%
 442   \newpage\null
 443   \vskip 2em%
 444   \begin{center}%
 445   \let\footnote\p@thanks
 446     {\LARGE \@title \par}%
 447     \vskip 1.5em%
 448     {\large
 449       \lineskip .5em%
 450       \begin{tabular}[t]{c}%
 451         \@author
 452       \end{tabular}\par}%
 453     \vskip 1em%
 454     {\large \@date}%
 455   \end{center}%
 456   \par\vskip 1.5em}
 457 \fi
 458 \newcommand*{\chaptermark}[1]{}
 459 \setcounter{secnumdepth}{2}
 460 \newcounter{part}
 461 \newcounter{chapter}
 462 \newcounter{section}[chapter]
 463 \newcounter{subsection}[section]
 464 \newcounter{subsubsection}[subsection]
 465 \newcounter{paragraph}[subsubsection]
 466 \newcounter{subparagraph}[paragraph]
 467 \renewcommand{\thepart}{\rensuji{\@Roman\c@part}}
 468 \renewcommand{\thechapter}{\rensuji{\@arabic\c@chapter}}
 469 \renewcommand{\thesection}{\thechapter・\rensuji{\@arabic\c@section}}
 470 \renewcommand{\thesubsection}{\thesection・\rensuji{\@arabic\c@subsection}}
 471 \renewcommand{\thesubsubsection}{%
 472    \thesubsection・\rensuji{\@arabic\c@subsubsection}}
 473 \renewcommand{\theparagraph}{%
 474    \thesubsubsection・\rensuji{\@arabic\c@paragraph}}
 475 \renewcommand{\thesubparagraph}{%
 476    \theparagraph・\rensuji{\@arabic\c@subparagraph}}
 477 \newcommand{\@chapapp}{\prechaptername}
 478 \newcommand{\@chappos}{\postchaptername}
 479 \newcommand{\frontmatter}{%
 480   \if@openleft \cleardoublepage \else
 481   \if@openright \cleardoublepage \else \clearpage \fi \fi
 482   \@mainmatterfalse\pagenumbering{roman}}
 483 \newcommand{\mainmatter}{%
 484   \if@openleft \cleardoublepage \else
 485   \if@openright \cleardoublepage \else \clearpage \fi \fi
 486   \@mainmattertrue\pagenumbering{arabic}}
 487 \newcommand{\backmatter}{%
 488   \if@openleft \cleardoublepage \else
 489   \if@openright \cleardoublepage \else \clearpage \fi \fi
 490   \@mainmatterfalse}
 491 \newcommand{\part}{%
 492   \if@openleft \cleardoublepage \else
 493   \if@openright \cleardoublepage \else \clearpage \fi \fi
 494   \thispagestyle{empty}%
 495   \if@twocolumn\onecolumn\@tempswatrue\else\@tempswafalse\fi
 496   \null\vfil
 497   \secdef\@part\@spart}
 498 \def\@part[#1]#2{%
 499   \ifnum \c@secnumdepth >-2\relax
 500     \refstepcounter{part}%
 501     \addcontentsline{toc}{part}{%
 502        \prepartname\thepart\postpartname\hspace{1em}#1}%
 503   \else
 504     \addcontentsline{toc}{part}{#1}%
 505   \fi
 506   \markboth{}{}%
 507   {\centering
 508    \interlinepenalty\@M\normalfont
 509    \ifnum \c@secnumdepth >-2\relax
 510      \huge\bfseries\prepartname\thepart\postpartname
 511      \par\vskip20\p@
 512    \fi
 513    \Huge\bfseries#2\par}%
 514    \@endpart}
 515 \def\@spart#1{{%
 516   \centering
 517   \interlinepenalty\@M\normalfont
 518   \Huge\bfseries#1\par}%
 519   \@endpart}
 520 \def\@endpart{\vfil\newpage
 521    \if@twoside
 522     \if@openleft %% \if@openleft added (2017/02/15)
 523      \null\thispagestyle{empty}\newpage
 524     \else\if@openright %% \if@openright added (2016/12/18)
 525      \null\thispagestyle{empty}\newpage
 526     \fi\fi %% added (2016/12/18, 2017/02/15)
 527    \fi
 528    \if@tempswa\twocolumn\fi}
 529 \newcommand{\chapter}{%
 530   \if@openleft \cleardoublepage \else
 531   \if@openright \cleardoublepage \else \clearpage \fi \fi
 532   \thispagestyle{jpl@in}%
 533   \global\@topnum\z@
 534   \@afterindenttrue
 535   \secdef\@chapter\@schapter}
 536 \def\@chapter[#1]#2{%
 537   \ifnum \c@secnumdepth >\m@ne
 538     \if@mainmatter
 539     \refstepcounter{chapter}%
 540     \typeout{\@chapapp\space\thechapter\space\@chappos}%
 541     \addcontentsline{toc}{chapter}%
 542       {\protect\numberline{\@chapapp\thechapter\@chappos}#1}%
 543     \else\addcontentsline{toc}{chapter}{#1}\fi
 544   \else
 545     \addcontentsline{toc}{chapter}{#1}%
 546   \fi
 547   \chaptermark{#1}%
 548   \addtocontents{lof}{\protect\addvspace{10\p@}}%
 549   \addtocontents{lot}{\protect\addvspace{10\p@}}%
 550   \@makechapterhead{#2}\@afterheading}
 551 \def\@makechapterhead#1{\hbox{}%
 552   \vskip2\Cvs
 553   {\parindent\z@
 554    \raggedright
 555    \normalfont\huge\bfseries
 556    \leavevmode
 557    \ifnum \c@secnumdepth >\m@ne
 558      \setlength\@tempdima{\linewidth}%
 559     \if@mainmatter
 560      \setbox\z@\hbox{\@chapapp\thechapter\@chappos\hskip1\zw}%
 561      \addtolength\@tempdima{-\wd\z@}%
 562      \unhbox\z@\nobreak
 563     \fi
 564      \vtop{\hsize\@tempdima#1}%
 565    \else
 566      #1\relax
 567    \fi}\nobreak\vskip3\Cvs}
 568  タイトルより高い位置に右カラムの始点が来るという挙動を維持してあります。
 569 \def\@schapter#1{%
 570   \@makeschapterhead{#1}\@afterheading
 571 }
 572 \def\@makeschapterhead#1{\hbox{}%
 573   \vskip2\Cvs
 574   {\parindent\z@
 575    \raggedright
 576    \normalfont\huge\bfseries
 577    \leavevmode
 578    \setlength\@tempdima{\linewidth}%
 579    \vtop{\hsize\@tempdima#1}}\vskip3\Cvs}
 580 \newcommand{\section}{\@startsection{section}{1}{\z@}%
 581    {1.5\Cvs \@plus.5\Cvs \@minus.2\Cvs}%
 582    {.5\Cvs \@plus.3\Cvs}%
 583    {\normalfont\Large\bfseries}}
 584 \newcommand{\subsection}{\@startsection{subsection}{2}{\z@}%
 585    {1.5\Cvs \@plus.5\Cvs \@minus.2\Cvs}%
 586    {.5\Cvs \@plus.3\Cvs}%
 587    {\normalfont\large\bfseries}}
 588 \newcommand{\subsubsection}{\@startsection{subsubsection}{3}{\z@}%
 589    {1.5\Cvs \@plus.5\Cvs \@minus.2\Cvs}%
 590    {.5\Cvs \@plus.3\Cvs}%
 591    {\normalfont\normalsize\bfseries}}
 592 \newcommand{\paragraph}{\@startsection{paragraph}{4}{\z@}%
 593    {3.25ex \@plus 1ex \@minus .2ex}%
 594    {-1em}%
 595    {\normalfont\normalsize\bfseries}}
 596 \newcommand{\subparagraph}{\@startsection{subparagraph}{5}{\z@}%
 597    {3.25ex \@plus 1ex \@minus .2ex}%
 598    {-1em}%
 599    {\normalfont\normalsize\bfseries}}
 600 \newcommand{\appendix}{\par
 601   \setcounter{chapter}{0}%
 602   \setcounter{section}{0}%
 603   \renewcommand{\@chapapp}{\appendixname}%
 604   \renewcommand{\@chappos}\space%
 605   \renewcommand{\thechapter}{\rensuji{\@Alph\c@chapter}}}
 606 \if@twocolumn
 607   \setlength\leftmargini {2em}
 608 \else
 609   \setlength\leftmargini {2.5em}
 610 \fi
 611 \setlength\leftmarginii  {2.2em}
 612 \setlength\leftmarginiii {1.87em}
 613 \setlength\leftmarginiv  {1.7em}
 614 \if@twocolumn
 615   \setlength\leftmarginv {.5em}
 616   \setlength\leftmarginvi{.5em}
 617 \else
 618   \setlength\leftmarginv {1em}
 619   \setlength\leftmarginvi{1em}
 620 \fi
 621 \setlength  \labelsep  {.5em}
 622 \setlength  \labelwidth{\leftmargini}
 623 \addtolength\labelwidth{-\labelsep}
 624 \@beginparpenalty -\@lowpenalty
 625 \@endparpenalty   -\@lowpenalty
 626 \@itempenalty     -\@lowpenalty
 627 \renewcommand{\theenumi}{\rensuji{\@arabic\c@enumi}}
 628 \renewcommand{\theenumii}{\rensuji{(\@alph\c@enumii)}}
 629 \renewcommand{\theenumiii}{\rensuji{\@roman\c@enumiii}}
 630 \renewcommand{\theenumiv}{\rensuji{\@Alph\c@enumiv}}
 631 \newcommand{\labelenumi}{\theenumi}
 632 \newcommand{\labelenumii}{\theenumii}
 633 \newcommand{\labelenumiii}{\theenumiii}
 634 \newcommand{\labelenumiv}{\theenumiv}
 635 \renewcommand{\p@enumii}{\theenumi}
 636 \renewcommand{\p@enumiii}{\theenumi(\theenumii)}
 637 \renewcommand{\p@enumiv}{\p@enumiii\theenumiii}
 638 \renewenvironment{enumerate}
 639   {\ifnum \@enumdepth >\thr@@\@toodeep\else
 640    \advance\@enumdepth\@ne
 641    \edef\@enumctr{enum\romannumeral\the\@enumdepth}%
 642    \expandafter \list \csname label\@enumctr\endcsname{%
 643       \ifnum\ltjgetparameter{direction}=3
 644          \ifnum \@listdepth=\@ne \topsep.5\normalbaselineskip
 645            \else\topsep\z@\fi
 646          \parskip\z@ \itemsep\z@ \parsep\z@
 647          \labelwidth1\zw \labelsep.3\zw
 648          \ifnum \@enumdepth=\@ne \leftmargin1\zw\relax
 649            \else\leftmargin\leftskip\fi
 650          \advance\leftmargin 1\zw
 651       \fi
 652          \usecounter{\@enumctr}%
 653          \def\makelabel##1{\hss\llap{##1}}}%
 654    \fi}{\endlist}
 655 \newcommand{\labelitemi}{\textbullet}
 656 \newcommand{\labelitemii}{%
 657   \ifnum\ltjgetparameter{direction}=3
 658      {\textcircled{~}}
 659   \else
 660      {\normalfont\bfseries\textendash}
 661   \fi
 662 }
 663 \newcommand{\labelitemiii}{\textasteriskcentered}
 664 \newcommand{\labelitemiv}{\textperiodcentered}
 665 \renewenvironment{itemize}
 666   {\ifnum \@itemdepth >\thr@@\@toodeep\else
 667    \advance\@itemdepth\@ne
 668    \edef\@itemitem{labelitem\romannumeral\the\@itemdepth}%
 669    \expandafter \list \csname \@itemitem\endcsname{%
 670       \ifnum\ltjgetparameter{direction}=3
 671          \ifnum \@listdepth=\@ne \topsep.5\normalbaselineskip
 672            \else\topsep\z@\fi
 673          \parskip\z@ \itemsep\z@ \parsep\z@
 674          \labelwidth1\zw \labelsep.3\zw
 675          \ifnum \@itemdepth =\@ne \leftmargin1\zw\relax
 676            \else\leftmargin\leftskip\fi
 677          \advance\leftmargin 1\zw
 678       \fi
 679          \def\makelabel##1{\hss\llap{##1}}}%
 680    \fi}{\endlist}
 681 \newenvironment{description}
 682   {\list{}{\labelwidth\z@ \itemindent-\leftmargin
 683    \ifnum\ltjgetparameter{direction}=3
 684      \leftmargin\leftskip \advance\leftmargin3\Cwd
 685      \rightmargin\rightskip
 686      \labelsep=1\zw \itemsep\z@
 687      \listparindent\z@ \topskip\z@ \parskip\z@ \partopsep\z@
 688    \fi
 689            \let\makelabel\descriptionlabel}}{\endlist}
 690 \newcommand{\descriptionlabel}[1]{%
 691    \hspace\labelsep\normalfont\bfseries #1}
 692 \newenvironment{verse}
 693   {\let\\\@centercr
 694    \list{}{\itemsep\z@ \itemindent -1.5em%
 695            \listparindent\itemindent
 696            \rightmargin\leftmargin \advance\leftmargin 1.5em}%
 697            \item\relax}{\endlist}
 698 \newenvironment{quotation}
 699   {\list{}{\listparindent 1.5em%
 700            \itemindent\listparindent
 701            \rightmargin\leftmargin
 702            \parsep\z@ \@plus\p@}%
 703            \item\relax}{\endlist}
 704 \newenvironment{quote}
 705   {\list{}{\rightmargin\leftmargin}%
 706            \item\relax}{\endlist}
 707 \newcounter{figure}[chapter]
 708 \renewcommand{\thefigure}{%
 709   \ifnum\c@chapter>\z@\thechapter{}・\fi\rensuji{\@arabic\c@figure}}
 710 \def\fps@figure{tbp}
 711 \def\ftype@figure{1}
 712 \def\ext@figure{lof}
 713 \def\fnum@figure{\figurename\thefigure}
 714 \newenvironment{figure}
 715                {\@float{figure}}
 716                {\end@float}
 717 \newenvironment{figure*}
 718                {\@dblfloat{figure}}
 719                {\end@dblfloat}
 720 \newcounter{table}[chapter]
 721 \renewcommand{\thetable}{%
 722   \ifnum\c@chapter>\z@\thechapter{}・\fi\rensuji{\@arabic\c@table}}
 723 \def\fps@table{tbp}
 724 \def\ftype@table{2}
 725 \def\ext@table{lot}
 726 \def\fnum@table{\tablename\thetable}
 727 \newenvironment{table}
 728                {\@float{table}}
 729                {\end@float}
 730 \newenvironment{table*}
 731                {\@dblfloat{table}}
 732                {\end@dblfloat}
 733 \newlength\abovecaptionskip
 734 \newlength\belowcaptionskip
 735 \setlength\abovecaptionskip{10\p@}
 736 \setlength\belowcaptionskip{0\p@}
 737 \long\def\@makecaption#1#2{%
 738   \vskip\abovecaptionskip
 739   \ifnum\ltjgetparameter{direction}=3 \sbox\@tempboxa{#1\hskip1\zw#2}%
 740     \else\sbox\@tempboxa{#1: #2}%
 741   \fi
 742   \ifdim \wd\@tempboxa >\hsize
 743     \ifnum\ltjgetparameter{direction}=3  #1\hskip1\zw#2\relax\par
 744       \else #1: #2\relax\par\fi
 745   \else
 746     \global \@minipagefalse
 747     \hb@xt@\hsize{\hfil\box\@tempboxa\hfil}%
 748   \fi
 749   \vskip\belowcaptionskip}
 750 \setlength\arraycolsep{5\p@}
 751 \setlength\tabcolsep{6\p@}
 752 \setlength\arrayrulewidth{.4\p@}
 753 \setlength\doublerulesep{2\p@}
 754 \setlength\tabbingsep{\labelsep}
 755 \skip\@mpfootins = \skip\footins
 756 \setlength\fboxsep{3\p@}
 757 \setlength\fboxrule{.4\p@}
 758 \@addtoreset{equation}{chapter}
 759 \renewcommand{\theequation}{%
 760   \ifnum\c@chapter>\z@\thechapter.\fi \@arabic\c@equation}
 761 \if@compatibility\else
 762   \DeclareSymbolFont{mincho}{JY3}{mc}{m}{n}
 763   \DeclareSymbolFontAlphabet{\mathmc}{mincho}
 764   \SetSymbolFont{mincho}{bold}{JY3}{gt}{m}{n}
 765   \jfam\symmincho
 766   \DeclareMathAlphabet{\mathgt}{JY3}{gt}{m}{n}
 767 \fi
 768 \if@mathrmmc
 769   \AtBeginDocument{%
 770   \reDeclareMathAlphabet{\mathrm}{\mathrm}{\mathmc}
 771   \reDeclareMathAlphabet{\mathbf}{\mathbf}{\mathgt}
 772 }%
 773 \fi
 774 \DeclareOldFontCommand{\mc}{\normalfont\mcfamily}{\mathmc}
 775 \DeclareOldFontCommand{\gt}{\normalfont\gtfamily}{\mathgt}
 776 \DeclareOldFontCommand{\rm}{\normalfont\rmfamily}{\mathrm}
 777 \DeclareOldFontCommand{\sf}{\normalfont\sffamily}{\mathsf}
 778 \DeclareOldFontCommand{\tt}{\normalfont\ttfamily}{\mathtt}
 779 \DeclareOldFontCommand{\bf}{\normalfont\bfseries}{\mathbf}
 780 \DeclareOldFontCommand{\it}{\normalfont\itshape}{\mathit}
 781 \DeclareOldFontCommand{\sl}{\normalfont\slshape}{\@nomath\sl}
 782 \DeclareOldFontCommand{\sc}{\normalfont\scshape}{\@nomath\sc}
 783 \DeclareRobustCommand*{\cal}{\@fontswitch\relax\mathcal}
 784 \DeclareRobustCommand*{\mit}{\@fontswitch\relax\mathnormal}
 785 \setcounter{tocdepth}{2}
 786 \newcommand{\@pnumwidth}{1.55em}
 787 \newcommand{\@tocrmarg}{2.55em}
 788 \newcommand{\@dotsep}{4.5}
 789 \newdimen\toclineskip
 790 \setlength\toclineskip{2\p@}
 791 \newdimen\@lnumwidth
 792 \def\numberline#1{\hb@xt@\@lnumwidth{#1\hfil}}
 793 \def\@dottedtocline#1#2#3#4#5{%
 794   \ifnum #1>\c@tocdepth \else
 795     \vskip\toclineskip \@plus.2\p@
 796     {\leftskip #2\relax \rightskip \@tocrmarg \parfillskip -\rightskip
 797      \parindent #2\relax\@afterindenttrue
 798      \interlinepenalty\@M
 799      \leavevmode
 800      \@lnumwidth #3\relax
 801      \advance\leftskip \@lnumwidth \null\nobreak\hskip -\leftskip
 802      {#4}\nobreak
 803      \leaders\hbox{$\m@th \mkern \@dotsep mu.\mkern \@dotsep mu$}%
 804      \hfill\nobreak
 805      \hb@xt@\@pnumwidth{\hss\normalfont \normalcolor #5}%
 806      \par}%
 807   \fi}
 808 \def\addcontentsline#1#2#3{%
 809   \protected@write\@auxout
 810     {\let\label\@gobble \let\index\@gobble \let\glossary\@gobble
 811 \@temptokena{\rensuji{\thepage}}}%
 812     {\string\@writefile{#1}%
 813        {\protect\contentsline{#2}{#3}{\the\@temptokena}}}%
 814 }
 815 \newcommand{\tableofcontents}{%
 816   \if@twocolumn\@restonecoltrue\onecolumn
 817   \else\@restonecolfalse\fi
 818   \chapter*{\contentsname
 819     \@mkboth{\contentsname}{\contentsname}%
 820   }\@starttoc{toc}%
 821   \if@restonecol\twocolumn\fi
 822 }
 823 \newcommand*{\l@part}[2]{%
 824   \ifnum \c@tocdepth >-2\relax
 825     \addpenalty{-\@highpenalty}%
 826     \addvspace{2.25em \@plus\p@}%
 827     \begingroup
 828     \parindent\z@\rightskip\@pnumwidth
 829     \parfillskip-\@pnumwidth
 830     {\leavevmode\large\bfseries
 831      \setlength\@lnumwidth{4\zw}%
 832      #1\hfil\nobreak
 833      \hb@xt@\@pnumwidth{\hss#2}}\par
 834     \nobreak
 835     \global\@nobreaktrue
 836     \everypar{\global\@nobreakfalse\everypar{}}%
 837      \endgroup
 838   \fi}
 839 \newcommand*{\l@chapter}[2]{%
 840   \ifnum \c@tocdepth >\m@ne
 841     \addpenalty{-\@highpenalty}%
 842     \addvspace{1.0em \@plus\p@}%
 843     \begingroup
 844       \parindent\z@ \rightskip\@pnumwidth \parfillskip-\rightskip
 845       \leavevmode\bfseries
 846       \setlength\@lnumwidth{4\zw}%
 847       \advance\leftskip\@lnumwidth \hskip-\leftskip
 848       #1\nobreak\hfil\nobreak\hb@xt@\@pnumwidth{\hss#2}\par
 849       \penalty\@highpenalty
 850     \endgroup
 851   \fi}
 852 \newcommand*{\l@section}{\@dottedtocline{1}{1\zw}{4\zw}}
 853 \newcommand*{\l@subsection}   {\@dottedtocline{2}{2\zw}{6\zw}}
 854 \newcommand*{\l@subsubsection}{\@dottedtocline{3}{3\zw}{8\zw}}
 855 \newcommand*{\l@paragraph}    {\@dottedtocline{4}{4\zw}{9\zw}}
 856 \newcommand*{\l@subparagraph} {\@dottedtocline{5}{5\zw}{10\zw}}
 857 \newcommand{\listoffigures}{%
 858   \if@twocolumn\@restonecoltrue\onecolumn
 859   \else\@restonecolfalse\fi
 860   \chapter*{\listfigurename}%
 861   \@mkboth{\listfigurename}{\listfigurename}%
 862   \@starttoc{lof}%
 863   \if@restonecol\twocolumn\fi
 864 }
 865 \newcommand*{\l@figure}{\@dottedtocline{1}{1\zw}{4\zw}}
 866 \newcommand{\listoftables}{%
 867   \if@twocolumn\@restonecoltrue\onecolumn
 868   \else\@restonecolfalse\fi
 869   \chapter*{\listtablename}%
 870   \@mkboth{\listtablename}{\listtablename}%
 871   \@starttoc{lot}%
 872   \if@restonecol\twocolumn\fi
 873 }
 874 \let\l@table\l@figure
 875 \newdimen\bibindent
 876 \setlength\bibindent{1.5em}
 877 \newcommand{\newblock}{\hskip .11em\@plus.33em\@minus.07em}
 878 \newenvironment{thebibliography}[1]
 879 {\chapter*{\bibname}\@mkboth{\bibname}{\bibname}%
 880    \list{\@biblabel{\@arabic\c@enumiv}}%
 881         {\settowidth\labelwidth{\@biblabel{#1}}%
 882          \leftmargin\labelwidth
 883          \advance\leftmargin\labelsep
 884          \@openbib@code
 885          \usecounter{enumiv}%
 886          \let\p@enumiv\@empty
 887          \renewcommand\theenumiv{\@arabic\c@enumiv}}%
 888    \sloppy
 889    \clubpenalty4000
 890    \@clubpenalty\clubpenalty
 891    \widowpenalty4000%
 892    \sfcode`\.\@m}
 893   {\def\@noitemerr
 894     {\@latex@warning{Empty `thebibliography' environment}}%
 895    \endlist}
 896 \let\@openbib@code\@empty
 897 \newenvironment{theindex}
 898   {\if@twocolumn\@restonecolfalse\else\@restonecoltrue\fi
 899    \twocolumn[\@makeschapterhead{\indexname}]%
 900    \@mkboth{\indexname}{\indexname}%
 901    \thispagestyle{jpl@in}\parindent\z@
 902    \parskip\z@ \@plus .3\p@\relax
 903    \columnseprule\z@ \columnsep 35\p@
 904    \let\item\@idxitem}
 905   {\if@restonecol\onecolumn\else\clearpage\fi}
 906 \newcommand{\@idxitem}{\par\hangindent 40\p@}
 907 \newcommand{\subitem}{\@idxitem \hspace*{20\p@}}
 908 \newcommand{\subsubitem}{\@idxitem \hspace*{30\p@}}
 909 \newcommand{\indexspace}{\par \vskip 10\p@ \@plus5\p@ \@minus3\p@\relax}
 910 \renewcommand{\footnoterule}{%
 911   \kern-3\p@
 912   \hrule\@width.4\columnwidth
 913   \kern2.6\p@}
 914 \@addtoreset{footnote}{chapter}
 915 \newcommand\@makefntext[1]{\parindent 1\zw
 916   \noindent\hb@xt@ 2\zw{\hss\@makefnmark}#1}
 917 \newif\if西暦 \西暦false
 918 \def\西暦{\西暦true}
 919 \def\和暦{\西暦false}
 920 \newcount\heisei \heisei\year \advance\heisei-1988\relax
 921 \def\today{{%
 922   \ifnum\ltjgetparameter{direction}=3
 923     \if西暦
 924       \kansuji\year 年
 925       \kansuji\month 月
 926       \kansuji\day 日
 927     \else
 928       平成\ifnum\heisei=1 元年\else\kansuji\heisei 年\fi
 929       \kansuji\month 月
 930       \kansuji\day 日
 931     \fi
 932   \else
 933     \if西暦
 934       \number\year~年
 935       \number\month~月
 936       \number\day~日
 937     \else
 938       平成\ifnum\heisei=1 元年\else\number\heisei~年\fi
 939       \number\month~月
 940       \number\day~日
 941     \fi
 942   \fi}}
 943 \newcommand{\prepartname}{第}
 944 \newcommand{\postpartname}{部}
 945 \newcommand{\prechaptername}{第}
 946 \newcommand{\postchaptername}{章}
 947 \newcommand{\contentsname}{目 次}
 948 \newcommand{\listfigurename}{図 目 次}
 949 \newcommand{\listtablename}{表 目 次}
 950 \newcommand{\bibname}{関連図書}
 951 \newcommand{\indexname}{索 引}
 952 \newcommand{\figurename}{図}
 953 \newcommand{\tablename}{表}
 954 \newcommand{\appendixname}{付 録}
 955 \pagestyle{headings}
 956 \pagenumbering{arabic}
 957 \raggedbottom
 958 \fnfixbottomtrue % 2017-02-19
 959 \if@twocolumn
 960   \twocolumn
 961   \sloppy
 962 \else
 963   \onecolumn
 964 \fi
 965 \normalmarginpar
 966 \@mparswitchfalse
 967 \AtBeginOfPackageFile*{ftnright}{\let\ltjt@orig@@makefntext=\@makefntext}
 968 \AtEndOfPackageFile*{ftnright}{\let\@makefntext=\ltjt@orig@@makefntext}
 969 \endinput
 970 %%
 971 %% End of file `ltjtbook.cls'.