1 % \iffalse meta-comment
2 %% File: ltjsclasses.dtx
3 % -----------------------------------------
4 % Original: jsclasses.dtx
8 % これは LaTeX3 Project の classes.dtx と株式会社アスキーの jclasses.dtx
9 % に基づいて,もともと奥村晴彦 <okumura@okumuralab.org> により
11 % 現在は日本語\TeX 開発コミュニティにより管理されています。
13 % [2002-12-19] いろいろなものに収録していただく際にライセンスを明確にする
14 % 必要が生じてきました。アスキーのものが最近はmodified BSDライセンスになっ
15 % ていますので,私のものもそれに準じてmodified BSDとすることにします。
17 % [2016-07-11] abenoriさんによる\texttt{nomag}オプションをマージしました。
18 % なお,ソースコードの管理はGitHubで行うことにしました。
20 % [2016-07-13] 日本語\TeX 開発コミュニティによる管理に移行しました。
22 % Copyright 1993 1994 1995 1996 1997 1998 1999
23 % The LaTeX3 Project and any individual authors listed elsewhere
26 % Copyright 1995-1999 ASCII Corporation.
27 % Copyright 1999-2016 Haruhiko Okumura
28 % Copyright 2016 Japanese TeX Development Community
29 % -----------------------------------------
34 %% {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
35 %% 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
36 %% Digits \0\1\2\3\4\5\6\7\8\9
37 %% Exclamation \! Double quote \" Hash (number) \#
38 %% Dollar \$ Percent \% Ampersand \&
39 %% Acute accent \' Left paren \( Right paren \)
40 %% Asterisk \* Plus \+ Comma \,
41 %% Minus \- Point \. Solidus \/
42 %% Colon \: Semicolon \; Less than \<
43 %% Equals \= Greater than \> Question mark \?
44 %% Commercial at \@ Left bracket \[ Backslash \\
45 %% Right bracket \] Circumflex \^ Underscore \_
46 %% Grave accent \` Left brace \{ Vertical bar \|
47 %% Right brace \} Tilde \~}
52 %<article|book|jspf|kiyou>\NeedsTeXFormat{LaTeX2e}
53 %<article>\ProvidesClass{ltjsarticle}
54 %<book>\ProvidesClass{ltjsbook}
55 %<jspf>\ProvidesClass{ltjspf}
56 %<kiyou>\ProvidesClass{ltjskiyou}
58 \ProvidesFile{ltjsclasses.dtx}
60 [2016/07/21 ltjsclasses ]
62 \IfFileExists{luatex85.sty}{\RequirePackage{luatex85}}{}
63 \documentclass{ltjsarticle}
66 \usepackage[ipaex,nfssonly]{luatexja-preset}
67 %%%%\usepackage{unicode-math}
68 %%%%\setmathfont{Latin Modern Math}
69 \usepackage[unicode]{hyperref}
70 \addtolength{\textwidth}{-1in}
71 \addtolength{\evensidemargin}{1in}
72 \addtolength{\oddsidemargin}{1in}
73 \addtolength{\marginparwidth}{1in}
74 \setlength\marginparpush{0pt}
77 \setcounter{StandardModuleDepth}{1}
78 \GetFileInfo{ltjsclasses.dtx}
81 \DocInput{ltjsclasses.dtx}
88 % \title{Lua\LaTeX-ja用\texttt{jsclasses}互換クラス}
89 % \author{Lua\TeX-jaプロジェクト}
98 % これは,元々奥村晴彦先生により作成され,現在は日本語\TeX 開発コミュニティにより
99 % 管理されている\texttt{jsclasses.dtx}をLua\LaTeX-ja用に改変したものです。
100 % 次のドキュメントクラス(スタイルファイル)を生成します。
102 % \begin{tabular}{lll}
103 % $\langle$\textsf{article}$\rangle$ & \texttt{ltjsarticle.cls} & 論文・レポート用 \\
104 % $\langle$\textsf{book}$\rangle$ & \texttt{ltjsbook.cls} & 書籍用 \\
105 % $\langle$\textsf{jspf}$\rangle$ & \texttt{ltjspf.cls} & 某学会誌用 \\
106 % $\langle$\textsf{kiyou}$\rangle$ & \texttt{ltjskiyou.cls} & 某紀要用
110 % \subsection{\texttt{jsclasses.dtx}からの主な変更点}
111 % 全ての変更点を知りたい場合は,\texttt{jsclasses.dtx}と\texttt{ltjsclasses.dtx}でdiffを
112 % とって下さい。zw, zh は全て |\zw|, |\zh| に置き換えられています。
114 % \item フォントメトリック関係のオプション\texttt{winjis}は単に無視されます。
115 % \item 標準では\texttt{jfm-ujis.lua}(Lua\TeX-ja標準のメトリック,OTFパッケージのものがベース)を使用します。
116 % \item \texttt{uplatex}オプションを削除してあります。
117 % \item \texttt{disablejfam}オプションが無効になっています。もし
119 % |! LaTeX Error: Too many math alphabets used in version ****.|
121 % のエラーが起こった場合は,\texttt{lualatex-math}パッケージを読み込んでみて下さい。
122 % \item \texttt{papersize}オプションの指定に関わらずPDFのページサイズは適切に
124 % \item Lua\TeX-ja同梱のメトリックを用いる限りは,段落の頭にグルーは挿入されません。
125 % そのため,オリジナルの\texttt{jsclasses}内にあったhack (|\everyparhook|)は不要になったので,
127 % \item 「\texttt{amsmath}との衝突の回避」のコードは,上流で既に対処されているうえ,
128 % これがあると\texttt{grfext.sty}を読み込んだ際にエラーを引き起こすので削除しました。
129 % \item 本家\texttt{jsclasses}では |\mag| を用いて「10\,pt時の組版結果を本文フォントサイズに合わせ拡大縮小」
130 % という方針でしたが,本\texttt{ltjsclasses}ではそのような方法を取っていません。
132 % \item \texttt{nomag}オプション指定時には,単にレイアウトに用いる各種長さの値をスケールさせるだけです。
133 % そのため,例えば本文の文字サイズが17\,ptのときにはcmr10でなくcmr17を用いることになり,組版結果の印象が
135 % \item \texttt{nomagx}オプション指定時には,上記に加えてオプティカルサイズを調整する(本文ではcmr17の代わりに
136 % cmr10を拡大縮小する,など)ため,\LaTeX のフォント選択システムNFSSへパッチを当てます。
137 % こうすることで前項に書いた不具合はなくなりますが,かえって別の不具合が起きる可能性
140 % 標準では\texttt{nomagx}オプションが有効になっています。\texttt{jsclasses}で用意されていた
141 % \texttt{usemag}オプションを指定すると警告を出します.
144 % [2014-02-07 LTJ] jsclasses 2014-02-07 ベースにしました。
146 % [2014-07-26 LTJ] 縦組用和文フォントの設定を加えました。
148 % [2014-12-24 LTJ] |\@setfontsize| 中の和欧文間空白の設定で if 文が抜けていたのを直しました。
150 % [2016-01-30 LTJ] |\rmfamily| 他で和文フォントファミリも変更するコードを
151 % Lua\TeX-ja カーネル内に移しました。
153 % [2016-03-21 LTJ] Lua\TeX~beta-0.87.0 ではPDF出力時に|\mag|が使用できなくなったので,
154 % ZRさんの\texttt{bxjscls}を参考に使わないように書き換えました。
156 % [2016-03-31 LTJ] \texttt{xreal}オプションを標準で有効にしました.
158 % [2016-07-12 LTJ] \texttt{jsclasses}開発版に合わせ、\texttt{real},~\texttt{xreal}オプションの名称を変更するなどの変更を行いました。
160 % [2016-07-18 LTJ] \texttt{usemag}オプションが指定されると警告を出すようにしました.
162 % [2016-07-21 LTJ] \LaTeX 等のロゴの再定義で,\texttt{jslogo}パッケージがあればそちらを読み込むことにしました.
166 % 以下では実際のコードに即して説明します。
168 % \begin{macro}{\jsc@clsname}
170 % 文書クラスの名前です。エラーメッセージ表示などで使われます。
173 %<article>\def\jsc@clsname{ltjsarticle}
174 %<book>\def\jsc@clsname{ltjsbook}
175 %<jspf>\def\jsc@clsname{ltjspf}
176 %<kiyou>\def\jsc@clsname{ltjskiyou}
180 % \section{Lua\TeX-jaの読み込み}
182 % まず,Lua\TeX-jaを読み込みます。
184 \RequirePackage{luatexja}
189 % これらのクラスは |\documentclass{ltjsarticle}|
190 % あるいは |\documentclass[オプション]{ltjsarticle}|
193 % まず,オプションに関連するいくつかのコマンドやスイッチ(論理変数)を定
196 % \begin{macro}{\if@restonecol}
205 % \begin{macro}{\if@titlepage}
207 % これを真にすると表題,概要を独立したページに出力します。
214 % \begin{macro}{\if@openright}
216 % |\chapter|,|\part| を奇数ページ起こしにするかどうかです。
220 %<book>\newif\if@openright
224 % \begin{macro}{\if@mainmatter}
226 % 真なら本文,偽なら前付け・後付けです。
227 % 偽なら |\chapter| で章番号が出ません。
230 %<book>\newif\if@mainmatter \@mainmattertrue
234 % \begin{macro}{\if@enablejfam}
236 % 和文フォントを数式フォントとして登録するかどうかを示すスイッチですが,
240 \newif\if@enablejfam \@enablejfamtrue
248 % JISやISOのA0判は面積 $1\,\mathrm{m}^2$,縦横比 $1:\sqrt{2}$
249 % の長方形の辺の長さを mm 単位に切り捨てたものです。
250 % これを基準として順に半截しては mm 単位に切り捨てたものがA1,A2,…です。
252 % B判はJISとISOで定義が異なります。
253 % JISではB0判の面積が $1.5\,\mathrm{m}^2$ ですが,
254 % ISOではB1判の辺の長さがA0判とA1判の辺の長さの幾何平均です。
255 % したがってISOのB0判は $1000\,\mathrm{mm} \times 1414\,\mathrm{mm}$ です。
256 % このため,\LaTeXe の \texttt{b5paper}
257 % は $250\,\mathrm{mm} \times 176\,\mathrm{mm}$ ですが,
258 % \pLaTeXe の \texttt{b5paper}
259 % は $257\,\mathrm{mm} \times 182\,\mathrm{mm}$ になっています。
260 % ここでは\pLaTeXe にならってJISに従いました。
262 % デフォルトは \texttt{a4paper} です。
264 % \texttt{b5var}(B5変形,182mm×230mm),
265 % \texttt{a4var}(A4変形,210mm×283mm)を追加しました。
268 \DeclareOption{a3paper}{%
269 \setlength\paperheight {420mm}%
270 \setlength\paperwidth {297mm}}
271 \DeclareOption{a4paper}{%
272 \setlength\paperheight {297mm}%
273 \setlength\paperwidth {210mm}}
274 \DeclareOption{a5paper}{%
275 \setlength\paperheight {210mm}%
276 \setlength\paperwidth {148mm}}
277 \DeclareOption{a6paper}{%
278 \setlength\paperheight {148mm}%
279 \setlength\paperwidth {105mm}}
280 \DeclareOption{b4paper}{%
281 \setlength\paperheight {364mm}%
282 \setlength\paperwidth {257mm}}
283 \DeclareOption{b5paper}{%
284 \setlength\paperheight {257mm}%
285 \setlength\paperwidth {182mm}}
286 \DeclareOption{b6paper}{%
287 \setlength\paperheight {182mm}%
288 \setlength\paperwidth {128mm}}
289 \DeclareOption{a4j}{%
290 \setlength\paperheight {297mm}%
291 \setlength\paperwidth {210mm}}
292 \DeclareOption{a5j}{%
293 \setlength\paperheight {210mm}%
294 \setlength\paperwidth {148mm}}
295 \DeclareOption{b4j}{%
296 \setlength\paperheight {364mm}%
297 \setlength\paperwidth {257mm}}
298 \DeclareOption{b5j}{%
299 \setlength\paperheight {257mm}%
300 \setlength\paperwidth {182mm}}
301 \DeclareOption{a4var}{%
302 \setlength\paperheight {283mm}%
303 \setlength\paperwidth {210mm}}
304 \DeclareOption{b5var}{%
305 \setlength\paperheight {230mm}%
306 \setlength\paperwidth {182mm}}
307 \DeclareOption{letterpaper}{%
308 \setlength\paperheight {11in}%
309 \setlength\paperwidth {8.5in}}
310 \DeclareOption{legalpaper}{%
311 \setlength\paperheight {14in}%
312 \setlength\paperwidth {8.5in}}
313 \DeclareOption{executivepaper}{%
314 \setlength\paperheight {10.5in}%
315 \setlength\paperwidth {7.25in}}
325 \DeclareOption{landscape}{\@landscapetrue}
330 % オプション \texttt{slide} を新設しました。
337 % \paragraph{サイズオプション}
339 % 10pt,11pt,12pt のほかに,8pt,9pt,14pt,17pt,21pt,25pt,30pt,36pt,43pt を追加しました。
340 % これは等比数列になるように選んだものです(従来の 20pt も残しました)。
341 % |\@ptsize| の定義が変だったのでご迷惑をおかけしましたが,
342 % 標準的なドキュメントクラスと同様にポイント数から10を引いたものに直しました。
344 % [2003-03-22] 14Qオプションを追加しました。
346 % [2003-04-18] 12Qオプションを追加しました。
348 % [2016-07-08] |\mag| を使わずに各種寸法をスケールさせるためのオプション \texttt{nomag} を新設しました。
349 % \texttt{usemag} オプションの指定で従来通りの動作となります。デフォルトは \texttt{usemag} です。
353 \DeclareOption{slide}{\@slidetrue\def\jsc@magscale{3.583}\@landscapetrue\@titlepagetrue}
354 \DeclareOption{8pt} {\def\jsc@magscale{0.833}}% 1.2^(-1)
355 \DeclareOption{9pt} {\def\jsc@magscale{0.913}}% 1.2^(-0.5}
356 \DeclareOption{10pt}{\def\jsc@magscale{1}}
357 \DeclareOption{11pt}{\def\jsc@magscale{1.095}}% 1.2^0.5
358 \DeclareOption{12pt}{\def\jsc@magscale{1.200}}
359 \DeclareOption{14pt}{\def\jsc@magscale{1.440}}
360 \DeclareOption{17pt}{\def\jsc@magscale{1.728}}
361 \DeclareOption{20pt}{\def\jsc@magscale{2}}
362 \DeclareOption{21pt}{\def\jsc@magscale{2.074}}
363 \DeclareOption{25pt}{\def\jsc@magscale{2.488}}
364 \DeclareOption{30pt}{\def\jsc@magscale{2.986}}
365 \DeclareOption{36pt}{\def\jsc@magscale{3.583}}
366 \DeclareOption{43pt}{\def\jsc@magscale{4.300}}
367 \DeclareOption{12Q} {\def\jsc@magscale{0.923}}% 1pt*12Q/13Q
368 \DeclareOption{14Q} {\def\jsc@magscale{1.077}}% 1pt*14Q/13Q
369 \DeclareOption{10ptj}{\def\jsc@magscale{1.085}}% 1pt*10bp/13Q
370 \DeclareOption{10.5ptj}{\def\jsc@magscale{1.139}}
371 \DeclareOption{11ptj}{\def\jsc@magscale{1.194}}
372 \DeclareOption{12ptj}{\def\jsc@magscale{1.302}}
375 % \paragraph{オプティカルサイズの補正}
376 % \texttt{nomagx}オプション指定時には,本文のフォントサイズが10pt以外の場合に
377 % オプティカルサイズの補正を行うためにNFSSにパッチを当てます。
378 % 現在の\texttt{ltjsclasses}ではこのパッチ当ては標準では行いますが,
379 % 将来どうなるかわからないので\texttt{nomag}で無効化することができるようにしました。
381 % \texttt{noxreal},~\texttt{real}は旧来の互換性として今は残してありますが、2017年7月に削除する予定です。
383 \newif\if@ltjs@mag@xreal
385 \DeclareOption{nomagx}{\@ltjs@mag@xrealtrue}
386 \DeclareOption{nomag}{\@ltjs@mag@xrealfalse}
387 \DeclareOption{noxreal}{%
388 \ClassWarningNoLine{\jsc@clsname}{%
389 The class option `noxreal' is obsolete. \MessageBreak
390 Please use the `nomag' option instead}%
391 \@ltjs@mag@xrealfalse}
392 \DeclareOption{real}{%
393 \ClassWarningNoLine{\jsc@clsname}{%
394 The class option `real' is obsolete. \MessageBreak
395 Please use the `nomag' option instead}%
396 \@ltjs@mag@xrealfalse}
397 \DeclareOption{usemag}{%
398 \ClassWarningNoLine{\jsc@clsname}{%
399 This \jsc@clsname\space cls does not support `usemag'\MessageBreak
400 option, since LuaTeX does not support \string\mag\MessageBreak in pdf output}%
401 \@ltjs@mag@xrealtrue}
407 % \paragraph{トンボオプション}
409 % トンボ(crop marks)を出力します。
410 % 実際の処理は\texttt{lltjcore.sty}で行います。
411 % オプション \texttt{tombow} で日付付きのトンボ,
412 % オプション \texttt{tombo} で日付なしのトンボを出力します。
414 % カウンタ |\hour|,|\minute| は\texttt{luatexja-compat.sty}で宣言されています。
417 \hour\time \divide\hour by 60\relax
418 \@tempcnta\hour \multiply\@tempcnta 60\relax
419 \minute\time \advance\minute-\@tempcnta
420 \DeclareOption{tombow}{%
421 \tombowtrue \tombowdatetrue
422 \setlength{\@tombowwidth}{.1\p@}%
424 \jobname\space(\number\year-\two@digits\month-\two@digits\day
425 \space\two@digits\hour:\two@digits\minute)}%
427 \DeclareOption{tombo}{%
428 \tombowtrue \tombowdatefalse
429 \setlength{\@tombowwidth}{.1\p@}%
435 % オプション \texttt{mentuke} で幅ゼロのトンボを出力します。
436 % 面付けに便利です。これもアスキー版のままです。
439 \DeclareOption{mentuke}{%
440 \tombowtrue \tombowdatefalse
441 \setlength{\@tombowwidth}{\z@}%
445 % \paragraph{両面,片面オプション}
447 % \texttt{twoside} で奇数ページ・偶数ページのレイアウトが変わります。
449 % [2003-04-29] \texttt{vartwoside} でどちらのページも傍注が右側になります。
452 \DeclareOption{oneside}{\@twosidefalse \@mparswitchfalse}
453 \DeclareOption{twoside}{\@twosidetrue \@mparswitchtrue}
454 \DeclareOption{vartwoside}{\@twosidetrue \@mparswitchfalse}
459 % \texttt{twocolumn} で二段組になります。
462 \DeclareOption{onecolumn}{\@twocolumnfalse}
463 \DeclareOption{twocolumn}{\@twocolumntrue}
468 % \texttt{titlepage} で表題・概要を独立したページに出力します。
471 \DeclareOption{titlepage}{\@titlepagetrue}
472 \DeclareOption{notitlepage}{\@titlepagefalse}
477 % 書籍では章は通常は奇数ページ起こしになりますが,
478 % \texttt{openany} で偶数ページからでも始まるようになります。
481 %<book>\DeclareOption{openright}{\@openrighttrue}
482 %<book>\DeclareOption{openany}{\@openrightfalse}
485 % \paragraph{eqnarray環境と数式の位置}
487 % 森本さんのご教示にしたがって前に移動しました。
489 % \begin{environment}{eqnarray}
491 % \LaTeX の |eqnarray| 環境では |&| でできるアキが大きすぎる
493 % また,中央の要素も |\displaystyle| にします。
497 \stepcounter{equation}%
498 \def\@currentlabel{\p@equation\theequation}%
504 $$\everycr{}\halign to\displaywidth\bgroup
505 \hskip\@centering$\displaystyle\tabskip\z@skip{##}$\@eqnsel
506 &\global\@eqcnt\@ne \hfil$\displaystyle{{}##{}}$\hfil
507 &\global\@eqcnt\tw@ $\displaystyle{##}$\hfil\tabskip\@centering
508 &\global\@eqcnt\thr@@ \hb@xt@\z@\bgroup\hss##\egroup
514 % \texttt{leqno} で数式番号が左側になります。
515 % \texttt{fleqn} で数式が本文左端から一定距離のところに出力されます。
519 \DeclareOption{leqno}{\input{leqno.clo}}
520 \DeclareOption{fleqn}{\input{fleqn.clo}%
521 % fleqn用のeqnarray環境の再定義
523 \stepcounter{equation}%
524 \def\@currentlabel{\p@equation\theequation}%
525 \global\@eqnswtrue\m@th
529 \setlength\abovedisplayskip{\topsep}%
531 \addtolength\abovedisplayskip{\partopsep}%
533 \addtolength\abovedisplayskip{\parskip}%
534 \setlength\belowdisplayskip{\abovedisplayskip}%
535 \setlength\belowdisplayshortskip{\abovedisplayskip}%
536 \setlength\abovedisplayshortskip{\abovedisplayskip}%
537 $$\everycr{}\halign to\linewidth% $$
539 \hskip\@centering$\displaystyle\tabskip\z@skip{##}$\@eqnsel
540 &\global\@eqcnt\@ne \hfil$\displaystyle{{}##{}}$\hfil
542 $\displaystyle{##}$\hfil \tabskip\@centering
543 &\global\@eqcnt\thr@@ \hb@xt@\z@\bgroup\hss##\egroup
550 % 文献リストをopen形式(著者名や書名の後に改行が入る)で出力します。
551 % これは使われることはないのでコメントアウトしてあります。
554 % \DeclareOption{openbib}{%
556 % \renewcommand\@openbib@code{%
557 % \advance\leftmargin\bibindent
558 % \itemindent -\bibindent
559 % \listparindent \itemindent
561 % \renewcommand\newblock{\par}}}
564 % \paragraph{数式フォントとして和文フォントを登録しないオプション}
566 % \pTeX では数式中では16通りのフォントしか使えませんでしたが,Lua\TeX では
567 % Omega拡張が取り込まれていて256通りのフォントが使えます。
568 % ただし,\LaTeXe カーネルでは未だに数式ファミリの数は16個に制限されているので,
569 % 実際に使用可能な数式ファミリの数を増やすためには\texttt{lualatex-math}パッケージを
570 % 読み込む必要があることに注意が必要です。
573 \DeclareOption{disablejfam}{%
574 \ClassWarningNoLine{\jsc@clsname}{The class option 'disablejfam' is obsolete}}
579 % \texttt{draft} でoverfull boxの起きた行末に5ptの罫線を引きます。
581 % [2016-07-13] |\ifdraft| を定義するのをやめました。
584 \DeclareOption{draft}{\setlength\overfullrule{5pt}}
585 \DeclareOption{final}{\setlength\overfullrule{0pt}}
588 % \paragraph{和文フォントメトリックの選択}
590 % ここではOTFパッケージのメトリックを元とした,\texttt{jfm-ujis.lua}メトリックを標準で使います。
591 % 古い\texttt{min10},\texttt{goth10}互換のメトリックを使いたいときは\texttt{mingoth}
593 % \pTeX でよく利用される\texttt{jis}フォントメトリックと互換のメトリックを使いたい場合は,
594 % \texttt{ptexjis}というオプションを指定します。
595 % \texttt{winjis}メトリックは用済みのため,\texttt{winjis}オプションは無視されます。
604 \DeclareOption{winjis}{%
605 \ClassWarningNoLine{\jsc@clsname}{The \jsc@clsname\space class does not support `winjis' option}}
606 \DeclareOption{uplatex}{%
607 \ClassWarningNoLine{\jsc@clsname}{The \jsc@clsname\space class does not support `uplatex' option}}
608 \DeclareOption{mingoth}{\mingothtrue}
609 \DeclareOption{ptexjis}{\ptexjistrue}
610 \DeclareOption{jis}{\jisfonttrue}
613 % \paragraph{papersizeスペシャルの利用}
615 % \texttt{ltjsclasses}では\texttt{papersize}オプションの有無に関わらず,
616 % PDFのページサイズは適切に設定されるので,削除しました。
620 % オプション \texttt{english} を新設しました。
625 \DeclareOption{english}{\@englishtrue}
628 % \paragraph{ltjsreport相当}
630 % オプション \texttt{report} を新設しました。
636 \DeclareOption{report}{\@reporttrue\@openrightfalse\@twosidefalse\@mparswitchfalse}
640 % \paragraph{オプションの実行}
643 % |multicols| や |url| を |\RequirePackage| するのはやめました。
646 %<article>\ExecuteOptions{a4paper,oneside,onecolumn,notitlepage,final}
647 %<book>\ExecuteOptions{a4paper,twoside,onecolumn,titlepage,openright,final}
648 %<jspf>\ExecuteOptions{a4paper,twoside,twocolumn,notitlepage,fleqn,final}
649 %<kiyou>\ExecuteOptions{a4paper,twoside,twocolumn,notitlepage,final}
657 \def\maybeblue{\@ifundefined{ver@color.sty}{}{\color{blue}}}
660 \setlength\@tempdima {\paperheight}
661 \setlength\paperheight{\paperwidth}
662 \setlength\paperwidth {\@tempdima}
666 % \paragraph{基準となる行送り}
668 % \begin{macro}{\n@baseline}
670 % 基準となる行送りをポイント単位で表したものです。
673 %<article|book>\if@slide\def\n@baseline{13}\else\def\n@baseline{16}\fi
674 %<jspf>\def\n@baseline{14.554375}
675 %<kiyou>\def\n@baseline{14.897}
681 % サイズの変更は\TeX のプリミティブ |\mag| を使って行います。
682 % 9ポイントについては行送りも若干縮めました。
683 % サイズについては全面的に見直しました。
685 % [2008-12-26] 1000 / |\mag| に相当する |\inv@mag| を定義しました。
686 % |truein| を使っていたところを |\inv@mag in| に直しましたので,
687 % |geometry| パッケージと共存できると思います。
688 % なお,新ドキュメントクラス側で |10pt| 以外にする場合の注意:
690 % \item |geometry| 側でオプション |truedimen| を指定してください。
691 % \item |geometry| 側でオプション |mag| は使えません。
694 % [2016-03-21 LTJ] |\mag| を使わないように全面的に書き換えました。
695 % |\ltjs@mpt| に「拡大率だけ大きくしたpt」の値が格納されます。
696 % \texttt{bxjscls}と同様に,|\@ptsize| は |10pt|,~|11pt|,~|12pt| オプションが指定された時だけ
697 % 従来通り0,~1,~2と設定し,それ以外の場合は$-20$とすることにしました。
698 % |\inv@mag| はもはや定義していません。
700 % [2016-03-26 LTJ] |\ltjs@magscale| に拡大率を格納した後,それを用いて |\ltjs@mpt| を
703 % [2016-07-08] |\jsc@mpt| および |\jsc@mmm| に,それぞれ1ptおよび1mmを拡大させた値を格納します。
704 % 以降のレイアウト指定ではこちらを使います。
706 % [2016-07-12 LTJ] |\ltjs@...| を本家に合わせて |\jsc@...| に名称変更しました。
709 \def\jsc@magscale{0.9769230}
713 \jsc@mpt=\jsc@magscale\p@
714 \jsc@mmm=\jsc@magscale mm
715 \ifdim\jsc@mpt<.92\p@ % 8pt, 9pt 指定時
718 \newcommand{\@ptsize}{0}
719 \ifdim\jsc@mpt=1.0954\p@ \renewcommand{\@ptsize}{1}\else
720 \ifdim\jsc@mpt=1.2\p@ \renewcommand{\@ptsize}{2}\else
721 \renewcommand{\@ptsize}{-20}\fi\fi
724 % \paragraph{オプティカルサイズの補正}
726 % [2016-03-26 LTJ] |xreal|オプションの指定時には,\texttt{bxjscls}の|magstyle=xreal|
727 % オプションのように,オプティカルの補正を行うためにNFSSにパッチを当てます。
728 % パッチは,概ねmiscさんによる「js*.cls 同様の文字サイズ設定を
729 % |\mag|によらずに行う方法:試案」
730 % (\texttt{http://oku.edu.mie-u.ac.jp/\textasciitilde okumura/texfaq/qa/28416.html})の
731 % 方法に沿っていますが,拡大/縮小するところの計算にはLuaを用いています。
733 % なお,\TeX 内部で長さはsp単位の整数倍で表現されているので,数spの誤差は仕方がないです。
734 % そのため,事前に\texttt{type1cm}パッケージを読みこんでおきます。
736 % [2016-03-28 LTJ] |\luafunction|を使うようにし,また本文のフォントサイズが10\,ptのときには
737 % (不要なので)パッチを当てないことにしました。
739 % [2016-04-04 LTJ] NFSSへのパッチを修正.
741 \if@ltjs@mag@xreal\RequirePackage{type1cm}
742 \ifdim\jsc@mpt=\p@\else
743 \expandafter\let\csname OT1/cmr/m/n/10\endcsname\relax
744 \expandafter\let\csname OMX/cmex/m/n/10\endcsname\relax
745 \newluafunction\ltjs@@magnify@font@calc
746 \begingroup\catcode`\%=12\relax
748 local getdimen, mpt=tex.getdimen, tex.getdimen('jsc@mpt')/65536
749 local t = lua.get_functions_table()
750 t[\the\ltjs@@magnify@font@calc] = function()
751 tex.sprint(math.floor(0.5+mpt*getdimen('dimen@')))
753 function luatexja.ltjs_unmagnify_fsize(a)
754 local s = luatexja.print_scaled(math.floor(0.5+a/mpt*65536))
755 tex.sprint( (s:match('%.0$')) and s:sub(1,-3) or s )
759 \def\ltjs@magnify@external@font#1 at#2 at#3\@nil{%
760 \def\@tempa{#1}\def\@tempb{#2}%
762 \edef\@tempb{ scaled\directlua{%
763 tex.sprint(math.floor(0.5+\jsc@magscale*1000))
767 \edef\@tempb{ at\luafunction\ltjs@@magnify@font@calc sp}%
769 \edef\@tempa{\def\noexpand\external@font{\@tempa\@tempb}}%
771 \let\ltjs@orig@get@external@font=\get@external@font
772 \def\get@external@font{%
773 \edef\f@size{\directlua{luatexja.ltjs_unmagnify_fsize(\f@size)}}%
774 \ltjs@orig@get@external@font
776 \edef\@tempa{\external@font\space at\space at}%
777 \expandafter\ltjs@magnify@external@font\@tempa\@nil
778 \expandafter\endgroup\@tempa
784 % \paragraph{PDFの用紙サイズの設定}
786 % \begin{macro}{\pagewidth}
787 % \begin{macro}{\pageheight}
788 % \begin{macro}{\stockwidth}
789 % \begin{macro}{\stockheight}
790 % 出力のPDFの用紙サイズをここで設定しておきます。
791 % |tombow| が真のときは2インチ足しておきます。
793 % [2015-10-18 LTJ] Lua\TeX\ 0.81.0ではプリミティブの名称変更がされたので,
796 % [2016-07-12 LTJ] luatex.defが新しくなったことに対応するaminophenさんのパッチを取り込みました。
799 \newlength{\stockwidth}
800 \newlength{\stockheight}
801 \setlength{\stockwidth}{\paperwidth}
802 \setlength{\stockheight}{\paperheight}
804 \advance \stockwidth 2in
805 \advance \stockheight 2in
807 \ifdefined\pdfpagewidth
808 \setlength{\pdfpagewidth}{\stockwidth}
809 \setlength{\pdfpageheight}{\stockheight}
811 \setlength{\pagewidth}{\stockwidth}
812 \setlength{\pageheight}{\stockheight}
820 % \section{和文フォントの変更}
822 % JISの1ポイントは0.3514mm(約1/72.28インチ),
823 % PostScriptの1ポイントは1/72インチですが,
824 % \TeX では1/72.27インチを1pt(ポイント),
825 % 1/72インチを1bp(ビッグポイント)と表します。
826 % QuarkXPressなどのDTPソフトは標準で1/72インチを1ポイント
827 % としますが,以下ではすべて1/72.27インチを1ptとしています。
828 % 1インチは定義により25.4mmです。
830 % \pTeX (アスキーが日本語化した\TeX )では,例えば従来のフォントメトリック
831 % \texttt{min10}やJISフォントメトリックでは「公称10ポイントの和文フォントは,
832 % 実際には9.62216ptで出力される(メトリック側で0.962216倍される)」という
834 % 一方,Lua\TeX-jaの提供するメトリックでは,そのようなことはありません。
835 % 公称10ポイントの和文フォントは,10ポイントで出力されます。
837 % この\texttt{ltjsclasses}でも,派生元の\texttt{jsclasses}と同じように,
838 % この公称10ポイントのフォントをここでは13級に縮小して
839 % 使うことにします。そのためには,$13\,\textrm{Q}/10\,\textrm{pt}\simeq 0.924715$倍
842 % |\ltj@stdmcfont|,~|\ltj@stdgtfont| による、デフォルトで使われる明朝・ゴシックのフォントの
843 % 設定に対応しました。この2つの命令の値はユーザが日々の利用でその都度指定するものではなく、
844 % 何らかの理由で非埋め込みフォントが正しく利用できない場合にのみ\texttt{luatexja.cfg}によって
847 % [2014-07-26 LTJ] なお,現状のところ,縦組用JFMは\texttt{jfm-ujisv.lua}しか準備していません。
849 % [2016-03-21 LTJ] 拡大率の計算で1~ptを$1/72.27$インチでなく0.3514~mmと間違えて扱っていたのを修正.
852 \expandafter\let\csname JY3/mc/m/n/10\endcsname\relax
854 \DeclareFontShape{JY3}{mc}{m}{n}{<-> s * [0.924715] \ltj@stdmcfont:jfm=min}{}
855 \DeclareFontShape{JY3}{gt}{m}{n}{<-> s * [0.924715] \ltj@stdgtfont:jfm=min}{}
858 \DeclareFontShape{JY3}{mc}{m}{n}{<-> s * [0.924715] \ltj@stdmcfont:jfm=jis}{}
859 \DeclareFontShape{JY3}{gt}{m}{n}{<-> s * [0.924715] \ltj@stdgtfont:jfm=jis}{}
861 \DeclareFontShape{JY3}{mc}{m}{n}{<-> s * [0.924715] \ltj@stdmcfont:jfm=ujis}{}
862 \DeclareFontShape{JY3}{gt}{m}{n}{<-> s * [0.924715] \ltj@stdgtfont:jfm=ujis}{}
865 \DeclareFontShape{JT3}{mc}{m}{n}{<-> s * [0.924715] \ltj@stdmcfont:jfm=ujisv}{}
866 \DeclareFontShape{JT3}{gt}{m}{n}{<-> s * [0.924715] \ltj@stdgtfont:jfm=ujisv}{}
870 % これにより,公称10ポイントの和文フォントを0.924715倍したことにより,
872 % DTPで使う単位(1/72インチ)では9.21ポイントということになり,
873 % 公称10ポイントといっても実は9ポイント強になります。
876 % 和文フォントをPostScriptの9ポイントにするために,
877 % $0.9*72.27/72 \simeq 0.903375$ 倍します。
881 \expandafter\let\csname JY3/mc/m/n/10\endcsname\relax
883 \DeclareFontShape{JY3}{mc}{m}{n}{<-> s * [0.903375] \ltj@stdmcfont:jfm=min}{}
884 \DeclareFontShape{JY3}{gt}{m}{n}{<-> s * [0.903375] \ltj@stdgtfont:jfm=min}{}
887 \DeclareFontShape{JY3}{mc}{m}{n}{<-> s * [0.903375] \ltj@stdmcfont:jfm=jis}{}
888 \DeclareFontShape{JY3}{gt}{m}{n}{<-> s * [0.903375] \ltj@stdgtfont:jfm=jis}{}
890 \DeclareFontShape{JY3}{mc}{m}{n}{<-> s * [0.903375] \ltj@stdmcfont:jfm=ujis}{}
891 \DeclareFontShape{JY3}{gt}{m}{n}{<-> s * [0.903375] \ltj@stdgtfont:jfm=ujis}{}
894 \DeclareFontShape{JT3}{mc}{m}{n}{<-> s * [0.903375] \ltj@stdmcfont:jfm=ujisv}{}
895 \DeclareFontShape{JT3}{gt}{m}{n}{<-> s * [0.903375] \ltj@stdgtfont:jfm=ujisv}{}
899 % 和文でイタリック体,斜体,サンセリフ体,
900 % タイプライタ体の代わりにゴシック体を使うことにします。
902 % [2014-03-25 LTJ] タイプライタ体に合わせるファミリを |\jttdefault| とし,
903 % 通常のゴシック体と別にできるようにしました。|\jttdefault| は,標準で
904 % |\gtdefault| と定義しています。
906 % [2003-03-16] イタリック体,斜体について,和文でゴシックを当てていましたが,
907 % 数学の定理環境などで多量のイタリック体を使うことがあり,ゴシックに
908 % すると黒々となってしまうという弊害がありました。
909 % |amsthm| を使わない場合は定理の本文が明朝になるように |\newtheorem|
911 % \TeX が数学で多用されることを考えると,イタリック体に明朝体を
912 % 当てたほうがいいように思えてきましたので,
913 % イタリック体・斜体に対応する和文を明朝体に変えることにしました。
915 % [2004-11-03] |\rmfamily| も和文対応にしました。
917 % [2016-01-30 LTJ] |\rmfamily|, |\sffamily|, |\ttfamily| の再定義をLua\TeX-ja
918 % カーネルに移動させたので,ここでは和文対応にするフラグ |\@ltj@match@family|\
921 \DeclareFontShape{JY3}{mc}{bx}{n}{<->ssub*gt/m/n}{}
922 \DeclareFontShape{JY3}{gt}{bx}{n}{<->ssub*gt/m/n}{}
923 \DeclareFontShape{JY3}{mc}{m}{it}{<->ssub*mc/m/n}{}
924 \DeclareFontShape{JY3}{mc}{m}{sl}{<->ssub*mc/m/n}{}
925 \DeclareFontShape{JY3}{mc}{m}{sc}{<->ssub*mc/m/n}{}
926 \DeclareFontShape{JY3}{gt}{m}{it}{<->ssub*gt/m/n}{}
927 \DeclareFontShape{JY3}{gt}{m}{sl}{<->ssub*gt/m/n}{}
928 \DeclareFontShape{JY3}{mc}{bx}{it}{<->ssub*gt/m/n}{}
929 \DeclareFontShape{JY3}{mc}{bx}{sl}{<->ssub*gt/m/n}{}
930 % \DeclareFontShape{JT3}{mc}{bx}{n}{<->ssub*gt/m/n}{}
931 % \DeclareFontShape{JT3}{gt}{bx}{n}{<->ssub*gt/m/n}{}
932 %% \DeclareFontShape{JT3}{mc}{m}{it}{<->ssub*mc/m/n}{}
933 %% \DeclareFontShape{JT3}{mc}{m}{sl}{<->ssub*mc/m/n}{}
934 %% \DeclareFontShape{JT3}{mc}{m}{sc}{<->ssub*mc/m/n}{}
935 %% \DeclareFontShape{JT3}{gt}{m}{it}{<->ssub*gt/m/n}{}
936 %% \DeclareFontShape{JT3}{gt}{m}{sl}{<->ssub*gt/m/n}{}
937 %% \DeclareFontShape{JT3}{mc}{bx}{it}{<->ssub*gt/m/n}{}
938 %% \DeclareFontShape{JT3}{mc}{bx}{sl}{<->ssub*gt/m/n}{}
939 \renewcommand\jttdefault{\gtdefault}\@ltj@match@familytrue
942 % Lua\TeX-jaでは和文組版に伴うグルーはノードベースで挿入するようになり,また
943 % 欧文・和文間のグルーとイタリック補正は干渉しないようになりました。
944 % まだ「和文の斜体」についてはLua\LaTeX カーネル側でまともな対応がされていませんが,
945 % \texttt{jsclasses}で行われていた |\textmc|, |\textgt| の再定義は不要のように思われます。
947 % \texttt{jsclasses.dtx}中で行われていた |\reDeclareMathAlphabet| の再定義は削除。
951 \reDeclareMathAlphabet{\mathrm}{\mathrm}{\mathmc}
952 \reDeclareMathAlphabet{\mathbf}{\mathbf}{\mathgt}}%
955 % \begin{macro}{\textsterling}
957 % これは |\pounds| 命令で実際に呼び出される文字です。
958 % 従来からのOT1エンコーディングでは |\$| のイタリック体が |\pounds|
959 % なので \texttt{cmti} が使われていましたが,
960 % 1994年春からは \texttt{cmu}(upright italic,直立イタリック体)
962 % しかし \texttt{cmu} はその性格からして実験的なものであり,
963 % |\pounds| 以外で使われるとは思えないので,
964 % ここでは \texttt{cmti} に戻してしまいます。
966 % [2003-08-20] Computer Modernフォントを使う機会も減り,T1エンコーディング
967 % が一般的になってきました。この定義はもうあまり意味がないので消します。
970 % \DeclareTextCommand{\textsterling}{OT1}{{\itshape\char`\$}}
974 % アスキーの \texttt{kinsoku.dtx} では「’」「“」「”」前後のペナルティが5000に
975 % なっていたので,\texttt{jsclasses.dtx} ではそれを 10000 に補正していました。
976 % しかし,Lua\TeX-jaでは最初からこれらのパラメータは 10000 なので,
979 % 「\TeX!」「〒515」の記号と数字の間に四分アキが入らないようにします。
982 \ltjsetparameter{jaxspmode={`!,2}}
983 \ltjsetparameter{jaxspmode={`〒,1}}
986 % 「CやC++では……」と書くと,C++の直後に四分アキが入らないのでバランスが悪くなります。
987 % 四分アキが入るようにしました。\% の両側も同じです。
990 \ltjsetparameter{alxspmode={`+,3}}
991 \ltjsetparameter{alxspmode={`\%,3}}
994 % \texttt{jsclasses.dtx} では80〜ffの文字の |\xspcode| を全て3にしていましたが,
995 % Lua\TeX-jaでは同様の内容が最初から設定されていますので,対応する部分は削除。
999 % 欧文といえば,\LaTeX の |\def\@{\spacefactor\@m}| という定義(|\@m| は1000)
1000 % では |I watch TV\@.| と書くと V とピリオドのペアカーニングが効かなくなります。
1001 % そこで,次のような定義に直し,|I watch TV.\@| と書くことにします。
1003 % [2016-07-14] 2015-01-01の\LaTeX で,auxiliary filesに書き出されたときに
1004 % スペースが食われないようにする修正が入りました。これに合わせて |{}| を補いました。
1007 \def\@{\spacefactor3000{}}
1013 % フォントサイズを変える命令(|\normalsize|,|\small| など)
1014 % の実際の挙動の設定は,三つの引数をとる命令 |\@setfontsize| を使って,
1017 % |\@setfontsize{\normalsize}{10}{16}|
1021 % |\normalsize| は10ポイントのフォントを使い,行送りは16ポイントである
1025 % 以下では10と同義の\LaTeX の内部命令 |\@xpt| を使っています。
1026 % この |\@xpt| の類は次のものがあり,\LaTeX 本体で定義されています。
1028 % \@vpt 5 \@vipt 6 \@viipt 7
1029 % \@viiipt 8 \@ixpt 9 \@xpt 10
1030 % \@xipt 10.95 \@xiipt 12 \@xivpt 14.4
1033 % \begin{macro}{\@setfontsize}
1035 % ここでは |\@setfontsize| の定義を少々変更して,
1036 % 段落の字下げ |\parindent|,
1037 % 和文文字間のスペース |kanjiskip|,
1038 % 和文・欧文間のスペース |xkanjiskip| を変更しています。
1040 % |kanjiskip| は |ltj-latex.sty| で |0pt plus 0.4pt minus 0.4pt| に
1042 % これはそもそも文字サイズの変更に応じて変わるべきものです。
1043 % それに,プラスになったりマイナスになったりするのは,
1044 % 追い出しと追い込みの混在が生じ,統一性を欠きます。
1045 % なるべく追い出しになるようにプラスの値だけにしたいところですが,
1046 % ごくわずかなマイナスは許すことにしました。
1048 % |xkanjiskip| については,四分つまり全角の1/4を標準として,
1049 % 追い出すために三分あるいは二分まで延ばすのが一般的ですが,
1050 % ここではTimesやPalatinoのスペースがほぼ四分であることに着目して,
1051 % これに一致させています。これなら書くときにスペースを空けても
1054 % |\parindent| については,0(以下)でなければ全角幅(|1\zw|)に直します。
1056 % [2008-02-18] |english| オプションで |\parindent| を 1em にしました。
1058 % [2014-05-14 LTJ] |\ltjsetparameter|の実行は時間がかかるので,
1059 % |\ltjsetkanjiskip| と |\ltjsetxkanjiskip|(両者とも,
1060 % 実行前には |\ltj@setpar@global| の実行が必要)にしました。
1062 % [2014-12-24 LTJ] |jsclasses| では,|\@setfontsize| 中で |xkanjiskip| を
1063 % 設定するのは現在の和欧文間空白の自然長が正の場合だけでした。
1064 % |ltjsclasses| では最初からこの判定が抜けてしまっていたので,復活させます。
1067 \def\@setfontsize#1#2#3{%
1069 \ifx\protect\@typeset@protect
1072 \fontsize{#2}{#3}\selectfont
1073 \ifdim\parindent>\z@
1081 \ltjsetkanjiskip\z@ plus .1\zw minus .01\zw
1082 \@tempskipa=\ltjgetparameter{xkanjiskip}
1083 \ifdim\@tempskipa>\z@
1085 \ltjsetxkanjiskip .1em
1087 \ltjsetxkanjiskip .25em plus .15em minus .06em
1093 % \begin{macro}{\jsc@setfontsize}
1094 % クラスファイルの内部では,拡大率も考慮した |\jsc@setfontsize| を
1095 % |\@setfontsize| の変わりに用いることにします。
1097 \def\jsc@setfontsize#1#2#3{%
1098 \@setfontsize#1{#2\jsc@mpt}{#3\jsc@mpt}}
1102 % これらのグルーをもってしても行分割ができない場合は,
1103 % |\emergencystretch| に訴えます。
1106 \emergencystretch 3\zw
1109 % \begin{macro}{\ifnarrowbaselines}
1110 % \begin{macro}{\narrowbaselines}
1111 % \begin{macro}{\widebaselines}
1113 % 欧文用に行間を狭くする論理変数と,それを真・偽にするためのコマンドです。
1115 % [2003-06-30] 数式に入るところで |\narrowbaselines|
1116 % を実行しているので |\abovedisplayskip| 等が初期化
1117 % されてしまうというshintokさんのご指摘に対して,
1118 % しっぽ愛好家さんが次の修正を教えてくださいました。
1120 % [2008-02-18] |english| オプションで最初の段落のインデントをしないようにしました。
1122 % TODO: Hasumiさん [qa:54539] のご指摘は考慮中です。
1124 % [2015-01-07 LTJ] 遅くなりましたが,
1125 % \url{http://oku.edu.mie-u.ac.jp/tex/mod/forum/discuss.php?d=1005} にあったZRさんのパッチを取り込みました。
1128 \newif\ifnarrowbaselines
1130 \narrowbaselinestrue
1132 \def\narrowbaselines{%
1133 \narrowbaselinestrue
1134 \skip0=\abovedisplayskip
1135 \skip2=\abovedisplayshortskip
1136 \skip4=\belowdisplayskip
1137 \skip6=\belowdisplayshortskip
1138 \@currsize\selectfont
1139 \abovedisplayskip=\skip0
1140 \abovedisplayshortskip=\skip2
1141 \belowdisplayskip=\skip4
1142 \belowdisplayshortskip=\skip6\relax}
1143 \def\widebaselines{\narrowbaselinesfalse\@currsize\selectfont}
1144 \def\ltj@@ifnarrowbaselines{%
1145 \ifnarrowbaselines\expandafter\@firstoftwo
1146 \else \expandafter\@secondoftwo
1154 % \begin{macro}{\normalsize}
1156 % 標準のフォントサイズと行送りを選ぶコマンドです。
1159 % 欧文の標準クラスファイルでは12ポイント,
1160 % アスキーの和文クラスファイルでは15ポイントになっていますが,
1162 % ただし |\narrowbaselines| で欧文用の12ポイントになります。
1164 % 公称10ポイントの和文フォントが約9.25ポイント
1165 % (アスキーのものの0.961倍)であることもあり,
1166 % 行送りがかなりゆったりとしたと思います。
1167 % 実際,$16/9.25 \approx 1.73$ であり,
1168 % 和文の推奨値の一つ「二分四分」(1.75)
1172 \renewcommand{\normalsize}{%
1173 \ltj@@ifnarrowbaselines
1174 {\jsc@setfontsize\normalsize\@xpt\@xiipt}%
1175 {\jsc@setfontsize\normalsize\@xpt{\n@baseline}}%
1178 % 数式の上のアキ(|\abovedisplayskip|),
1179 % 短い数式の上のアキ(|\abovedisplayshortskip|),
1180 % 数式の下のアキ(|\belowdisplayshortskip|)の設定です。
1182 % [2003-02-16] ちょっと変えました。
1184 % [2009-08-26] \TeX\ Q\,\&\,A 52569から始まる議論について逡巡して
1185 % いましたが,結局,微調節してみることにしました。
1188 \abovedisplayskip 11\jsc@mpt \@plus3\jsc@mpt \@minus4\jsc@mpt
1189 \abovedisplayshortskip \z@ \@plus3\jsc@mpt
1190 \belowdisplayskip 9\jsc@mpt \@plus3\jsc@mpt \@minus4\jsc@mpt
1191 \belowdisplayshortskip \belowdisplayskip
1194 % 最後に,リスト環境のトップレベルのパラメータ |\@listI| を,
1195 % |\@listi| にコピーしておきます。|\@listI| の設定は後で出てきます。
1201 % ここで実際に標準フォントサイズで初期化します。
1204 \mcfamily\selectfont\normalsize
1209 % \begin{macro}{\Cht}
1210 % \begin{macro}{\Cdp}
1211 % \begin{macro}{\Cwd}
1212 % \begin{macro}{\Cvs}
1213 % \begin{macro}{\Chs}
1216 % \texttt{lltjfont.sty}で宣言されている
1218 % たとえば |\Cwd| は |\normalfont| の全角幅(|1\zw|)です。
1221 \setbox0\hbox{\char"3000}% 全角スペース
1222 \setlength\Cht{\ht0}
1223 \setlength\Cdp{\dp0}
1224 \setlength\Cwd{\wd0}
1225 \setlength\Cvs{\baselineskip}
1226 \setlength\Chs{\wd0}
1234 % \begin{macro}{\small}
1236 % |\small| も |\normalsize| と同様に設定します。
1237 % 行送りは,|\normalsize| が16ポイントなら,
1238 % 割合からすれば $16 \times 0.9 = 14.4$ ポイントになりますが,
1239 % |\small| の使われ方を考えて,ここでは和文13ポイント,
1241 % また,|\topsep| と |\parsep| は,元はそれぞれ $4 \pm 2$,$2 \pm 1$
1242 % ポイントでしたが,ここではゼロ(|\z@|)にしました。
1245 \newcommand{\small}{%
1246 \ltj@@ifnarrowbaselines
1247 %<!kiyou> {\jsc@setfontsize\small\@ixpt{11}}%
1248 %<kiyou> {\jsc@setfontsize\small{8.8888}{11}}%
1249 %<!kiyou> {\jsc@setfontsize\small\@ixpt{13}}%
1250 %<kiyou> {\jsc@setfontsize\small{8.8888}{13.2418}}%
1251 \abovedisplayskip 9\jsc@mpt \@plus3\jsc@mpt \@minus4\jsc@mpt
1252 \abovedisplayshortskip \z@ \@plus3\jsc@mpt
1253 \belowdisplayskip \abovedisplayskip
1254 \belowdisplayshortskip \belowdisplayskip
1255 \def\@listi{\leftmargin\leftmargini
1262 % \begin{macro}{\footnotesize}
1264 % |\footnotesize| も同様です。
1265 % |\topsep| と |\parsep| は,元はそれぞれ$3 \pm 1$,$2 \pm 1$
1266 % ポイントでしたが,ここではゼロ(|\z@|)にしました。
1269 \newcommand{\footnotesize}{%
1270 \ltj@@ifnarrowbaselines
1271 %<!kiyou> {\jsc@setfontsize\footnotesize\@viiipt{9.5}}%
1272 %<kiyou> {\jsc@setfontsize\footnotesize{8.8888}{11}}%
1273 %<!kiyou> {\jsc@setfontsize\footnotesize\@viiipt{11}}%
1274 %<kiyou> {\jsc@setfontsize\footnotesize{8.8888}{13.2418}}%
1275 \abovedisplayskip 6\jsc@mpt \@plus2\jsc@mpt \@minus3\jsc@mpt
1276 \abovedisplayshortskip \z@ \@plus2\jsc@mpt
1277 \belowdisplayskip \abovedisplayskip
1278 \belowdisplayshortskip \belowdisplayskip
1279 \def\@listi{\leftmargin\leftmargini
1286 % \begin{macro}{\scriptsize}
1287 % \begin{macro}{\tiny}
1288 % \begin{macro}{\large}
1289 % \begin{macro}{\Large}
1290 % \begin{macro}{\LARGE}
1291 % \begin{macro}{\huge}
1292 % \begin{macro}{\Huge}
1293 % \begin{macro}{\HUGE}
1295 % それ以外のサイズは,本文に使うことがないので,
1296 % 単にフォントサイズと行送りだけ変更します。
1297 % 特に注意すべきは |\large| で,
1298 % これは二段組のときに節見出しのフォントとして使い,
1299 % 行送りを |\normalsize| と同じにすることによって,
1300 % 節見出しが複数行にわたっても段間で行が揃うようにします。
1302 % [2004-11-03] |\HUGE| を追加。
1305 \newcommand{\scriptsize}{\jsc@setfontsize\scriptsize\@viipt\@viiipt}
1306 \newcommand{\tiny}{\jsc@setfontsize\tiny\@vpt\@vipt}
1308 %<!kiyou> \newcommand{\large}{\jsc@setfontsize\large\@xiipt{\n@baseline}}
1309 %<kiyou> \newcommand{\large}{\jsc@setfontsize\large{11.111}{\n@baseline}}
1311 %<!kiyou> \newcommand{\large}{\jsc@setfontsize\large\@xiipt{17}}
1312 %<kiyou> \newcommand{\large}{\jsc@setfontsize\large{11.111}{17}}
1314 %<!kiyou>\newcommand{\Large}{\jsc@setfontsize\Large\@xivpt{21}}
1315 %<kiyou>\newcommand{\Large}{\jsc@setfontsize\Large{12.222}{21}}
1316 \newcommand{\LARGE}{\jsc@setfontsize\LARGE\@xviipt{25}}
1317 \newcommand{\huge}{\jsc@setfontsize\huge\@xxpt{28}}
1318 \newcommand{\Huge}{\jsc@setfontsize\Huge\@xxvpt{33}}
1319 \newcommand{\HUGE}{\jsc@setfontsize\HUGE{30}{40}}
1330 % 別行立て数式の中では |\narrowbaselines| にします。
1331 % 和文の行送りのままでは,行列や場合分けの行送り,
1332 % 連分数の高さなどが不釣合いに大きくなるためです。
1334 % 本文中の数式の中では |\narrowbaselines| にしていません。
1335 % 本文中ではなるべく行送りが変わるような大きいものを使わず,
1336 % 行列は |amsmath| の |smallmatrix| 環境を使うのがいいでしょう。
1339 \everydisplay=\expandafter{\the\everydisplay \narrowbaselines}
1342 % しかし,このおかげで別行数式の上下のスペースが少し違ってしまいました。
1343 % とりあえず |amsmath| の |equation| 関係は |okumacro| のほうで逃げていますが,
1344 % もっとうまい逃げ道があればお教えください。
1346 % 見出し用のフォントは |\bfseries| 固定ではなく,|\headfont|
1348 % これは太ゴシックが使えるときは |\sffamily| |\bfseries|
1349 % でいいと思いますが,通常の中ゴシックでは単に |\sffamily|
1351 % 『p\LaTeXe 美文書作成入門』(1997年)では |\sffamily|
1352 % |\fontseries{sbc}| として新ゴMと合わせましたが,
1353 % |\fontseries{sbc}| はちょっと幅が狭いように感じました。
1356 % \newcommand{\headfont}{\bfseries}
1357 \newcommand{\headfont}{\gtfamily\sffamily}
1358 % \newcommand{\headfont}{\sffamily\fontseries{sbc}\selectfont}
1365 % \begin{macro}{\columnsep}
1366 % \begin{macro}{\columnseprule}
1368 % |\columnsep| は二段組のときの左右の段間の幅です。
1369 % 元は10ptでしたが,|2\zw|にしました。
1370 % このスペースの中央に |\columnseprule| の幅の罫線が引かれます。
1373 %<!kiyou>\setlength\columnsep{2\zw}
1374 %<kiyou>\setlength\columnsep{28truebp}
1375 \setlength\columnseprule{\z@}
1382 % \begin{macro}{\lineskip}
1383 % \begin{macro}{\normallineskip}
1384 % \begin{macro}{\lineskiplimit}
1385 % \begin{macro}{\normallineskiplimit}
1387 % 上下の行の文字が |\lineskiplimit| より接近したら,
1388 % |\lineskip| より近づかないようにします。
1389 % 元は0ptでしたが1ptに変更しました。
1390 % \texttt{normal...} の付いた方は保存用です。
1393 \setlength\lineskip{1\jsc@mpt}
1394 \setlength\normallineskip{1\jsc@mpt}
1395 \setlength\lineskiplimit{1\jsc@mpt}
1396 \setlength\normallineskiplimit{1\jsc@mpt}
1403 % \begin{macro}{\baselinestretch}
1405 % 実際の行送りが |\baselineskip| の何倍かを表すマクロです。たとえば
1407 % |\renewcommand{\baselinestretch}{2}|
1409 % とすると,行送りが通常の2倍になります。ただし,
1410 % これを設定すると,たとえ |\baselineskip| が伸縮するように
1411 % 設定しても,行送りの伸縮ができなくなります。
1412 % 行送りの伸縮はしないのが一般的です。
1415 \renewcommand{\baselinestretch}{}
1419 % \begin{macro}{\parskip}
1420 % \begin{macro}{\parindent}
1422 % |\parskip| は段落間の追加スペースです。
1423 % 元は 0pt plus 1pt になっていましたが,ここではゼロにしました。
1424 % |\parindent| は段落の先頭の字下げ幅です。
1427 \setlength\parskip{\z@}
1429 \setlength\parindent{0\zw}
1431 \setlength\parindent{1\zw}
1437 % \begin{macro}{\@lowpenalty}
1438 % \begin{macro}{\@medpenalty}
1439 % \begin{macro}{\@highpenalty}
1441 % |\nopagebreak|,|\nolinebreak| は引数に応じて次のペナルティ値
1442 % のうちどれかを選ぶようになっています。
1454 % \begin{macro}{\interlinepenalty}
1456 % 段落中の改ページのペナルティです。デフォルトは 0 です。
1459 % \interlinepenalty 0
1463 % \begin{macro}{\brokenpenalty}
1465 % ページの最後の行がハイフンで終わる際のペナルティです。
1469 % \brokenpenalty 100
1473 % \subsection{ページレイアウト}
1475 % \paragraph{縦方向のスペース}
1477 % \begin{macro}{\headheight}
1478 % \begin{macro}{\topskip}
1480 % |\topskip| は本文領域上端と本文1行目のベースラインとの距離です。
1481 % あまりぎりぎりの値にすると,本文中に $\int$ のような高い文字が
1482 % 入ったときに1行目のベースラインが他のページより下がってしまいます。
1483 % ここでは本文の公称フォントサイズ(10pt)にします。
1485 % [2003-06-26] |\headheight| はヘッダの高さで,
1486 % 元は12ptでしたが,新ドキュメントクラスでは |\topskip|
1487 % と等しくしていました。ところが,|fancyhdr| パッケージ
1488 % で |\headheight| が小さいとおかしいことになるようです
1489 % ので,2倍に増やしました。代わりに,版面の上下揃えの
1490 % 計算では |\headheight| ではなく |\topskip| を使う
1494 \setlength\topskip{10\jsc@mpt}
1496 \setlength\headheight{0\jsc@mpt}
1498 \setlength\headheight{2\topskip}
1504 % \begin{macro}{\footskip}
1506 % |\footskip| は本文領域下端とフッタ下端との距離です。
1507 % 標準クラスファイルでは,book で0.35in(約8.89mm),
1508 % book 以外で30pt(約10.54mm)となっていましたが,
1509 % ここではA4判のときちょうど1cmとなるように,
1510 % |\paperheight| の0.03367倍(最小 |\baselineskip|)としました。
1511 % 書籍については,フッタは使わないことにして,ゼロにしました。
1516 \setlength\footskip{\z@}
1518 \setlength\footskip{0.03367\paperheight}
1519 \ifdim\footskip<\baselineskip
1520 \setlength\footskip{\baselineskip}
1524 %<jspf>\setlength\footskip{9\jsc@mmm}
1527 \setlength\footskip{0.03367\paperheight}
1528 \ifdim\footskip<\baselineskip
1529 \setlength\footskip{\baselineskip}
1532 \setlength\footskip{\z@}
1538 % \begin{macro}{\headsep}
1540 % |\headsep| はヘッダ下端と本文領域上端との距離です。
1541 % 元は book で18pt(約6.33mm),
1542 % それ以外で25pt(約8.79mm)になっていました。
1543 % ここでは article は |\footskip| $-$ |\topskip| としました。
1548 \setlength\headsep{0\jsc@mpt}
1550 \setlength\headsep{\footskip}
1551 \addtolength\headsep{-\topskip}
1556 \setlength\headsep{\footskip}
1557 \addtolength\headsep{-\topskip}
1559 \setlength\headsep{6\jsc@mmm}
1563 \setlength\headsep{9\jsc@mmm}
1564 \addtolength\headsep{-\topskip}
1567 \setlength\headheight{0\jsc@mpt}
1568 \setlength\headsep{0\jsc@mpt}
1573 % \begin{macro}{\maxdepth}
1575 % |\maxdepth| は本文最下行の最大の深さで,
1576 % plain \TeX や\LaTeX~2.09では4ptに固定でした。
1577 % \LaTeX2e では |\maxdepth| $+$ |\topskip| を本文フォントサイズ
1578 % の1.5倍にしたいのですが,|\topskip| は本文フォントサイズ
1579 % (ここでは10pt)に等しいので,結局 |\maxdepth| は |\topskip|
1580 % の半分の値(具体的には5pt)にします。
1583 \setlength\maxdepth{.5\topskip}
1587 % \paragraph{本文の幅と高さ}
1589 % \begin{macro}{\fullwidth}
1591 % 本文の幅が全角40文字を超えると読みにくくなります。
1593 % 紙の幅が広いときは外側のマージンを余分にとって全角40文字に押え,
1594 % ヘッダやフッタは本文領域より広く取ることにします。
1595 % このときヘッダやフッタの幅を表す |\fullwidth| という長さを定義します。
1601 % この |\fullwidth| は article では紙幅 |\paperwidth|の0.76倍を超えない
1602 % 全角幅の整数倍(二段組では全角幅の偶数倍)にします。0.76倍という数値は
1603 % A4縦置きの場合に紙幅から約2インチを引いた値になるように選びました。
1604 % book では紙幅から36ミリを引いた値にしました。
1606 % \begin{macro}{\textwidth}
1608 % 書籍以外では本文領域の幅 |\textwidth| は |\fullwidth| と等しくします。
1609 % |article| ではA4縦置きで49文字となります。
1610 % 某学会誌スタイルでは |50\zw|(25文字×2段)+段間8\,mmとします。
1615 \setlength\fullwidth{0.9\paperwidth}
1617 \setlength\fullwidth{0.76\paperwidth}
1619 \if@twocolumn \@tempdima=2\zw \else \@tempdima=1\zw \fi
1620 \divide\fullwidth\@tempdima \multiply\fullwidth\@tempdima
1621 \setlength\textwidth{\fullwidth}
1625 \setlength\fullwidth{0.76\paperwidth}
1627 \setlength\fullwidth{\paperwidth}
1628 \addtolength\fullwidth{-36\jsc@mmm}
1630 \if@twocolumn \@tempdima=2\zw \else \@tempdima=1\zw \fi
1631 \divide\fullwidth\@tempdima \multiply\fullwidth\@tempdima
1632 \setlength\textwidth{\fullwidth}
1635 \ifdim \fullwidth>40\zw
1636 \setlength\textwidth{40\zw}
1642 \setlength\fullwidth{50\zw}
1643 \addtolength\fullwidth{8\jsc@mmm}
1644 \setlength\textwidth{\fullwidth}
1647 \setlength\fullwidth{48\zw}
1648 \addtolength\fullwidth{\columnsep}
1649 \setlength\textwidth{\fullwidth}
1655 % \begin{macro}{\textheight}
1657 % 紙の高さ |\paperheight| は,1インチと |\topmargin|
1658 % と |\headheight| と |\headsep| と |\textheight|
1659 % と |\footskip| とページ下部の余白を加えたものです。
1661 % 本文部分の高さ |\textheight| は,
1662 % 紙の高さ |\paperheight| の0.83倍から,
1663 % ヘッダの高さ,ヘッダと本文の距離,本文とフッタ下端の距離,
1665 % それを |\baselineskip| の倍数に切り捨て,
1666 % 最後に |\topskip| を加えます。
1667 % 念のため0.1ポイント余分に加えておきます。
1668 % 0.83倍という数値は,A4縦置きの場合に紙の高さから
1669 % 上下マージン各約1インチを引いた値になるように選びました。
1671 % 某学会誌スタイルでは44行にします。
1673 % [2003-06-26] |\headheight| を |\topskip| に直しました。
1674 % 以前はこの二つは値が同じであったので,変化はないはずです。
1679 \setlength{\textheight}{0.95\paperheight}
1681 \setlength{\textheight}{0.83\paperheight}
1683 \addtolength{\textheight}{-\topskip}
1684 \addtolength{\textheight}{-\headsep}
1685 \addtolength{\textheight}{-\footskip}
1686 \addtolength{\textheight}{-\topskip}
1687 \divide\textheight\baselineskip
1688 \multiply\textheight\baselineskip
1690 %<jspf>\setlength{\textheight}{51\baselineskip}
1691 %<kiyou>\setlength{\textheight}{47\baselineskip}
1692 \addtolength{\textheight}{\topskip}
1693 \addtolength{\textheight}{0.1\jsc@mpt}
1694 %<jspf>\setlength{\mathindent}{10\jsc@mmm}
1698 % \begin{macro}{\flushbottom}
1700 % [2016-07-18] |\textheight| に念のため0.1ポイント余裕を持たせて
1701 % いるのと同様に,|\flushbottom| にも余裕を持たせます。
1702 % 元の\LaTeXe での完全な |\flushbottom| の定義は
1704 % \def\flushbottom{%
1705 % \let\@textbottom\relax \let\@texttop\relax}
1711 \def\@textbottom{\vskip \z@ \@plus.1\jsc@mpt}%
1712 \let\@texttop\relax}
1716 % \begin{macro}{\marginparsep}
1717 % \begin{macro}{\marginparpush}
1719 % |\marginparsep| は欄外の書き込みと本文との間隔です。
1720 % |\marginparpush| は欄外の書き込みどうしの最小の間隔です。
1723 \setlength\marginparsep{\columnsep}
1724 \setlength\marginparpush{\baselineskip}
1729 % \begin{macro}{\oddsidemargin}
1730 % \begin{macro}{\evensidemargin}
1732 % それぞれ奇数ページ,偶数ページの左マージンから1インチ引いた値です。
1733 % 片面印刷では |\oddsidemargin| が使われます。
1734 % \TeX は上・左マージンに |1truein| を挿入しますが,
1735 % トンボ関係のオプションが指定されると |lltjcore.sty|
1736 % はトンボの内側に |1in| のスペース(|1truein| ではなく)を挿入するので,
1739 % [2011-10-03 LTJ] Lua\TeX{} (pdf\TeX?) では |1truein| ではなく
1743 \setlength{\oddsidemargin}{\paperwidth}
1744 \addtolength{\oddsidemargin}{-\fullwidth}
1745 \setlength{\oddsidemargin}{.5\oddsidemargin}
1746 \addtolength{\oddsidemargin}{-1in}
1747 \setlength{\evensidemargin}{\oddsidemargin}
1749 \addtolength{\evensidemargin}{\fullwidth}
1750 \addtolength{\evensidemargin}{-\textwidth}
1756 % \begin{macro}{\marginparwidth}
1758 % |\marginparwidth| は欄外の書き込みの横幅です。
1759 % 外側マージンの幅(|\evensidemargin| $+$ 1インチ)から1センチを引き,
1760 % さらに |\marginparsep|(欄外の書き込みと本文のアキ)を引いた値に
1761 % しました。最後に |1\zw| の整数倍に切り捨てます。
1764 \setlength\marginparwidth{\paperwidth}
1765 \addtolength\marginparwidth{-\oddsidemargin}
1766 \addtolength\marginparwidth{-1in}
1767 \addtolength\marginparwidth{-\textwidth}
1768 \addtolength\marginparwidth{-10\jsc@mmm}
1769 \addtolength\marginparwidth{-\marginparsep}
1771 \divide\marginparwidth\@tempdima
1772 \multiply\marginparwidth\@tempdima
1776 % \begin{macro}{\topmargin}
1778 % 上マージン(紙の上端とヘッダ上端の距離)
1781 % [2003-06-26] |\headheight| を |\topskip| に直しました。
1782 % 以前はこの二つは値が同じであったので,変化はないはずです。
1784 % [2011-10-03 LTJ] ここも |\oddsidemargin| のときと同様に |-\inv@mag in| ではなく
1788 \setlength\topmargin{\paperheight}
1789 \addtolength\topmargin{-\textheight}
1791 \addtolength\topmargin{-\headheight}
1793 \addtolength\topmargin{-\topskip}
1795 \addtolength\topmargin{-\headsep}
1796 \addtolength\topmargin{-\footskip}
1797 \setlength\topmargin{0.5\topmargin}
1798 %<kiyou>\setlength\topmargin{81truebp}
1799 \addtolength\topmargin{-1in}
1805 % \begin{macro}{\footnotesep}
1807 % 各脚注の頭に入る支柱(strut)の高さです。
1808 % 脚注間に余分のアキが入らないように,
1809 % |\footnotesize| の支柱の高さ(行送りの0.7倍)に等しくします。
1812 {\footnotesize\global\setlength\footnotesep{\baselineskip}}
1813 \setlength\footnotesep{0.7\footnotesep}
1817 % \begin{macro}{\footins}
1819 % |\skip\footins| は本文の最終行と最初の脚注との間の距離です。
1820 % 標準の10ポイントクラスでは 9 plus 4 minus 2 ポイントになっていますが,
1821 % 和文の行送りを考えてもうちょっと大きくします。
1824 \setlength{\skip\footins}{16\jsc@mpt \@plus 5\jsc@mpt \@minus 2\jsc@mpt}
1828 % \paragraph{フロート関連}
1830 % フロート(図,表)関連のパラメータは\LaTeXe 本体で定義されていますが,
1831 % ここで設定変更します。本文ページ(本文とフロートが共存するページ)
1832 % ちなみに,カウンタは内部では |\c@| を名前に冠したマクロになっています。
1833 % とフロートだけのページで設定が異なります。
1835 % \begin{macro}{\c@topnumber}
1837 % |topnumber| カウンタは本文ページ上部のフロートの最大数です。
1839 % [2003-08-23] ちょっと増やしました。
1842 \setcounter{topnumber}{9}
1846 % \begin{macro}{\topfraction}
1848 % 本文ページ上部のフロートが占有できる最大の割合です。
1849 % フロートが入りやすいように,元の値 0.7 を 0.8 [2003-08-23: 0.85] に変えてあります。
1852 \renewcommand{\topfraction}{.85}
1856 % \begin{macro}{\c@bottomnumber}
1858 % |bottomnumber| カウンタは本文ページ下部のフロートの最大数です。
1860 % [2003-08-23] ちょっと増やしました。
1863 \setcounter{bottomnumber}{9}
1867 % \begin{macro}{\bottomfraction}
1869 % 本文ページ下部のフロートが占有できる最大の割合です。元は 0.3 でした。
1872 \renewcommand{\bottomfraction}{.8}
1876 % \begin{macro}{\c@totalnumber}
1878 % |totalnumber| カウンタは本文ページに入りうるフロートの最大数です。
1880 % [2003-08-23] ちょっと増やしました。
1883 \setcounter{totalnumber}{20}
1887 % \begin{macro}{\textfraction}
1889 % 本文ページに最低限入らなければならない本文の割合です。
1890 % フロートが入りやすいように元の 0.2 を 0.1 に変えました。
1893 \renewcommand{\textfraction}{.1}
1897 % \begin{macro}{\floatpagefraction}
1899 % フロートだけのページでのフロートの最小割合です。
1900 % これも 0.5 を 0.8 に変えてあります。
1903 \renewcommand{\floatpagefraction}{.8}
1907 % \begin{macro}{\c@dbltopnumber}
1909 % 二段組のとき本文ページ上部に出力できる
1912 % [2003-08-23] ちょっと増やしました。
1915 \setcounter{dbltopnumber}{9}
1919 % \begin{macro}{\dbltopfraction}
1921 % 二段組のとき本文ページ上部に出力できる
1922 % 段抜きフロートが占めうる最大の割合です。
1923 % 0.7 を 0.8 に変えてあります。
1926 \renewcommand{\dbltopfraction}{.8}
1930 % \begin{macro}{\dblfloatpagefraction}
1932 % 二段組のときフロートだけのページに入るべき
1934 % 0.5 を 0.8 に変えてあります。
1937 \renewcommand{\dblfloatpagefraction}{.8}
1941 % \begin{macro}{\floatsep}
1942 % \begin{macro}{\textfloatsep}
1943 % \begin{macro}{\intextsep}
1945 % |\floatsep| はページ上部・下部のフロート間の距離です。
1946 % |\textfloatsep| はページ上部・下部のフロートと本文との距離です。
1947 % |\intextsep| は本文の途中に出力されるフロートと本文との距離です。
1950 \setlength\floatsep {12\jsc@mpt \@plus 2\jsc@mpt \@minus 2\jsc@mpt}
1951 \setlength\textfloatsep{20\jsc@mpt \@plus 2\jsc@mpt \@minus 4\jsc@mpt}
1952 \setlength\intextsep {12\jsc@mpt \@plus 2\jsc@mpt \@minus 2\jsc@mpt}
1958 % \begin{macro}{\dblfloatsep}
1959 % \begin{macro}{\dbltextfloatsep}
1961 % 二段組のときの段抜きのフロートについての値です。
1964 \setlength\dblfloatsep {12\jsc@mpt \@plus 2\jsc@mpt \@minus 2\jsc@mpt}
1965 \setlength\dbltextfloatsep{20\jsc@mpt \@plus 2\jsc@mpt \@minus 4\jsc@mpt}
1970 % \begin{macro}{\@fptop}
1971 % \begin{macro}{\@fpsep}
1972 % \begin{macro}{\@fpbot}
1974 % フロートだけのページに入るグルーです。
1977 % |\@fpsep| はフロート間に入ります。
1980 \setlength\@fptop{0\jsc@mpt \@plus 1fil}
1981 \setlength\@fpsep{8\jsc@mpt \@plus 2fil}
1982 \setlength\@fpbot{0\jsc@mpt \@plus 1fil}
1988 % \begin{macro}{\@dblfptop}
1989 % \begin{macro}{\@dblfpsep}
1990 % \begin{macro}{\@dblfpbot}
1995 \setlength\@dblfptop{0\jsc@mpt \@plus 1fil}
1996 \setlength\@dblfpsep{8\jsc@mpt \@plus 2fil}
1997 \setlength\@dblfpbot{0\jsc@mpt \@plus 1fil}
2003 % \section{ページスタイル}\label{sec:pagestyle}
2005 % ページスタイルとして,\LaTeXe (欧文版)の標準クラス
2006 % では |empty|,|plain|,|headings|,|myheadings| があります。
2007 % このうち |empty|,|plain| スタイルは\LaTeXe 本体
2010 % アスキーのクラスファイルでは |headnombre|,|footnombre|,
2011 % |bothstyle|,|jpl@in| が追加されていますが,
2012 % ここでは欧文標準のものだけにしました。
2014 % ページスタイルは |\ps@...| の形のマクロで定義されています。
2016 % \begin{macro}{\@evenhead}
2017 % \begin{macro}{\@oddhead}
2018 % \begin{macro}{\@evenfoot}
2019 % \begin{macro}{\@oddfoot}
2021 % |\@oddhead|,|\@oddfoot|,|\@evenhead|,|\@evenfoot| は
2022 % 偶数・奇数ページの柱(ヘッダ,フッタ)を出力する命令です。
2023 % これらは |\fullwidth| 幅の |\hbox| の中で呼び出されます。
2024 % |\ps@...| の中で定義しておきます。
2031 % 柱の内容は,|\chapter| が呼び出す |\chaptermark{何々}|,
2032 % |\section| が呼び出す |\sectionmark{何々}| で設定します。
2033 % 柱を扱う命令には次のものがあります。
2037 % |\markboth{左}{右} | \= 両方の柱を設定します。\\
2038 % |\markright{右}| \> 右の柱を設定します。\\
2039 % |\leftmark| \> 左の柱を出力します。\\
2040 % |\rightmark| \> 右の柱を出力します。
2044 % 柱を設定する命令は,右の柱が左の柱の下位にある場合は十分まともに
2045 % 動作します。たとえば左マークを |\chapter|,右マークを |\section|
2047 % しかし,同一ページに複数の |\markboth| があると,
2050 % |\tableofcontents| のような命令で使われる |\@mkboth| は,
2051 % |\ps@...| コマンド中で |\markboth| か |\@gobbletwo|(何もしない)
2054 % \begin{macro}{\ps@empty}
2056 % |empty| ページスタイルの定義です。
2057 % \LaTeX 本体で定義されているものをコメントアウトした形で
2062 % \let\@mkboth\@gobbletwo
2063 % \let\@oddhead\@empty
2064 % \let\@oddfoot\@empty
2065 % \let\@evenhead\@empty
2066 % \let\@evenfoot\@empty}
2070 % \begin{macro}{\ps@plainhead}
2071 % \begin{macro}{\ps@plainfoot}
2072 % \begin{macro}{\ps@plain}
2074 % |plainhead| はシンプルなヘッダだけのページスタイルです。
2076 % |plainfoot| はシンプルなフッタだけのページスタイルです。
2078 % |plain| は |book| では |plainhead|,それ以外では |plainfoot| になります。
2082 \let\@mkboth\@gobbletwo
2083 \let\@oddhead\@empty
2084 \def\@oddfoot{\normalfont\hfil\thepage\hfil}%
2085 \let\@evenhead\@empty
2086 \let\@evenfoot\@oddfoot}
2088 \let\@mkboth\@gobbletwo
2089 \let\@oddfoot\@empty
2090 \let\@evenfoot\@empty
2092 \if@mparswitch \hss \fi
2093 \hbox to \fullwidth{\textbf{\thepage}\hfil}%
2094 \if@mparswitch\else \hss \fi}%
2096 \hbox to \fullwidth{\hfil\textbf{\thepage}}\hss}}
2097 %<book>\if@report \let\ps@plain\ps@plainfoot \else \let\ps@plain\ps@plainhead \fi
2098 %<!book>\let\ps@plain\ps@plainfoot
2104 % \begin{macro}{\ps@headings}
2106 % |headings| スタイルはヘッダに見出しとページ番号を出力します。
2107 % ここではヘッダにアンダーラインを引くようにしてみました。
2115 \let\@oddfoot\@empty
2116 \let\@evenfoot\@empty
2117 \def\@evenhead{\if@mparswitch \hss \fi
2118 \underline{\hbox to \fullwidth{\textbf{\thepage}\hfil\leftmark}}%
2119 \if@mparswitch\else \hss \fi}%
2122 \hbox to \fullwidth{{\rightmark}\hfil\textbf{\thepage}}}\hss}%
2123 \let\@mkboth\markboth
2124 \def\sectionmark##1{\markboth{%
2125 \ifnum \c@secnumdepth >\z@ \thesection \hskip1\zw\fi
2127 \def\subsectionmark##1{\markright{%
2128 \ifnum \c@secnumdepth >\@ne \thesubsection \hskip1\zw\fi
2131 \else % if not twoside
2133 \let\@oddfoot\@empty
2136 \hbox to \fullwidth{{\rightmark}\hfil\textbf{\thepage}}}\hss}%
2137 \let\@mkboth\markboth
2138 \def\sectionmark##1{\markright{%
2139 \ifnum \c@secnumdepth >\z@ \thesection \hskip1\zw\fi
2146 % [2011-05-10] しっぽ愛好家さん [qa:6370] のパッチを取り込ませていただきました
2147 % (北見さん [qa:55896] のご指摘ありがとうございます)。
2151 \newif\if@omit@number
2153 \let\@oddfoot\@empty
2154 \let\@evenfoot\@empty
2156 \if@mparswitch \hss \fi
2157 \underline{\hbox to \fullwidth{\ltjsetparameter{autoxspacing={true}}
2158 \textbf{\thepage}\hfil\leftmark}}%
2159 \if@mparswitch\else \hss \fi}%
2160 \def\@oddhead{\underline{\hbox to \fullwidth{\ltjsetparameter{autoxspacing={true}}
2161 {\if@twoside\rightmark\else\leftmark\fi}\hfil\textbf{\thepage}}}\hss}%
2162 \let\@mkboth\markboth
2163 \def\chaptermark##1{\markboth{%
2164 \ifnum \c@secnumdepth >\m@ne
2166 \if@omit@number\else
2167 \@chapapp\thechapter\@chappos\hskip1\zw
2172 \def\sectionmark##1{\markright{%
2173 \ifnum \c@secnumdepth >\z@ \thesection \hskip1\zw\fi
2183 \def\@oddfoot{\normalfont\hfil\thepage\hfil}
2184 \def\@evenfoot{\normalfont\hfil\thepage\hfil}
2185 \def\@oddhead{\normalfont\hfil \@title \hfil}
2186 \def\@evenhead{\normalfont\hfil プラズマ・核融合学会誌\hfil}}
2192 % \begin{macro}{\ps@myheadings}
2194 % |myheadings| ページスタイルではユーザが |\markboth| や |\markright| で
2195 % 柱を設定するため,ここでの定義は非常に簡単です。
2197 % [2004-01-17] 渡辺徹さんのパッチを適用しました。
2200 \def\ps@myheadings{%
2201 \let\@oddfoot\@empty\let\@evenfoot\@empty
2203 \if@mparswitch \hss \fi%
2204 \hbox to \fullwidth{\thepage\hfil\leftmark}%
2205 \if@mparswitch\else \hss \fi}%
2207 \hbox to \fullwidth{\rightmark\hfil\thepage}\hss}%
2208 \let\@mkboth\@gobbletwo
2209 %<book> \let\chaptermark\@gobble
2210 \let\sectionmark\@gobble
2211 %<!book> \let\subsectionmark\@gobble
2216 % \section{文書のマークアップ}
2220 % \begin{macro}{\title}
2221 % \begin{macro}{\author}
2222 % \begin{macro}{\date}
2224 % これらは\LaTeX 本体で次のように定義されています。
2225 % ここではコメントアウトした形で示します。
2228 % \newcommand*{\title}[1]{\gdef\@title{#1}}
2229 % \newcommand*{\author}[1]{\gdef\@author{#1}}
2230 % \newcommand*{\date}[1]{\gdef\@date{#1}}
2237 % \begin{macro}{\etitle}
2238 % \begin{macro}{\eauthor}
2239 % \begin{macro}{\keywords}
2241 % 某学会誌スタイルで使う英語のタイトル,英語の著者名,キーワード,メールアドレスです。
2245 \newcommand*{\etitle}[1]{\gdef\@etitle{#1}}
2246 \newcommand*{\eauthor}[1]{\gdef\@eauthor{#1}}
2247 \newcommand*{\keywords}[1]{\gdef\@keywords{#1}}
2248 \newcommand*{\email}[1]{\gdef\authors@mail{#1}}
2249 \newcommand*{\AuthorsEmail}[1]{\gdef\authors@mail{author's e-mail:\ #1}}
2256 % \begin{macro}{\plainifnotempty}
2258 % 従来の標準クラスでは,文書全体のページスタイルを |empty| に
2259 % しても表題のあるページだけ |plain| になってしまうことが
2260 % ありました。これは |\maketitle| の定義中
2261 % に |\thispagestyle|\hspace{0pt}|{plain}| が入っている
2262 % ためです。この問題を解決するために,
2263 % 「全体のページスタイルが |empty| でないなら
2264 % このページのスタイルを |plain| にする」という次の
2268 \def\plainifnotempty{%
2269 \ifx \@oddhead \@empty
2270 \ifx \@oddfoot \@empty
2272 \thispagestyle{plainfoot}%
2275 \thispagestyle{plainhead}%
2280 % \begin{macro}{\maketitle}
2283 % 著者名を出力する部分は,欧文の標準クラスファイルでは |\large|,
2284 % 和文のものでは |\Large| になっていましたが,ここでは |\large|
2288 %<*article|book|kiyou>
2290 \newcommand{\maketitle}{%
2292 \let\footnotesize\small
2293 \let\footnoterule\relax
2294 \let\footnote\thanks
2297 {\footnotesize \@date}%
2301 {\maybeblue\hrule height0\jsc@mpt depth2\jsc@mpt\relax}\par
2305 {\maybeblue\hrule height0\jsc@mpt depth2\jsc@mpt\relax}\par
2312 {\LARGE \@title \par}%
2316 \begin{tabular}[t]{c}%
2320 {\large \@date \par}%
2326 \setcounter{footnote}{0}%
2327 \global\let\thanks\relax
2328 \global\let\maketitle\relax
2329 \global\let\@thanks\@empty
2330 \global\let\@author\@empty
2331 \global\let\@date\@empty
2332 \global\let\@title\@empty
2333 \global\let\title\relax
2334 \global\let\author\relax
2335 \global\let\date\relax
2336 \global\let\and\relax
2339 \newcommand{\maketitle}{\par
2341 \renewcommand\thefootnote{\@fnsymbol\c@footnote}%
2342 \def\@makefnmark{\rlap{\@textsuperscript{\normalfont\@thefnmark}}}%
2343 \long\def\@makefntext##1{\advance\leftskip 3\zw
2344 \parindent 1\zw\noindent
2345 \llap{\@textsuperscript{\normalfont\@thefnmark}\hskip0.3\zw}##1}%
2347 \ifnum \col@number=\@ne
2350 \twocolumn[\@maketitle]%
2354 \global\@topnum\z@ % Prevents figures from going at top of page.
2360 \setcounter{footnote}{0}%
2361 \global\let\thanks\relax
2362 \global\let\maketitle\relax
2363 \global\let\@thanks\@empty
2364 \global\let\@author\@empty
2365 \global\let\@date\@empty
2366 \global\let\@title\@empty
2367 \global\let\title\relax
2368 \global\let\author\relax
2369 \global\let\date\relax
2370 \global\let\and\relax
2375 % \begin{macro}{\@maketitle}
2377 % 独立した表題ページを作らない場合の表題の出力形式です。
2384 \let\footnote\thanks
2385 {\LARGE \@title \par}%
2389 \begin{tabular}[t]{c}%
2396 %<article|kiyou> \ifvoid\@abstractbox\else\centerline{\box\@abstractbox}\vskip1.5em\fi
2399 %</article|book|kiyou>
2401 \newcommand{\maketitle}{\par
2403 \renewcommand\thefootnote{\@fnsymbol\c@footnote}%
2404 \def\@makefnmark{\rlap{\@textsuperscript{\normalfont\@thefnmark}}}%
2405 \long\def\@makefntext##1{\advance\leftskip 3\zw
2406 \parindent 1\zw\noindent
2407 \llap{\@textsuperscript{\normalfont\@thefnmark}\hskip0.3\zw}##1}%
2408 \twocolumn[\@maketitle]%
2412 \setcounter{footnote}{0}%
2413 \global\let\thanks\relax
2414 \global\let\maketitle\relax
2415 \global\let\@thanks\@empty
2416 \global\let\@author\@empty
2417 \global\let\@date\@empty
2418 % \global\let\@title\@empty % \@title は柱に使う
2419 \global\let\title\relax
2420 \global\let\author\relax
2421 \global\let\date\relax
2422 \global\let\and\relax
2423 \ifx\authors@mail\@undefined\else{%
2424 \def\@makefntext{\advance\leftskip 3\zw \parindent -3\zw}%
2425 \footnotetext[0]{\itshape\authors@mail}%
2427 \global\let\authors@mail\@undefined}
2430 \vskip 6em % used to be 2em
2432 \let\footnote\thanks
2433 \ifx\@title\@undefined\else{\LARGE\headfont\@title\par}\fi
2435 \ifx\@author\@undefined\else
2437 \begin{tabular}[t]{c}%
2441 \ifx\@etitle\@undefined\else
2443 {\large \@etitle \par}%
2445 \ifx\@eauthor\@undefined\else
2447 \begin{tabular}[t]{c}%
2455 \centerline{\box\@abstractbox}
2456 \ifx\@keywords\@undefined\else
2458 \centerline{\parbox{157\jsc@mmm}{\textsf{Keywords:}\\ \small\@keywords}}
2469 % |\@startsection| マクロは6個の必須引数と,オプションとして |*| と
2470 % 1個のオプション引数と1個の必須引数をとります。
2473 % |\@startsection{名}{レベル}{字下げ}{前アキ}{後アキ}{スタイル}| \\
2477 % それぞれの引数の意味は次の通りです。
2479 % \begin{description}
2480 % \item[名] ユーザレベルコマンドの名前です(例: section)。
2481 % \item[レベル] 見出しの深さを示す数値です
2482 % (chapter=1, section=2, \ldots )。
2483 % この数値が |secnumdepth| 以下のとき見出し番号を出力します。
2484 % \item[字下げ] 見出しの字下げ量です。
2485 % \item[前アキ] この値の絶対値が見出し上側の空きです。
2486 % 負の場合は,見出し直後の段落をインデントしません。
2487 % \item[後アキ] 正の場合は,見出しの下の空きです。
2488 % 負の場合は,絶対値が見出しの右の空きです
2489 % (見出しと同じ行から本文を始めます)。
2490 % \item[スタイル] 見出しの文字スタイルの設定です。
2491 % \item[\texttt{*}] この \texttt{*} 印がないと,見出し番号を付け,
2492 % 見出し番号のカウンタに1を加算します。
2493 % \item[別見出し] 目次や柱に出力する見出しです。
2497 % 見出しの命令は通常 |\@startsection| とその最初の6個の引数として
2500 % 次は |\@startsection| の定義です。
2501 % 情報処理学会論文誌スタイルファイル(\texttt{ipsjcommon.sty})
2502 % を参考にさせていただきましたが,完全に行送りが |\baselineskip|
2503 % の整数倍にならなくてもいいから前の行と重ならないようにしました。
2506 \def\@startsection#1#2#3#4#5#6{%
2507 \if@noskipsec \leavevmode \fi
2509 % 見出し上の空きを \@tempskipa にセットする
2510 \@tempskipa #4\relax
2511 % \@afterindent は見出し直後の段落を字下げするかどうかを表すスイッチ
2512 \if@english \@afterindentfalse \else \@afterindenttrue \fi
2513 % 見出し上の空きが負なら見出し直後の段落を字下げしない
2514 \ifdim \@tempskipa <\z@
2515 \@tempskipa -\@tempskipa \@afterindentfalse
2520 \addpenalty\@secpenalty
2522 % \addvspace\@tempskipa
2524 \ifdim \@tempskipa >\z@
2527 \vspace*{-\baselineskip}%
2535 {\@ssect{#3}{#4}{#5}{#6}}%
2536 {\@dblarg{\@sect{#1}{#2}{#3}{#4}{#5}{#6}}}}
2539 % |\@sect| と |\@xsect| は,
2540 % 前のアキがちょうどゼロの場合にもうまくいくように,多少変えてあります。
2543 \def\@sect#1#2#3#4#5#6[#7]#8{%
2544 \ifnum #2>\c@secnumdepth
2547 \refstepcounter{#1}%
2548 \protected@edef\@svsec{\@seccntformat{#1}\relax}%
2550 % 見出し後の空きを \@tempskipa にセット
2551 \@tempskipa #5\relax
2553 \ifdim \@tempskipa<\z@
2557 \csname #1mark\endcsname{#7}%
2558 \addcontentsline{toc}{#1}{%
2559 \ifnum #2>\c@secnumdepth \else
2560 \protect\numberline{\csname the#1\endcsname}%
2562 #7}}% 目次にフルネームを載せるなら #8
2565 \interlinepenalty \@M % 下から移動
2567 \@hangfrom{\hskip #3\relax\@svsec}%
2568 % \interlinepenalty \@M % 上に移動
2571 \csname #1mark\endcsname{#7}%
2572 \addcontentsline{toc}{#1}{%
2573 \ifnum #2>\c@secnumdepth \else
2574 \protect\numberline{\csname the#1\endcsname}%
2576 #7}% 目次にフルネームを載せるならここは #8
2581 % 二つ挿入した |\everyparhook| のうち後者が |\paragraph| 類の後で2回実行され,
2584 % [2011-10-05 LTJ] Lua\TeX-jaでは |\everyparhook| は不要なので削除。
2588 % 見出しの後ろの空きを \@tempskipa にセット
2589 \@tempskipa #1\relax
2591 \ifdim \@tempskipa<\z@
2593 \global\@noskipsectrue
2596 \global\@noskipsecfalse
2597 {\setbox\z@\lastbox}%
2599 \begingroup \@svsechd \endgroup
2601 \@tempskipa #1\relax
2602 \hskip -\@tempskipa\@inhibitglue
2604 \clubpenalty \@clubpenalty
2613 {\vskip-6\jsc@mpt\maybeblue\hrule height0\jsc@mpt depth1\jsc@mpt\vskip7\jsc@mpt\relax}%
2617 \def\@ssect#1#2#3#4#5{%
2618 \@tempskipa #3\relax
2619 \ifdim \@tempskipa<\z@
2620 \def\@svsechd{#4{\hskip #1\relax #5}}%
2624 \@hangfrom{\hskip #1}%
2625 \interlinepenalty \@M #5\@@par}%
2631 % \paragraph{柱関係の命令}
2633 % \begin{macro}{\chaptermark}
2634 % \begin{macro}{\sectionmark}
2635 % \begin{macro}{\subsectionmark}
2636 % \begin{macro}{\subsubsectionmark}
2637 % \begin{macro}{\paragraphmark}
2638 % \begin{macro}{\subparagraphmark}
2640 % |\...mark| の形の命令を初期化します(第\ref{sec:pagestyle}節参照)。
2641 % |\chaptermark| 以外は\LaTeX 本体で定義済みです。
2644 \newcommand*\chaptermark[1]{}
2645 % \newcommand*{\sectionmark}[1]{}
2646 % \newcommand*{\subsectionmark}[1]{}
2647 % \newcommand*{\subsubsectionmark}[1]{}
2648 % \newcommand*{\paragraphmark}[1]{}
2649 % \newcommand*{\subparagraphmark}[1]{}
2658 % \paragraph{カウンタの定義}
2660 % \begin{macro}{\c@secnumdepth}
2662 % |secnumdepth| は第何レベルの見出しまで
2663 % 番号を付けるかを決めるカウンタです。
2666 %<!book>\setcounter{secnumdepth}{3}
2667 %<book>\setcounter{secnumdepth}{2}
2671 % \begin{macro}{\c@chapter}
2672 % \begin{macro}{\c@section}
2673 % \begin{macro}{\c@subsection}
2674 % \begin{macro}{\c@subsubsection}
2675 % \begin{macro}{\c@paragraph}
2676 % \begin{macro}{\c@subparagraph}
2679 % |\newcounter| の第1引数が新たに作るカウンタです。
2680 % これは第2引数が増加するたびに 0 に戻されます。
2685 %<book>\newcounter{chapter}
2686 %<book>\newcounter{section}[chapter]
2687 %<!book>\newcounter{section}
2688 \newcounter{subsection}[section]
2689 \newcounter{subsubsection}[subsection]
2690 \newcounter{paragraph}[subsubsection]
2691 \newcounter{subparagraph}[paragraph]
2700 % \begin{macro}{\thepart}
2701 % \begin{macro}{\thechapter}
2702 % \begin{macro}{\thesection}
2703 % \begin{macro}{\thesubsection}
2704 % \begin{macro}{\thesubsubsection}
2705 % \begin{macro}{\theparagraph}
2706 % \begin{macro}{\thesubparagraph}
2708 % カウンタの値を出力する命令 |\the何々| を定義します。
2710 % カウンタを出力するコマンドには次のものがあります。
2713 % |\arabic{COUNTER} | 1, 2, 3, \ldots \\
2714 % |\roman{COUNTER} | i, ii, iii, \ldots \\
2715 % |\Roman{COUNTER} | I, II, III, \ldots \\
2716 % |\alph{COUNTER} | a, b, c, \ldots \\
2717 % |\Alph{COUNTER} | A, B, C, \ldots \\
2718 % |\kansuji{COUNTER} | 一, 二, 三, \ldots
2721 % 以下ではスペース節約のため |@| の付いた内部表現を多用しています。
2724 \renewcommand{\thepart}{\@Roman\c@part}
2725 %<!book>% \renewcommand{\thesection}{\@arabic\c@section}
2726 %<!book>\renewcommand{\thesection}{\presectionname\@arabic\c@section\postsectionname}
2727 %<!book>\renewcommand{\thesubsection}{\@arabic\c@section.\@arabic\c@subsection}
2729 \renewcommand{\thechapter}{\@arabic\c@chapter}
2730 \renewcommand{\thesection}{\thechapter.\@arabic\c@section}
2731 \renewcommand{\thesubsection}{\thesection.\@arabic\c@subsection}
2733 \renewcommand{\thesubsubsection}{%
2734 \thesubsection.\@arabic\c@subsubsection}
2735 \renewcommand{\theparagraph}{%
2736 \thesubsubsection.\@arabic\c@paragraph}
2737 \renewcommand{\thesubparagraph}{%
2738 \theparagraph.\@arabic\c@subparagraph}
2748 % \begin{macro}{\@chapapp}
2749 % \begin{macro}{\@chappos}
2751 % |\@chapapp| の初期値は |\prechaptername|(第)です。
2753 % |\@chappos| の初期値は |\postchaptername|(章)です。
2755 % |\appendix| は |\@chapapp| を |\appendixname| に,
2756 % |\@chappos| を空に再定義します。
2758 % [2003-03-02] |\@secapp| は外しました。
2761 %<book>\newcommand{\@chapapp}{\prechaptername}
2762 %<book>\newcommand{\@chappos}{\postchaptername}
2767 % \paragraph{前付,本文,後付}
2772 % \begin{macro}{\frontmatter}
2774 % ページ番号をローマ数字にし,章番号を付けないようにします。
2778 \newcommand\frontmatter{%
2785 \pagenumbering{roman}}
2789 % \begin{macro}{\mainmatter}
2791 % ページ番号を算用数字にし,章番号を付けるようにします。
2794 \newcommand\mainmatter{%
2801 \pagenumbering{arabic}}
2805 % \begin{macro}{\backmatter}
2807 % 章番号を付けないようにします。ページ番号の付け方は変わりません。
2810 \newcommand\backmatter{%
2823 % \begin{macro}{\part}
2827 % |\secdef| を使って見出しを定義しています。
2831 % |\secdef{星なし}{星あり}|
2834 % \begin{description}
2835 % \item[星なし] \texttt{*} のない形の定義です。
2836 % \item[星あり] \texttt{*} のある形の定義です。
2839 % |\secdef| は次のようにして使います。
2842 % \def\chapter { ... \secdef \CMDA \CMDB }
2843 % \def\CMDA [#1]#2{....} % \chapter[...]{...} の定義
2844 % \def\CMDB #1{....} % \chapter*{...} の定義
2847 % まず |book| クラス以外です。
2852 \if@noskipsec \leavevmode \fi
2855 \if@english \@afterindentfalse \else \@afterindenttrue \fi
2856 \secdef\@part\@spart}
2860 % |book| スタイルの場合は,少し複雑です。
2870 \thispagestyle{empty}% 欧文用標準スタイルでは plain
2878 \secdef\@part\@spart}
2883 % \begin{macro}{\@part}
2886 % |\bfseries| を |\headfont| に変えました。
2888 % |book| クラス以外では |secnumdepth| が $-1$ より大きいとき
2894 \ifnum \c@secnumdepth >\m@ne
2895 \refstepcounter{part}%
2896 \addcontentsline{toc}{part}{%
2897 \prepartname\thepart\postpartname\hspace{1\zw}#1}%
2899 \addcontentsline{toc}{part}{#1}%
2904 \interlinepenalty \@M
2906 \ifnum \c@secnumdepth >\m@ne
2907 \Large\headfont\prepartname\thepart\postpartname
2918 % |book| クラスでは |secnumdepth| が $-2$ より大きいとき部番号を付けます。
2923 \ifnum \c@secnumdepth >-2\relax
2924 \refstepcounter{part}%
2925 \addcontentsline{toc}{part}{%
2926 \prepartname\thepart\postpartname\hspace{1\zw}#1}%
2928 \addcontentsline{toc}{part}{#1}%
2932 \interlinepenalty \@M
2934 \ifnum \c@secnumdepth >-2\relax
2935 \huge\headfont \prepartname\thepart\postpartname
2936 \par\vskip20\jsc@mpt
2938 \Huge \headfont #2\par}%
2944 % \begin{macro}{\@spart}
2951 \parindent \z@ \raggedright
2952 \interlinepenalty \@M
2954 \huge \headfont #1\par}%
2962 \interlinepenalty \@M
2964 \Huge \headfont #1\par}%
2970 % \begin{macro}{\@endpart}
2972 % |\@part| と |\@spart| の最後で実行されるマクロです。
2973 % 両面印刷のときは白ページを追加します。
2974 % 二段組のときには,二段組に戻します。
2978 \def\@endpart{\vfil\newpage
2981 \thispagestyle{empty}%
2993 % \begin{macro}{\chapter}
2995 % 章の最初のページスタイルは,全体が |empty| でなければ |plain| に
2997 % また,|\@topnum| を 0 にして,
2998 % 章見出しの上に図や表が来ないようにします。
3002 \newcommand{\chapter}{%
3003 \if@openright\cleardoublepage\else\clearpage\fi
3004 \plainifnotempty % 元: \thispagestyle{plain}
3006 \if@english \@afterindentfalse \else \@afterindenttrue \fi
3008 {\@omit@numberfalse\@chapter}%
3009 {\@omit@numbertrue\@schapter}}
3013 % \begin{macro}{\@chapter}
3016 % |secnumdepth| が0以上かつ |\@mainmatter| が真のとき章番号を出力します。
3019 \def\@chapter[#1]#2{%
3020 \ifnum \c@secnumdepth >\m@ne
3022 \refstepcounter{chapter}%
3023 \typeout{\@chapapp\thechapter\@chappos}%
3024 \addcontentsline{toc}{chapter}%
3025 {\protect\numberline
3026 % {\if@english\thechapter\else\@chapapp\thechapter\@chappos\fi}%
3027 {\@chapapp\thechapter\@chappos}%
3029 \else\addcontentsline{toc}{chapter}{#1}\fi
3031 \addcontentsline{toc}{chapter}{#1}%
3034 \addtocontents{lof}{\protect\addvspace{10\jsc@mpt}}%
3035 \addtocontents{lot}{\protect\addvspace{10\jsc@mpt}}%
3037 \@topnewpage[\@makechapterhead{#2}]%
3039 \@makechapterhead{#2}%
3045 % \begin{macro}{\@makechapterhead}
3048 % |\bfseries| を |\headfont| に変えました。
3051 \def\@makechapterhead#1{%
3052 \vspace*{2\Cvs}% 欧文は50pt
3053 {\parindent \z@ \raggedright \normalfont
3054 \ifnum \c@secnumdepth >\m@ne
3056 \huge\headfont \@chapapp\thechapter\@chappos
3058 \vskip \Cvs % 欧文は20pt
3061 \interlinepenalty\@M
3062 \Huge \headfont #1\par\nobreak
3063 \vskip 3\Cvs}} % 欧文は40pt
3067 % \begin{macro}{\@schapter}
3069 % |\chapter*{...}| コマンドの本体です。
3070 % |\chaptermark| を補いました。
3076 \@topnewpage[\@makeschapterhead{#1}]%
3078 \@makeschapterhead{#1}\@afterheading
3083 % \begin{macro}{\@makeschapterhead}
3088 \def\@makeschapterhead#1{%
3089 \vspace*{2\Cvs}% 欧文は50pt
3090 {\parindent \z@ \raggedright
3092 \interlinepenalty\@M
3093 \Huge \headfont #1\par\nobreak
3094 \vskip 3\Cvs}} % 欧文は40pt
3099 % \paragraph{下位レベルの見出し}
3101 % \begin{macro}{\section}
3103 % 欧文版では |\@startsection| の第4引数を負にして最初の段落の
3105 % 和文版では正にして字下げするようにしています。
3107 % 段組のときはなるべく左右の段が狂わないように工夫しています。
3111 \newcommand{\section}{%
3112 %<jspf>\ifx\maketitle\relax\else\maketitle\fi
3113 \@startsection{section}{1}{\z@}%
3114 %<!kiyou> {0.6\Cvs}{0.4\Cvs}%
3115 %<kiyou> {\Cvs}{0.5\Cvs}%
3116 % {\normalfont\large\headfont\@secapp}}
3117 {\normalfont\large\headfont\raggedright}}
3119 \newcommand{\section}{%
3120 \if@slide\clearpage\fi
3121 \@startsection{section}{1}{\z@}%
3122 {\Cvs \@plus.5\Cdp \@minus.2\Cdp}% 前アキ
3123 {.5\Cvs \@plus.3\Cdp}% 後アキ
3124 % {\normalfont\Large\headfont\@secapp}}
3125 {\normalfont\Large\headfont\raggedright}}
3131 % \begin{macro}{\subsection}
3137 \newcommand{\subsection}{\@startsection{subsection}{2}{\z@}%
3139 {\normalfont\normalsize\headfont}}
3141 \newcommand{\subsection}{\@startsection{subsection}{2}{\z@}%
3142 {\Cvs \@plus.5\Cdp \@minus.2\Cdp}% 前アキ
3143 {.5\Cvs \@plus.3\Cdp}% 後アキ
3144 {\normalfont\large\headfont}}
3150 % \begin{macro}{\subsubsection}
3153 \newcommand{\subsubsection}{\@startsection{subsubsection}{3}{\z@}%
3155 {\normalfont\normalsize\headfont}}
3157 \newcommand{\subsubsection}{\@startsection{subsubsection}{3}{\z@}%
3158 {\Cvs \@plus.5\Cdp \@minus.2\Cdp}%
3160 {\normalfont\normalsize\headfont}}
3165 % \begin{macro}{\paragraph}
3171 \newcommand{\paragraph}{\@startsection{paragraph}{4}{\z@}%
3172 {\z@}{-1\zw}% 改行せず 1\zw のアキ
3173 %<jspf> {\normalfont\normalsize\headfont}}
3174 %<!jspf> {\normalfont\normalsize\headfont ■}}
3176 \newcommand{\paragraph}{\@startsection{paragraph}{4}{\z@}%
3177 {0.5\Cvs \@plus.5\Cdp \@minus.2\Cdp}%
3178 {-1\zw}% 改行せず 1\zw のアキ
3179 %<jspf> {\normalfont\normalsize\headfont}}
3180 %<!jspf> {\normalfont\normalsize\headfont ■}}
3185 % \begin{macro}{\subparagraph}
3190 \newcommand{\subparagraph}{\@startsection{subparagraph}{5}{\z@}%
3192 {\normalfont\normalsize\headfont}}
3196 % \subsection{リスト環境}
3198 % 第 $k$ レベルのリストの初期化をするのが |\@list|$k$ です
3199 % ($k = \mathtt{i}, \mathtt{ii}, \mathtt{iii}, \mathtt{iv}$)。
3200 % |\@list|$k$ は |\leftmargin| を |\leftmargin|$k$ に設定します。
3202 % \begin{macro}{\leftmargini}
3204 % 二段組であるかないかに応じてそれぞれ 2em,2.5em でしたが,
3207 % [2002-05-11] |3\zw| に変更しました。
3209 % [2005-03-19] 二段組は |2\zw| に戻しました。
3213 \setlength\leftmargini{1\zw}
3216 \setlength\leftmargini{2\zw}
3218 \setlength\leftmargini{3\zw}
3224 % \begin{macro}{\leftmarginii}
3225 % \begin{macro}{\leftmarginiii}
3226 % \begin{macro}{\leftmarginiv}
3227 % \begin{macro}{\leftmarginv}
3228 % \begin{macro}{\leftmarginvi}
3230 % |ii|,|iii|,|iv| は |\labelsep| と
3231 % それぞれ `(m)',`vii.',`M.' の幅との和より大きくする
3232 % ことになっています。ここでは全角幅の整数倍に丸めました。
3236 \setlength\leftmarginii {1\zw}
3237 \setlength\leftmarginiii{1\zw}
3238 \setlength\leftmarginiv {1\zw}
3239 \setlength\leftmarginv {1\zw}
3240 \setlength\leftmarginvi {1\zw}
3242 \setlength\leftmarginii {2\zw}
3243 \setlength\leftmarginiii{2\zw}
3244 \setlength\leftmarginiv {2\zw}
3245 \setlength\leftmarginv {1\zw}
3246 \setlength\leftmarginvi {1\zw}
3255 % \begin{macro}{\labelsep}
3256 % \begin{macro}{\labelwidth}
3258 % |\labelsep| はラベルと本文の間の距離です。
3259 % |\labelwidth| はラベルの幅です。
3263 \setlength \labelsep {0.5\zw} % .5em
3264 \setlength \labelwidth{\leftmargini}
3265 \addtolength\labelwidth{-\labelsep}
3270 % \begin{macro}{\partopsep}
3273 % |\parskip| と |\topsep| に |\partopsep| を
3274 % 加えた値だけ縦方向の空白ができます。
3278 \setlength\partopsep{\z@} % {2\p@ \@plus 1\p@ \@minus 1\p@}
3282 % \begin{macro}{\@beginparpenalty}
3283 % \begin{macro}{\@endparpenalty}
3284 % \begin{macro}{\@itempenalty}
3286 % リストや段落環境の前後,リスト項目間に挿入されるペナルティです。
3289 \@beginparpenalty -\@lowpenalty
3290 \@endparpenalty -\@lowpenalty
3291 \@itempenalty -\@lowpenalty
3297 % \begin{macro}{\@listi}
3298 % \begin{macro}{\@listI}
3300 % |\@listi| は |\leftmargin|,|\parsep|,|\topsep|,|\itemsep| などの
3302 % この定義は,フォントサイズコマンドによって変更されます
3303 % (たとえば |\small| の中では小さい値に設定されます)。
3304 % このため,|\normalsize| がすべてのパラメータを戻せるように,
3305 % |\@listI| で |\@listi| のコピーを保存します。
3306 % 元の値はかなり複雑ですが,ここでは簡素化してしまいました。
3307 % 特に最初と最後に行送りの半分の空きが入るようにしてあります。
3309 % トップレベルの |itemize|,|enumerate| 環境でだけ
3310 % 最初と最後に行送りの半分の空きが入るようになっていました。
3312 % [2004-09-27] |\topsep| のグルー $_{-0.1}^{+0.2}$ |\baselineskip|
3316 \def\@listi{\leftmargin\leftmargini
3318 \topsep 0.5\baselineskip
3319 \itemsep \z@ \relax}
3323 % 念のためパラメータを初期化します(実際には不要のようです)。
3331 % \begin{macro}{\@listii}
3332 % \begin{macro}{\@listiii}
3333 % \begin{macro}{\@listiv}
3334 % \begin{macro}{\@listv}
3335 % \begin{macro}{\@listvi}
3337 % 第2〜6レベルのリスト環境のパラメータの設定です。
3340 \def\@listii{\leftmargin\leftmarginii
3341 \labelwidth\leftmarginii \advance\labelwidth-\labelsep
3345 \def\@listiii{\leftmargin\leftmarginiii
3346 \labelwidth\leftmarginiii \advance\labelwidth-\labelsep
3350 \def\@listiv {\leftmargin\leftmarginiv
3351 \labelwidth\leftmarginiv
3352 \advance\labelwidth-\labelsep}
3353 \def\@listv {\leftmargin\leftmarginv
3354 \labelwidth\leftmarginv
3355 \advance\labelwidth-\labelsep}
3356 \def\@listvi {\leftmargin\leftmarginvi
3357 \labelwidth\leftmarginvi
3358 \advance\labelwidth-\labelsep}
3366 % \paragraph{enumerate環境}
3368 % |enumerate| 環境はカウンタ |enumi|,|enumii|,|enumiii|,
3369 % |enumiv| を使います。|enum|$n$ は第 $n$ レベルの番号です。
3371 % \begin{macro}{\theenumi}
3372 % \begin{macro}{\theenumii}
3373 % \begin{macro}{\theenumiii}
3374 % \begin{macro}{\theenumiv}
3377 % これらは\LaTeX 本体(\texttt{ltlists.dtx} 参照)で定義済みですが,
3379 % |\@arabic|,|\@alph|,|\@roman|,|\@Alph| はそれぞれ
3380 % 算用数字,小文字アルファベット,小文字ローマ数字,大文字アルファベット
3384 \renewcommand{\theenumi}{\@arabic\c@enumi}
3385 \renewcommand{\theenumii}{\@alph\c@enumii}
3386 \renewcommand{\theenumiii}{\@roman\c@enumiii}
3387 \renewcommand{\theenumiv}{\@Alph\c@enumiv}
3394 % \begin{macro}{\labelenumi}
3395 % \begin{macro}{\labelenumii}
3396 % \begin{macro}{\labelenumiii}
3397 % \begin{macro}{\labelenumiv}
3399 % |enumerate| 環境の番号を出力する命令です。
3400 % 第2レベル以外は最後に欧文のピリオドが付きますが,
3401 % これは好みに応じて取り払ってください。
3402 % 第2レベルの番号のかっこは和文用に換え,
3403 % その両側に入る余分なグルーを |\inhibitglue| で
3407 \newcommand{\labelenumi}{\theenumi.}
3408 \newcommand{\labelenumii}{\inhibitglue(\theenumii)\inhibitglue}
3409 \newcommand{\labelenumiii}{\theenumiii.}
3410 \newcommand{\labelenumiv}{\theenumiv.}
3417 % \begin{macro}{\p@enumii}
3418 % \begin{macro}{\p@enumiii}
3419 % \begin{macro}{\p@enumiv}
3421 % |\p@enum|$n$ は |\ref| コマンドで |enumerate| 環境の第 $n$ レベルの
3423 % これも第2レベルは和文用かっこにしました。
3426 \renewcommand{\p@enumii}{\theenumi}
3427 \renewcommand{\p@enumiii}{\theenumi\inhibitglue(\theenumii)}
3428 \renewcommand{\p@enumiv}{\p@enumiii\theenumiii}
3434 % \paragraph{itemize環境}
3436 % \begin{macro}{\labelitemi}
3437 % \begin{macro}{\labelitemii}
3438 % \begin{macro}{\labelitemiii}
3439 % \begin{macro}{\labelitemiv}
3440 % |itemize| 環境の第 $n$ レベルのラベルを作るコマンドです。
3442 \newcommand\labelitemi{\textbullet}
3443 \newcommand\labelitemii{\normalfont\bfseries \textendash}
3444 \newcommand\labelitemiii{\textasteriskcentered}
3445 \newcommand\labelitemiv{\textperiodcentered}
3452 % \paragraph{description環境}
3454 % \begin{environment}{description}
3456 % 本来の |description| 環境では,項目名が短いと,説明部分の頭が
3457 % それに引きずられて左に出てしまいます。
3458 % これを解決した新しい |description| の実装です。
3461 \newenvironment{description}{%
3463 \labelwidth=\leftmargin
3465 \advance \labelwidth by -\labelsep
3466 \let \makelabel=\descriptionlabel}}{\endlist}
3470 % \begin{macro}{\descriptionlabel}
3472 % |description| 環境のラベルを出力するコマンドです。
3473 % 好みに応じて |#1| の前に適当な空き
3474 % (たとえば |\hspace{1\zw}|)を入れるのもいいと思います。
3477 \newcommand*\descriptionlabel[1]{\normalfont\headfont #1\hfil}
3483 % \begin{environment}{abstract}
3485 % 概要(要旨,梗概)を出力する環境です。
3486 % |book| クラスでは各章の初めにちょっとしたことを書くのに使います。
3487 % |titlepage| オプション付きの |article| クラスでは,
3489 % |abstract| 環境は元は |quotation| 環境で作られていましたが,
3490 % |quotation| 環境の右マージンをゼロにしたので,
3491 % |list| 環境で作り直しました。
3493 % JSPFスタイルでは実際の出力は |\maketitle| で行われます。
3497 \newenvironment{abstract}{%
3500 \itemindent=\listparindent
3502 \leftmargin=5\zw}\item[]}{\end{list}\vspace{\baselineskip}}
3505 \newbox\@abstractbox
3507 \newenvironment{abstract}{%
3510 \@beginparpenalty\@lowpenalty
3512 \headfont \abstractname
3515 {\par\vfil\null\endtitlepage}
3517 \newenvironment{abstract}{%
3519 \ifx\maketitle\relax
3520 \section*{\abstractname}%
3522 \global\setbox\@abstractbox\hbox\bgroup
3523 \begin{minipage}[b]{\textwidth}
3524 \small\parindent1\zw
3526 {\headfont \abstractname\vspace{-.5em}\vspace{\z@}}%
3529 \listparindent\parindent
3530 \itemindent \listparindent
3531 \rightmargin \leftmargin}%
3537 {\headfont \abstractname\vspace{-.5em}\vspace{\z@}}%
3540 \listparindent\parindent
3541 \itemindent \listparindent
3542 \rightmargin \leftmargin}%
3545 \ifx\maketitle\relax
3547 \endlist\end{minipage}\egroup
3555 \newbox\@abstractbox
3556 \newenvironment{abstract}{%
3557 \global\setbox\@abstractbox\hbox\bgroup
3558 \begin{minipage}[b]{157\jsc@mmm}{\sffamily Abstract}\par
3560 \if@english \parindent6\jsc@mmm \else \parindent1\zw \fi}%
3561 {\end{minipage}\egroup}
3568 % \begin{environment}{keywords}
3571 % 実際の出力は |\maketitle| で行われます。
3575 %\newbox\@keywordsbox
3576 %\newenvironment{keywords}{%
3577 % \global\setbox\@keywordsbox\hbox\bgroup
3578 % \begin{minipage}[b]{157\jsc@mmm}{\sffamily Keywords:}\par
3579 % \small\parindent0\zw}%
3580 % {\end{minipage}\egroup}
3585 % \paragraph{verse環境}
3587 % \begin{environment}{verse}
3589 % 詩のための |verse| 環境です。
3592 \newenvironment{verse}{%
3596 \itemindent -2\zw % 元: -1.5em
3597 \listparindent\itemindent
3599 \advance\leftmargin 2\zw}% 元: 1.5em
3600 \item\relax}{\endlist}
3604 % \paragraph{quotation環境}
3606 % \begin{environment}{quotation}
3608 % 段落の頭の字下げ量を1.5emから |\parindent| に変えました。
3609 % また,右マージンを 0 にしました。
3612 \newenvironment{quotation}{%
3614 \listparindent\parindent
3615 \itemindent\listparindent
3617 \item\relax}{\endlist}
3621 % \paragraph{quote環境}
3623 % \begin{environment}{quote}
3625 % |quote| 環境は,段落がインデントされないことを除き,
3626 % |quotation| 環境と同じです。
3629 \newenvironment{quote}%
3630 {\list{}{\rightmargin\z@}\item\relax}{\endlist}
3636 % |ltthm.dtx| 参照。たとえば次のように定義します。
3638 % \newtheorem{definition}{定義}
3639 % \newtheorem{axiom}{公理}
3640 % \newtheorem{theorem}{定理}
3643 % [2001-04-26] 定理の中はイタリック体になりましたが,
3644 % これでは和文がゴシック体になってしまうので,
3645 % |\itshape| を削除しました。
3647 % [2009-08-23] |\bfseries| を |\headfont| に直し,
3648 % |\labelsep| を |1\zw| にし,括弧を全角にしました。
3651 \def\@begintheorem#1#2{\trivlist\labelsep=1\zw
3652 \item[\hskip \labelsep{\headfont #1\ #2}]}
3653 \def\@opargbegintheorem#1#2#3{\trivlist\labelsep=1\zw
3654 \item[\hskip \labelsep{\headfont #1\ #2(#3)}]}
3657 % \begin{environment}{titlepage}
3659 % タイトルを独立のページに出力するのに使われます。
3662 \newenvironment{titlepage}{%
3663 %<book> \cleardoublepage
3665 \@restonecoltrue\onecolumn
3667 \@restonecolfalse\newpage
3669 \thispagestyle{empty}%
3670 \setcounter{page}\@ne
3672 {\if@restonecol\twocolumn \else \newpage \fi
3674 \setcounter{page}\@ne
3681 % \begin{macro}{\appendix}
3687 \newcommand{\appendix}{\par
3688 \setcounter{section}{0}%
3689 \setcounter{subsection}{0}%
3690 \gdef\presectionname{\appendixname}%
3691 \gdef\postsectionname{}%
3692 % \gdef\thesection{\@Alph\c@section}% [2003-03-02]
3693 \gdef\thesection{\presectionname\@Alph\c@section\postsectionname}%
3694 \gdef\thesubsection{\@Alph\c@section.\@arabic\c@subsection}}
3697 \newcommand{\appendix}{\par
3698 \setcounter{chapter}{0}%
3699 \setcounter{section}{0}%
3700 \gdef\@chapapp{\appendixname}%
3702 \gdef\thechapter{\@Alph\c@chapter}}
3707 % \subsection{パラメータの設定}
3709 % \paragraph{arrayとtabular環境}
3711 % \begin{macro}{\arraycolsep}
3713 % |array| 環境の列間には |\arraycolsep| の2倍の幅の空きが入ります。
3716 \setlength\arraycolsep{5\jsc@mpt}
3720 % \begin{macro}{\tabcolsep}
3722 % |tabular| 環境の列間には |\tabcolsep| の2倍の幅の空きが入ります。
3725 \setlength\tabcolsep{6\jsc@mpt}
3729 % \begin{macro}{\arrayrulewidth}
3731 % |array|,|tabular| 環境内の罫線の幅です。
3734 \setlength\arrayrulewidth{.4\jsc@mpt}
3738 % \begin{macro}{\doublerulesep}
3740 % |array|,|tabular| 環境での二重罫線間のアキです。
3743 \setlength\doublerulesep{2\jsc@mpt}
3747 % \paragraph{tabbing環境}
3749 % \begin{macro}{\tabbingsep}
3754 \setlength\tabbingsep{\labelsep}
3758 % \paragraph{minipage環境}
3760 % \begin{macro}{\@mpfootins}
3762 % |minipage| 環境の脚注の |\skip|\hspace{0pt}|\@mpfootins|
3763 % は通常のページの |\skip|\hspace{0pt}|\footins|
3767 \skip\@mpfootins = \skip\footins
3771 % \paragraph{framebox環境}
3773 % \begin{macro}{\fboxsep}
3775 % |\fbox|,|\framebox| で内側のテキストと枠との間の空きです。
3777 % \begin{macro}{\fboxrule}
3779 % |\fbox|,|\framebox| の罫線の幅です。
3782 \setlength\fboxsep{3\jsc@mpt}
3783 \setlength\fboxrule{.4\jsc@mpt}
3788 % \paragraph{equationとeqnarray環境}
3790 % \begin{macro}{\theequation}
3795 %<!book>\renewcommand \theequation {\@arabic\c@equation}
3797 \@addtoreset{equation}{chapter}
3798 \renewcommand\theequation
3799 {\ifnum \c@chapter>\z@ \thechapter.\fi \@arabic\c@equation}
3804 % \begin{macro}{\jot}
3806 % |eqnarray| の行間に余分に入るアキです。
3807 % デフォルトの値をコメントアウトして示しておきます。
3810 % \setlength\jot{3pt}
3814 % \begin{macro}{\@eqnnum}
3817 % デフォルトの値をコメントアウトして示しておきます。
3819 % |\inhibitglue(\theequation)\inhibitglue| のように和文かっこ
3823 % \def\@eqnnum{(\theequation)}
3827 % |amsmath| パッケージを使う場合は |\tagform@| を次のように修正します。
3830 % \def\tagform@#1{\maketag@@@{(\ignorespaces#1\unskip\@@italiccorr)}}
3835 % タイプ \texttt{TYPE} のフロートオブジェクトを
3837 % \begin{description}
3838 % \item[\texttt{\bslash fps@TYPE}]
3839 % フロートを置く位置(float placement specifier)です。
3840 % \item[\texttt{\bslash ftype@TYPE}]
3841 % フロートの番号です。2の累乗(1,2,4,\ldots )でなければなりません。
3842 % \item[\texttt{\bslash ext@TYPE}]
3843 % フロートの目次を出力するファイルの拡張子です。
3844 % \item[\texttt{\bslash fnum@TYPE}]
3845 % キャプション用の番号を生成するマクロです。
3846 % \item[\texttt{\bslash @makecaption}{\meta{num}}{\meta{text}}]
3848 % \meta{num} は |\fnum@...| の生成する番号,
3849 % \meta{text} はキャプションのテキストです。
3850 % テキストは適当な幅の |\parbox| に入ります。
3853 % \paragraph{figure環境}
3855 % \begin{macro}{\c@figure}
3859 % \begin{macro}{\thefigure}
3866 \renewcommand \thefigure {\@arabic\c@figure}
3869 \newcounter{figure}[chapter]
3870 \renewcommand \thefigure
3871 {\ifnum \c@chapter>\z@ \thechapter.\fi \@arabic\c@figure}
3877 % \begin{macro}{\fps@figure}
3878 % \begin{macro}{\ftype@figure}
3879 % \begin{macro}{\ext@figure}
3880 % \begin{macro}{\fnum@figure}
3882 % |figure| のパラメータです。
3883 % |\figurename| の直後に |~| が入っていましたが,
3887 \def\fps@figure{tbp}
3888 \def\ftype@figure{1}
3889 \def\ext@figure{lof}
3890 \def\fnum@figure{\figurename\nobreak\thefigure}
3897 % \begin{environment}{figure}
3898 % \begin{environment}{figure*}
3900 % |*| 形式は段抜きのフロートです。
3903 \newenvironment{figure}%
3906 \newenvironment{figure*}%
3907 {\@dblfloat{figure}}%
3913 % \paragraph{table環境}
3915 % \begin{macro}{\c@table}
3916 % \begin{macro}{\thetable}
3918 % 表番号カウンタと表番号を出力するコマンドです。
3919 % アスキー版では |\thechapter.| が |\thechapter{}・| になっていますが,
3920 % ここではオリジナルのままにしています。
3925 \renewcommand\thetable{\@arabic\c@table}
3928 \newcounter{table}[chapter]
3929 \renewcommand \thetable
3930 {\ifnum \c@chapter>\z@ \thechapter.\fi \@arabic\c@table}
3936 % \begin{macro}{\fps@table}
3937 % \begin{macro}{\ftype@table}
3938 % \begin{macro}{\ext@table}
3939 % \begin{macro}{\fnum@table}
3942 % |\tablename| の直後に |~| が入っていましたが,
3949 \def\fnum@table{\tablename\nobreak\thetable}
3956 % \begin{environment}{table}
3957 % \begin{environment}{table*}
3962 \newenvironment{table}%
3965 \newenvironment{table*}%
3966 {\@dblfloat{table}}%
3972 % \subsection{キャプション}
3974 % \begin{macro}{\@makecaption}
3976 % |\caption| コマンドにより呼び出され,
3977 % 実際にキャプションを出力するコマンドです。
3981 % \begin{macro}{\abovecaptionskip}
3982 % \begin{macro}{\belowcaptionskip}
3984 % それぞれキャプションの前後に挿入されるスペースです。
3985 % |\belowcaptionskip| が0になっていましたので,
3986 % キャプションを表の上につけた場合にキャプションと表が
3990 \newlength\abovecaptionskip
3991 \newlength\belowcaptionskip
3992 \setlength\abovecaptionskip{5\jsc@mpt} % 元: 10\p@
3993 \setlength\belowcaptionskip{5\jsc@mpt} % 元: 0\p@
3999 % オリジナルと異なり,文字サイズを |\small| にし,
4000 % キャプションの幅を2cm狭くしました。
4002 % [2003-11-05] ロジックを少し変えてみました。
4004 % [2015-05-26] |listings| パッケージを使うときに|title| を指定すると次のエラーが出るのを修正。
4006 % ! Missing number, treated as zero.
4012 % \long\def\@makecaption#1#2{{\small
4013 % \advance\leftskip10\jsc@mmm
4014 % \advance\rightskip10\jsc@mmm
4015 % \vskip\abovecaptionskip
4016 % \sbox\@tempboxa{#1{\hskip1\zw}#2}%
4017 % \ifdim \wd\@tempboxa >\hsize
4018 % #1{\hskip1\zw}#2\par
4020 % \global \@minipagefalse
4021 % \hb@xt@\hsize{\hfil\box\@tempboxa\hfil}%
4023 % \vskip\belowcaptionskip}}
4024 \long\def\@makecaption#1#2{{\small
4025 \advance\leftskip .0628\linewidth
4026 \advance\rightskip .0628\linewidth
4027 \vskip\abovecaptionskip
4028 \sbox\@tempboxa{#1{\hskip1\zw}#2}%
4029 \ifdim \wd\@tempboxa <\hsize \centering \fi
4030 #1{\hskip1\zw}#2\par
4031 \vskip\belowcaptionskip}}
4034 \long\def\@makecaption#1#2{%
4035 \vskip\abovecaptionskip
4036 \sbox\@tempboxa{\small\sffamily #1\quad #2}%
4037 \ifdim \wd\@tempboxa >\hsize
4040 \renewcommand{\makelabel}[1]{##1\hfil}
4044 \labelwidth 11\jsc@mmm
4046 \leftmargin 11\jsc@mmm}\item\relax #2\endlist}
4048 \global \@minipagefalse
4049 \hb@xt@\hsize{\hfil\box\@tempboxa\hfil}%
4051 \vskip\belowcaptionskip}
4056 % \section{フォントコマンド}
4058 % ここでは\LaTeX~2.09で使われていたコマンドを定義します。
4059 % これらはテキストモードと数式モードのどちらでも動作します。
4061 % できるだけ |\text...| と |\math...| を使ってください。
4063 % [2016-07-15] KOMA-Script中の |\scr@DeclareOldFontCommand| に倣い、
4064 % これらの命令を使うときには警告を発することにしました。
4066 % [2016-07-16] 警告を最初の一回だけ発することにしました。また,
4067 % 例外的に警告を出さないようにするスイッチも付けます。
4069 % \begin{macro}{\if@jsc@warnoldfontcmd}
4070 % \begin{macro}{\if@jsc@warnoldfontcmdexception}
4072 \newif\if@jsc@warnoldfontcmd
4073 \@jsc@warnoldfontcmdtrue
4074 \newif\if@jsc@warnoldfontcmdexception
4075 \@jsc@warnoldfontcmdexceptionfalse
4080 % \begin{macro}{\jsc@DeclareOldFontCommand}
4082 \newcommand*{\jsc@DeclareOldFontCommand}[3]{%
4083 \DeclareOldFontCommand{#1}{%
4084 \jsc@warnoldfontcmd{#1}#2%
4086 \jsc@warnoldfontcmd{#1}#3%
4089 \DeclareRobustCommand*{\jsc@warnoldfontcmd}[1]{%
4090 \if@jsc@warnoldfontcmdexception\else\if@jsc@warnoldfontcmd
4091 \ClassWarning{\jsc@clsname}{%
4092 deprecated old font command `\string#1' used.\MessageBreak
4093 You should note, that since 1994 LaTeX2e provides a\MessageBreak
4094 new font selection scheme called NFSS2 with several\MessageBreak
4095 new, combinable font commands. This \jsc@clsname\MessageBreak
4096 class has defined the old font commands like\MessageBreak
4097 `\string#1' only for compatibility%
4099 \global\@jsc@warnoldfontcmdfalse
4105 % \begin{macro}{\mc}
4106 % \begin{macro}{\gt}
4107 % \begin{macro}{\rm}
4108 % \begin{macro}{\sf}
4109 % \begin{macro}{\tt}
4114 \jsc@DeclareOldFontCommand{\mc}{\normalfont\mcfamily}{\mathmc}
4115 \jsc@DeclareOldFontCommand{\gt}{\normalfont\gtfamily}{\mathgt}
4116 \jsc@DeclareOldFontCommand{\rm}{\normalfont\rmfamily}{\mathrm}
4117 \jsc@DeclareOldFontCommand{\sf}{\normalfont\sffamily}{\mathsf}
4118 \jsc@DeclareOldFontCommand{\tt}{\normalfont\ttfamily}{\mathtt}
4126 % \begin{macro}{\bf}
4128 % ボールドシリーズにします。通常のミーディアムシリーズに戻す
4129 % コマンドは |\mdseries| です。
4132 \jsc@DeclareOldFontCommand{\bf}{\normalfont\bfseries}{\mathbf}
4136 % \begin{macro}{\it}
4137 % \begin{macro}{\sl}
4138 % \begin{macro}{\sc}
4140 % フォントシェイプを変えるコマンドです。
4141 % 斜体とスモールキャップスは数式中では何もしません
4143 % 通常のアップライト体に戻すコマンドは |\upshape| です。
4146 \jsc@DeclareOldFontCommand{\it}{\normalfont\itshape}{\mathit}
4147 \jsc@DeclareOldFontCommand{\sl}{\normalfont\slshape}{\@nomath\sl}
4148 \jsc@DeclareOldFontCommand{\sc}{\normalfont\scshape}{\@nomath\sc}
4154 % \begin{macro}{\cal}
4155 % \begin{macro}{\mit}
4157 % 数式モード以外では何もしません(警告を出します)。
4160 \DeclareRobustCommand*{\cal}{\@fontswitch\relax\mathcal}
4161 \DeclareRobustCommand*{\mit}{\@fontswitch\relax\mathnormal}
4170 % |\section| コマンドは |.toc| ファイルに次のような行を出力します。
4172 % |\contentsline{section}{タイトル}{ページ}|
4174 % たとえば |\section| に見出し番号が付く場合,上の「タイトル」は
4176 % |\numberline{番号}{見出し}|
4179 % この「番号」は |\thesection| コマンドで生成された見出し番号です。
4181 % |figure| 環境の |\caption| コマンドは |.lof| ファイルに
4184 % |\contentsline{figure}{\numberline{番号}{キャプション}{ページ}|
4186 % この「番号」は |\thefigure| コマンドで生成された図番号です。
4190 % |\contentsline{...}| は |\l@...| というコマンドを実行するので,
4191 % あらかじめ |\l@chapter|,|\l@section|,|\l@figure| などを
4193 % これらの多くは |\@dottedtocline| コマンドを使って定義します。
4196 % |\@dottedtocline{レベル}{インデント}{幅}{タイトル}{ページ}|
4199 % \begin{description}
4200 % \item[レベル] この値が |tocdepth| 以下のときだけ出力されます。
4201 % |\chapter| はレベル0,|\section| はレベル1,等々です。
4202 % \item[インデント] 左側の字下げ量です。
4203 % \item[幅] 「タイトル」に |\numberline| コマンドが含まれる場合,
4207 % \begin{macro}{\@pnumwidth}
4211 % \begin{macro}{\@tocrmarg}
4214 % |\@tocrmarg| $\ge$ |\@pnumwidth| とします。
4216 % \begin{macro}{\@dotsep}
4220 % \begin{macro}{\c@tocdepth}
4222 % 目次ページに出力する見出しレベルです。
4223 % 元は \texttt{article} で3,その他で2でしたが,
4227 \newcommand\@pnumwidth{1.55em}
4228 \newcommand\@tocrmarg{2.55em}
4229 \newcommand\@dotsep{4.5}
4230 %<!book>\setcounter{tocdepth}{2}
4231 %<book>\setcounter{tocdepth}{1}
4240 % \begin{macro}{\tableofcontents}
4244 % \begin{macro}{\jsc@tocl@width}
4246 % [2013-12-30] |\prechaptername| などから見積もった目次のラベルの長さです。(by ts)
4249 \newdimen\jsc@tocl@width
4250 \newcommand{\tableofcontents}{%
4252 \settowidth\jsc@tocl@width{\headfont\prechaptername\postchaptername}%
4253 \settowidth\@tempdima{\headfont\appendixname}%
4254 \ifdim\jsc@tocl@width<\@tempdima \setlength\jsc@tocl@width{\@tempdima}\fi
4255 \ifdim\jsc@tocl@width<2\zw \divide\jsc@tocl@width by 2 \advance\jsc@tocl@width 1\zw\fi
4257 \@restonecoltrue\onecolumn
4261 \chapter*{\contentsname}%
4262 \@mkboth{\contentsname}{}%
4265 \settowidth\jsc@tocl@width{\headfont\presectionname\postsectionname}%
4266 \settowidth\@tempdima{\headfont\appendixname}%
4267 \ifdim\jsc@tocl@width<\@tempdima\relax\setlength\jsc@tocl@width{\@tempdima}\fi
4268 \ifdim\jsc@tocl@width<2\zw \divide\jsc@tocl@width by 2 \advance\jsc@tocl@width 1\zw\fi
4269 \section*{\contentsname}%
4270 \@mkboth{\contentsname}{\contentsname}%
4273 %<book> \if@restonecol\twocolumn\fi
4276 % \end{macro}\end{macro}
4278 % \begin{macro}{\l@part}
4283 \newcommand*{\l@part}[2]{%
4284 \ifnum \c@tocdepth >-2\relax
4285 %<!book> \addpenalty\@secpenalty
4286 %<book> \addpenalty{-\@highpenalty}%
4287 \addvspace{2.25em \@plus\jsc@mpt}%
4290 % \@pnumwidth should be \@tocrmarg
4291 % \rightskip \@pnumwidth
4292 \rightskip \@tocrmarg
4293 \parfillskip -\rightskip
4296 \setlength\@lnumwidth{4\zw}%
4297 #1\hfil \hb@xt@\@pnumwidth{\hss #2}}\par
4299 %<book> \global\@nobreaktrue
4300 %<book> \everypar{\global\@nobreakfalse\everypar{}}%
4306 % \begin{macro}{\l@chapter}
4308 % 章の目次です。|\@lnumwidth| を |4.683\zw| に増やしました。
4310 % [2013-12-30] |\@lnumwidth| を |\jsc@tocl@width| から
4311 % 決めるようにしてみました。(by ts)
4315 \newcommand*{\l@chapter}[2]{%
4316 \ifnum \c@tocdepth >\m@ne
4317 \addpenalty{-\@highpenalty}%
4318 \addvspace{1.0em \@plus\jsc@mpt}
4319 % \vskip 1.0em \@plus\p@ % book.clsでは↑がこうなっている
4322 % \rightskip\@pnumwidth
4323 \rightskip\@tocrmarg
4324 \parfillskip-\rightskip
4325 \leavevmode\headfont
4326 % \if@english\setlength\@lnumwidth{5.5em}\else\setlength\@lnumwidth{4.683\zw}\fi
4327 \setlength\@lnumwidth{\jsc@tocl@width}\advance\@lnumwidth 2.683\zw
4328 \advance\leftskip\@lnumwidth \hskip-\leftskip
4329 #1\nobreak\hfil\nobreak\hbox to\@pnumwidth{\hss#2}\par
4330 \penalty\@highpenalty
4337 % \begin{macro}{\l@section}
4343 \newcommand*{\l@section}[2]{%
4344 \ifnum \c@tocdepth >\z@
4345 \addpenalty{\@secpenalty}%
4346 \addvspace{1.0em \@plus\jsc@mpt}%
4349 % \rightskip\@pnumwidth
4350 \rightskip\@tocrmarg
4351 \parfillskip-\rightskip
4352 \leavevmode\headfont
4353 %\setlength\@lnumwidth{4\zw}% 元1.5em [2003-03-02]
4354 \setlength\@lnumwidth{\jsc@tocl@width}\advance\@lnumwidth 2\zw
4355 \advance\leftskip\@lnumwidth \hskip-\leftskip
4356 #1\nobreak\hfil\nobreak\hbox to\@pnumwidth{\hss#2}\par
4362 % インデントと幅はそれぞれ1.5em,2.3emでしたが,
4363 % |1\zw|,|3.683\zw|に変えました。
4366 %<book> % \newcommand*{\l@section}{\@dottedtocline{1}{1\zw}{3.683\zw}}
4369 % [2013-12-30] 上のインデントは |\jsc@tocl@width| から決めるように
4374 % \begin{macro}{\l@subsection}
4375 % \begin{macro}{\l@subsubsection}
4376 % \begin{macro}{\l@paragraph}
4377 % \begin{macro}{\l@subparagraph}
4379 % さらに下位レベルの目次項目の体裁です。
4380 % あまり使ったことがありませんので,要修正かもしれません。
4382 % [2013-12-30] ここも |\jsc@tocl@width| から決めるように
4387 % \newcommand*{\l@subsection} {\@dottedtocline{2}{1.5em}{2.3em}}
4388 % \newcommand*{\l@subsubsection}{\@dottedtocline{3}{3.8em}{3.2em}}
4389 % \newcommand*{\l@paragraph} {\@dottedtocline{4}{7.0em}{4.1em}}
4390 % \newcommand*{\l@subparagraph} {\@dottedtocline{5}{10em}{5em}}
4392 % \newcommand*{\l@subsection} {\@dottedtocline{2}{1\zw}{3\zw}}
4393 % \newcommand*{\l@subsubsection}{\@dottedtocline{3}{2\zw}{3\zw}}
4394 % \newcommand*{\l@paragraph} {\@dottedtocline{4}{3\zw}{3\zw}}
4395 % \newcommand*{\l@subparagraph} {\@dottedtocline{5}{4\zw}{3\zw}}
4397 \newcommand*{\l@subsection}{%
4398 \@tempdima\jsc@tocl@width \advance\@tempdima -1\zw
4399 \@dottedtocline{2}{\@tempdima}{3\zw}}
4400 \newcommand*{\l@subsubsection}{%
4401 \@tempdima\jsc@tocl@width \advance\@tempdima 0\zw
4402 \@dottedtocline{3}{\@tempdima}{4\zw}}
4403 \newcommand*{\l@paragraph}{%
4404 \@tempdima\jsc@tocl@width \advance\@tempdima 1\zw
4405 \@dottedtocline{4}{\@tempdima}{5\zw}}
4406 \newcommand*{\l@subparagraph}{%
4407 \@tempdima\jsc@tocl@width \advance\@tempdima 2\zw
4408 \@dottedtocline{5}{\@tempdima}{6\zw}}
4411 % \newcommand*{\l@subsection} {\@dottedtocline{2}{3.8em}{3.2em}}
4412 % \newcommand*{\l@subsubsection}{\@dottedtocline{3}{7.0em}{4.1em}}
4413 % \newcommand*{\l@paragraph} {\@dottedtocline{4}{10em}{5em}}
4414 % \newcommand*{\l@subparagraph} {\@dottedtocline{5}{12em}{6em}}
4415 \newcommand*{\l@section}{%
4416 \@tempdima\jsc@tocl@width \advance\@tempdima -1\zw
4417 \@dottedtocline{1}{\@tempdima}{3.683\zw}}
4418 \newcommand*{\l@subsection}{%
4419 \@tempdima\jsc@tocl@width \advance\@tempdima 2.683\zw
4420 \@dottedtocline{2}{\@tempdima}{3.5\zw}}
4421 \newcommand*{\l@subsubsection}{%
4422 \@tempdima\jsc@tocl@width \advance\@tempdima 6.183\zw
4423 \@dottedtocline{3}{\@tempdima}{4.5\zw}}
4424 \newcommand*{\l@paragraph}{%
4425 \@tempdima\jsc@tocl@width \advance\@tempdima 10.683\zw
4426 \@dottedtocline{4}{\@tempdima}{5.5\zw}}
4427 \newcommand*{\l@subparagraph}{%
4428 \@tempdima\jsc@tocl@width \advance\@tempdima 16.183\zw
4429 \@dottedtocline{5}{\@tempdima}{6.5\zw}}
4437 % \begin{macro}{\numberline}
4438 % \begin{macro}{\@lnumwidth}
4440 % 欧文版\LaTeX では |\numberline{...}| は幅 |\@tempdima| の箱に左詰め
4442 % アスキー版では |\@tempdima| の代わりに |\@lnumwidth| という変数
4443 % で幅を決めるように再定義しています。
4444 % 後続文字が全角か半角かでスペースが変わらないように |\hspace|
4448 \newdimen\@lnumwidth
4449 \def\numberline#1{\hb@xt@\@lnumwidth{#1\hfil}\hspace{0pt}}
4454 % \begin{macro}{\@dottedtocline}
4456 % \LaTeX 本体(\texttt{ltsect.dtx} 参照)での定義と同じですが,
4457 % |\@tempdima| を |\@lnumwidth| に変えています。
4460 \def\@dottedtocline#1#2#3#4#5{\ifnum #1>\c@tocdepth \else
4461 \vskip \z@ \@plus.2\jsc@mpt
4462 {\leftskip #2\relax \rightskip \@tocrmarg \parfillskip -\rightskip
4463 \parindent #2\relax\@afterindenttrue
4464 \interlinepenalty\@M
4466 \@lnumwidth #3\relax
4467 \advance\leftskip \@lnumwidth \null\nobreak\hskip -\leftskip
4469 \leaders\hbox{$\m@th \mkern \@dotsep mu\hbox{.}\mkern \@dotsep
4470 mu$}\hfill \nobreak\hb@xt@\@pnumwidth{%
4471 \hfil\normalfont \normalcolor #5}\par}\fi}
4475 % \paragraph{図目次と表目次}
4477 % \begin{macro}{\listoffigures}
4482 \newcommand{\listoffigures}{%
4484 \if@twocolumn\@restonecoltrue\onecolumn
4485 \else\@restonecolfalse\fi
4486 \chapter*{\listfigurename}%
4487 \@mkboth{\listfigurename}{}%
4490 \section*{\listfigurename}%
4491 \@mkboth{\listfigurename}{\listfigurename}%
4494 %<book> \if@restonecol\twocolumn\fi
4499 % \begin{macro}{\l@figure}
4504 \newcommand*{\l@figure}{\@dottedtocline{1}{1\zw}{3.683\zw}}
4508 % \begin{macro}{\listoftables}
4513 \newcommand{\listoftables}{%
4515 \if@twocolumn\@restonecoltrue\onecolumn
4516 \else\@restonecolfalse\fi
4517 \chapter*{\listtablename}%
4518 \@mkboth{\listtablename}{}%
4521 \section*{\listtablename}%
4522 \@mkboth{\listtablename}{\listtablename}%
4525 %<book> \if@restonecol\twocolumn\fi
4530 % \begin{macro}{\l@table}
4535 \let\l@table\l@figure
4541 % \begin{macro}{\bibindent}
4543 % オープンスタイルの参考文献で使うインデント幅です。
4548 \setlength\bibindent{2\zw}
4552 % \begin{environment}{thebibliography}
4556 % [2016-07-16] \LaTeX~2.09で使われていたフォントコマンドの警告を,
4557 % 文献スタイル(.bst)ではよく |\bf| がいまだに用いられることが多いため,
4558 % |thebibliography| 環境内では例外的に出さないようにしました。
4561 \newenvironment{thebibliography}[1]{%
4562 \global\@jsc@warnoldfontcmdexceptiontrue
4563 \global\let\presectionname\relax
4564 \global\let\postsectionname\relax
4565 %<article|jspf> \section*{\refname}\@mkboth{\refname}{\refname}%
4567 \vspace{1.5\baselineskip}
4568 \subsubsection*{\refname}\@mkboth{\refname}{\refname}%
4569 \vspace{0.5\baselineskip}
4571 %<book> \chapter*{\bibname}\@mkboth{\bibname}{}%
4572 %<book> \addcontentsline{toc}{chapter}{\bibname}%
4573 \list{\@biblabel{\@arabic\c@enumiv}}%
4574 {\settowidth\labelwidth{\@biblabel{#1}}%
4575 \leftmargin\labelwidth
4576 \advance\leftmargin\labelsep
4578 \usecounter{enumiv}%
4579 \let\p@enumiv\@empty
4580 \renewcommand\theenumiv{\@arabic\c@enumiv}}%
4584 \@clubpenalty\clubpenalty
4588 {\@latex@warning{Empty `thebibliography' environment}}%
4590 \global\@jsc@warnoldfontcmdexceptionfalse}
4594 % \begin{macro}{\newblock}
4596 % |\newblock| はデフォルトでは小さなスペースを生成します。
4599 \newcommand{\newblock}{\hskip .11em\@plus.33em\@minus.07em}
4603 % \begin{macro}{\@openbib@code}
4605 % |\@openbib@code| はデフォルトでは何もしません。
4606 % この定義は |openbib| オプションによって変更されます。
4609 \let\@openbib@code\@empty
4613 % \begin{macro}{\@biblabel}
4615 % |\bibitem[...]| のラベルを作ります。
4616 % \texttt{ltbibl.dtx} の定義の半角 [] を全角[]に変え,
4617 % 余分なスペースが入らないように |\inhibitglue| ではさみました。
4618 % とりあえずコメントアウトしておきますので,必要に応じて生かしてください。
4621 % \def\@biblabel#1{\inhibitglue[#1]\inhibitglue}
4625 % \begin{macro}{\cite}
4626 % \begin{macro}{\@cite}
4627 % \begin{macro}{\@citex}
4629 % 文献の番号を出力する部分は \texttt{ltbibl.dtx} で定義されていますが,
4630 % コンマとかっこを和文フォントにするには次のようにします。
4631 % とりあえずコメントアウトしておきましたので,必要に応じて生かしてください。
4632 % かっこの前後に入るグルーを |\inhibitglue| で取っていますので,
4633 % オリジナル同様,\verb*+Knuth~\cite{knu} + のように半角空白
4637 % \def\@citex[#1]#2{%
4638 % \let\@citea\@empty
4639 % \@cite{\@for\@citeb:=#2\do
4640 % {\@citea\def\@citea{,\inhibitglue\penalty\@m\ }%
4641 % \edef\@citeb{\expandafter\@firstofone\@citeb}%
4642 % \if@filesw\immediate\write\@auxout{\string\citation{\@citeb}}\fi
4643 % \@ifundefined{b@\@citeb}{\mbox{\normalfont\bfseries ?}%
4644 % \G@refundefinedtrue
4646 % {Citation `\@citeb' on page \thepage \space undefined}}%
4647 % {\hbox{\csname b@\@citeb\endcsname}}}}{#1}}
4648 % \def\@cite#1#2{\inhibitglue[{#1\if@tempswa ,#2\fi}]\inhibitglue}
4651 % 引用番号を上ツキの 1)のようなスタイルにするには次のようにします。
4652 % |\cite| の先頭に |\unskip| を付けて先行のスペース(\verb|~| も)
4656 % \DeclareRobustCommand\cite{\unskip
4657 % \@ifnextchar [{\@tempswatrue\@citex}{\@tempswafalse\@citex[]}}
4658 % \def\@cite#1#2{$^{\hbox{\scriptsize{#1\if@tempswa
4659 % ,\inhibitglue\ #2\fi})}}$}
4667 % \begin{environment}{theindex}
4670 % 最後が偶数ページのときにマージンがずれる現象を直しました(Thanks: 藤村さん)。
4673 \newenvironment{theindex}{% 索引を3段組で出力する環境
4675 \onecolumn\@restonecolfalse
4677 \clearpage\@restonecoltrue
4679 \columnseprule.4pt \columnsep 2\zw
4680 \ifx\multicols\@undefined
4681 %<book> \twocolumn[\@makeschapterhead{\indexname}%
4682 %<book> \addcontentsline{toc}{chapter}{\indexname}]%
4683 %<!book> \def\presectionname{}\def\postsectionname{}%
4684 %<!book> \twocolumn[\section*{\indexname}]%
4686 \ifdim\textwidth<\fullwidth
4687 \setlength{\evensidemargin}{\oddsidemargin}
4688 \setlength{\textwidth}{\fullwidth}
4689 \setlength{\linewidth}{\fullwidth}
4690 %<book> \begin{multicols}{3}[\chapter*{\indexname}%
4691 %<book> \addcontentsline{toc}{chapter}{\indexname}]%
4692 %<!book> \def\presectionname{}\def\postsectionname{}%
4693 %<!book> \begin{multicols}{3}[\section*{\indexname}]%
4695 %<book> \begin{multicols}{2}[\chapter*{\indexname}%
4696 %<book> \addcontentsline{toc}{chapter}{\indexname}]%
4697 %<!book> \def\presectionname{}\def\postsectionname{}%
4698 %<!book> \begin{multicols}{2}[\section*{\indexname}]%
4701 %<book> \@mkboth{\indexname}{}%
4702 %<!book> \@mkboth{\indexname}{\indexname}%
4703 \plainifnotempty % \thispagestyle{plain}
4705 \parskip\z@ \@plus .3\jsc@mpt\relax
4708 \footnotesize\narrowbaselines
4710 \ifx\multicols\@undefined
4711 \if@restonecol\onecolumn\fi
4720 % \begin{macro}{\@idxitem}
4721 % \begin{macro}{\subitem}
4722 % \begin{macro}{\subsubitem}
4724 % 索引項目の字下げ幅です。|\@idxitem| は |\item| の項目の字下げ幅です。
4727 \newcommand{\@idxitem}{\par\hangindent 4\zw} % 元 40pt
4728 \newcommand{\subitem}{\@idxitem \hspace*{2\zw}} % 元 20pt
4729 \newcommand{\subsubitem}{\@idxitem \hspace*{3\zw}} % 元 30pt
4735 % \begin{macro}{\indexspace}
4737 % 索引で先頭文字ごとのブロックの間に入るスペースです。
4740 \newcommand{\indexspace}{\par \vskip 10\jsc@mpt \@plus5\jsc@mpt \@minus3\jsc@mpt\relax}
4744 % \begin{macro}{\seename}
4745 % \begin{macro}{\alsoname}
4747 % 索引の |\see|,|\seealso| コマンドで出力されるものです。
4748 % デフォルトはそれぞれ \emph{see},\emph{see also} という英語ですが,
4749 % ここではとりあえず両方とも「→」に変えました。
4750 % $\Rightarrow$(|$\Rightarrow$|)などでもいいでしょう。
4753 \newcommand\seename{\if@english see\else →\fi}
4754 \newcommand\alsoname{\if@english see also\else →\fi}
4761 % \begin{macro}{\footnote}
4762 % \begin{macro}{\footnotemark}
4764 % 和文の句読点・閉じかっこ類の直後で用いた際に
4766 % |\inhibitglue| を入れることにします。
4769 \let\footnotes@ve=\footnote
4770 \def\footnote{\inhibitglue\footnotes@ve}
4771 \let\footnotemarks@ve=\footnotemark
4772 \def\footnotemark{\inhibitglue\footnotemarks@ve}
4777 % \begin{macro}{\@makefnmark}
4780 % ここでは脚注番号の前に記号 $*$ を付けています。
4781 % 「注1」の形式にするには |\textasteriskcentered|
4782 % を |注\kern0.1em| にしてください。
4783 % |\@xfootnotenext| と合わせて,
4784 % もし脚注番号が空なら記号も出力しないようにしてあります。
4786 % [2002-04-09] インプリメントの仕方を変えたため消しました。
4788 % [2013-04-23] 新しい\pTeX では脚注番号のまわりにスペースが入りすぎることを防ぐため,
4789 % 北川さんのパッチ [qa:57090] を取り込みました。
4791 % [2013-05-14] plcore.ltx に倣った形に書き直しました(Thanks: 北川さん)。
4793 % [2014-07-02 LTJ] |\ifydir| を使わない形に書換えました。
4795 % [2016-07-11] コミュニティ版p\LaTeX の変更に追随しました(Thanks: 角藤さん)。
4798 \renewcommand\@makefnmark{%
4799 \unless\ifnum\ltjgetparameter{direction}=3
4800 \hbox{}\hbox{\@textsuperscript{\normalfont\@thefnmark}}\hbox{}%
4801 \else\hbox{\yoko \@textsuperscript{\normalfont\@thefnmark}}\fi}
4805 % \begin{macro}{\thefootnote}
4807 % 脚注番号に * 印が付くようにしました。
4808 % ただし,番号がゼロのときは * 印も脚注番号も付きません。
4810 % [2003-08-15] |\textasteriskcentered| ではフォントによって
4814 \def\thefootnote{\ifnum\c@footnote>\z@\leavevmode\lower.5ex\hbox{*}\@arabic\c@footnote\fi}
4817 % 「注1」の形式にするには次のようにしてください。
4820 % \def\thefootnote{\ifnum\c@footnote>\z@注\kern0.1\zw\@arabic\c@footnote\fi}
4825 % \begin{macro}{\footnoterule}
4830 \renewcommand{\footnoterule}{%
4832 \hrule width .4\columnwidth height 0.4\jsc@mpt
4837 % \begin{macro}{\c@footnote}
4839 % 脚注番号は章ごとにリセットされます。
4842 %<book>\@addtoreset{footnote}{chapter}
4846 % \begin{macro}{\@footnotetext}
4848 % 脚注で |\verb| が使えるように改変してあります。
4849 % Jeremy Gibbons, \textit{\TeX\ and TUG NEWS},
4850 % Vol.~2, No.~4 (1993), p.~9)
4853 \long\def\@footnotetext{%
4854 \insert\footins\bgroup
4855 \normalfont\footnotesize
4856 \interlinepenalty\interfootnotelinepenalty
4857 \splittopskip\footnotesep
4858 \splitmaxdepth \dp\strutbox \floatingpenalty \@MM
4859 \hsize\columnwidth \@parboxrestore
4860 \protected@edef\@currentlabel{%
4861 \csname p@footnote\endcsname\@thefnmark
4865 \rule\z@\footnotesep\ignorespaces}%
4866 \futurelet\next\fo@t}
4867 \def\fo@t{\ifcat\bgroup\noexpand\next \let\next\f@@t
4868 \else \let\next\f@t\fi \next}
4869 \def\f@@t{\bgroup\aftergroup\@foot\let\next}
4870 \def\f@t#1{#1\@foot}
4871 \def\@foot{\@finalstrut\strutbox\color@endgroup\egroup}
4875 % \begin{macro}{\@makefntext}
4878 % |\@makefnmark| は脚注の番号を出力する命令です。
4879 % ここでは脚注が左端から一定距離に来るようにしてあります。
4882 \newcommand\@makefntext[1]{%
4883 \advance\leftskip 3\zw
4886 \llap{\@makefnmark\hskip0.3\zw}#1}
4890 % \begin{macro}{\@xfootnotenext}
4892 % 最初の |\footnotetext{...}| は番号が付きません。
4893 % 著者の所属などを脚注の欄に書くときに便利です。
4895 % すでに |\footnote| を使った後なら |\footnotetext[0]{...}|
4896 % とすれば番号を付けない脚注になります。
4897 % ただし,この場合は脚注番号がリセットされてしまうので,
4900 % [2002-04-09] インプリメントの仕方を変えたため消しました。
4903 % \def\@xfootnotenext[#1]{%
4906 % \csname c@\@mpfn\endcsname #1\relax
4907 % \unrestored@protected@xdef\@thefnmark{\thempfn}%
4909 % \unrestored@protected@xdef\@thefnmark{}%
4916 % \section{段落の頭へのグルー挿入禁止}
4918 % 段落頭のかぎかっこなどを見かけ1字半下げから全角1字下げに直します。
4920 % [2012-04-24 LTJ] Lua\TeX-jaではJFMに段落開始時の括弧類の字下げ幅をコントロール
4921 % する機能がありますが,|\item| 直後ではラベル用のボックスが段落先頭になる
4922 % ため,うまく働きませんでした。形を変えて復活させます。
4927 \protected\def\@inhibitglue{\directlua{luatexja.jfmglue.create_beginpar_node()}}
4942 \addpenalty\@beginparpenalty
4944 \addvspace{-\parskip}%
4947 \addpenalty\@itempenalty
4950 \global\@inlabeltrue
4954 \global\@newlistfalse
4956 \global\@inlabelfalse
4968 \clubpenalty \@clubpenalty
4974 \refstepcounter\@listctr
4977 \sbox\@tempboxa{\makelabel{#1}}%
4978 \global\setbox\@labels\hbox{%
4983 \ifdim \wd\@tempboxa >\labelwidth
4986 \hbox to\labelwidth {\unhbox\@tempboxa}%
4992 % |\@gnewline| についてはちょっと複雑な心境です。
4993 % もともとのp\LaTeXe は段落の頭にグルーが入る方で統一されていました。
4994 % しかし |\\| の直後にはグルーが入らず,不統一でした。
4995 % そこで |\\| の直後にもグルーを入れるように直していただいた経緯があります。
4996 % しかし,ここでは逆にグルーを入れない方で統一したいので,
4999 % しかし単に戻すだけでも駄目みたいなので,ここでも最後にグルーを消しておきます。
5006 \unskip \reserved@e {\reserved@f#1}\nobreak \hfil \break \null
5007 \inhibitglue \ignorespaces
5013 % \LaTeX 関連のロゴを作り直します。
5015 % [2016-07-14] ロゴの定義は\texttt{jslogo}パッケージに移転しました。
5016 % 後方互換のため,\texttt{jsclasses}ではデフォルトでこれを読み込みます。
5018 % [2016-07-21 LTJ] \texttt{jsclasses} とLua\TeX-jaの更新タイミングが一致しない可能性を考慮し,
5019 % \texttt{jslogo}パッケージが存在しない場合は旧来の定義をそのまま使うことにしました.
5022 \IfFileExists{jslogo.sty}{%
5023 \RequirePackage{jslogo}
5025 \def\上小{\jslg@uppersmall}
5029 % 以下は\texttt{jslogo}パッケージがない場合の定義です.
5032 % \begin{macro}{\上小}
5034 % 文字を小さめに出したり上寄りに小さめに出したりする命令です。
5037 \def\小##1{\hbox{$\m@th$%
5038 \csname S@\f@size\endcsname
5039 \fontsize\sf@size\z@
5040 \math@fontsfalse\selectfont
5042 \def\上小##1{{\sbox\z@ T\vbox to\ht0{\小{##1}\vss}}}
5047 % \begin{macro}{\TeX}
5048 % \begin{macro}{\LaTeX}
5050 % これらは \texttt{ltlogos.dtx} で定義されていますが,
5051 % TimesやHelveticaでも見栄えがするように若干変更しました。
5053 % [2003-06-12] Palatinoも加えました(要調整)。
5057 \ifdim \fontdimen\@ne\font >\z@
5058 T\kern-.25em\lower.5ex\hbox{E}\kern-.125emX\@
5060 T\kern-.1667em\lower.5ex\hbox{E}\kern-.125emX\@
5063 \ifdim \fontdimen\@ne\font >\z@
5064 L\kern-.32em\上小{A}\kern-.22em\cmrTeX
5066 L\kern-.36em\上小{A}\kern-.15em\cmrTeX
5068 \def\sfTeX{T\kern-.1em\lower.4ex\hbox{E}\kern-.07emX\@}
5069 \def\sfLaTeX{L\kern-.25em\上小{A}\kern-.08em\sfTeX}
5071 \ifdim \fontdimen\@ne\font >\z@
5072 T\kern-.12em\lower.37ex\hbox{E}\kern-.02emX\@
5074 T\kern-.07em\lower.37ex\hbox{E}\kern-.05emX\@
5077 \ifdim \fontdimen\@ne\font >\z@
5078 L\kern-.2em\上小{A}\kern-.1em\ptmTeX
5080 L\kern-.3em\上小{A}\kern-.1em\ptmTeX
5083 \ifdim \fontdimen\@ne\font >\z@
5084 T\kern-.2em\lower.5ex\hbox{E}\kern-.08emX\@
5086 T\kern-.13em\lower.5ex\hbox{E}\kern-.13emX\@
5089 \ifdim \fontdimen\@ne\font >\z@
5090 L\kern-.3em\上小{A}\kern-.1em\pncTeX
5092 L\kern-.3em\上小{A}\kern-.1em\pncTeX
5095 \ifdim \fontdimen\@ne\font >\z@
5096 T\kern-.17em\lower.32ex\hbox{E}\kern-.15emX\@
5098 T\kern-.12em\lower.34ex\hbox{E}\kern-.1emX\@
5101 \ifdim \fontdimen\@ne\font >\z@
5102 L\kern-.27em\上小{A}\kern-.12em\pplTeX
5104 L\kern-.3em\上小{A}\kern-.15em\pplTeX
5107 \ifdim \fontdimen\@ne\font >\z@
5108 T\kern-.1em\lower.32ex\hbox{E}\kern-.06emX\@
5110 T\kern-.12em\lower.34ex\hbox{E}\kern-.1emX\@
5113 \ifdim \fontdimen\@ne\font >\z@
5114 L\kern-.2em\上小{A}\kern-.13em\ugmTeX
5116 L\kern-.3em\上小{A}\kern-.13em\ugmTeX
5118 \DeclareRobustCommand{\TeX}{%
5120 \ifx\f@family\@tempa\cmrTeX
5123 \ifx\f@family\@tempa\ptmTeX
5126 \ifx\f@family\@tempa\ptmTeX
5129 \ifx\f@family\@tempa\pncTeX
5132 \ifx\f@family\@tempa\pplTeX
5135 \ifx\f@family\@tempa\ugmTeX
5144 \DeclareRobustCommand{\LaTeX}{%
5146 \ifx\f@family\@tempa\cmrLaTeX
5149 \ifx\f@family\@tempa\ptmLaTeX
5152 \ifx\f@family\@tempa\ptmLaTeX
5155 \ifx\f@family\@tempa\pncLaTeX
5158 \ifx\f@family\@tempa\pplLaTeX
5161 \ifx\f@family\@tempa\ugmLaTeX
5174 % \begin{macro}{\LaTeXe}
5176 % |\LaTeXe| コマンドの |\mbox{\m@th ...| で始まる新しい定義では
5177 % 直後の和文との間に |xkanjiskip| が入りません。また,
5178 % |mathptmx| パッケージなどと併用すると,最後の $\varepsilon$ が
5179 % 下がりすぎてしまいます。そのため,ちょっと手を加えました。
5182 \DeclareRobustCommand{\LaTeXe}{$\mbox{%
5183 \if b\expandafter\@car\f@series\@nil\boldmath\fi
5184 \LaTeX\kern.15em2\raisebox{-.37ex}{$\textstyle\varepsilon$}}$}
5188 % \begin{macro}{\pTeX}
5189 % \begin{macro}{\pLaTeX}
5190 % \begin{macro}{\pLaTeXe}
5192 % \pTeX ,\pLaTeXe のロゴを出す命令です。
5195 \def\pTeX{p\kern-.05em\TeX}
5196 \def\pLaTeX{p\LaTeX}
5197 \def\pLaTeXe{p\LaTeXe}
5204 % \begin{macro}{\AmSTeX}
5206 % \texttt{amstex.sty} で定義されています。
5209 \def\AmSTeX{\protect\AmS-\protect\TeX{}}
5214 % \begin{macro}{\BibTeX}
5215 % \begin{macro}{\SliTeX}
5217 % これらは \texttt{doc.dtx} から取ったものです。
5218 % ただし,|\BibTeX| だけはちょっと修正しました。
5221 % \@ifundefined{BibTeX}
5222 % {\def\BibTeX{{\rmfamily B\kern-.05em%
5223 % \textsc{i\kern-.025em b}\kern-.08em%
5224 % T\kern-.1667em\lower.7ex\hbox{E}\kern-.125emX}}}{}
5225 \DeclareRobustCommand{\BibTeX}{B\kern-.05em\小{I\kern-.025em B}%
5226 \ifx\f@family\cmr\kern-.08em\else\kern-.15em\fi\TeX}
5227 \DeclareRobustCommand{\SliTeX}{%
5228 S\kern-.06emL\kern-.18em\上小{I}\kern -.03em\TeX}
5233 % \texttt{jslogo}パッケージがない場合の定義はここで終わりです.
5240 % \paragraph{いろいろな語}
5242 % \begin{macro}{\prepartname}
5243 % \begin{macro}{\postpartname}
5244 % \begin{macro}{\prechaptername}
5245 % \begin{macro}{\postchaptername}
5246 % \begin{macro}{\presectionname}
5247 % \begin{macro}{\postsectionname}
5249 \newcommand{\prepartname}{\if@english Part~\else 第\fi}
5250 \newcommand{\postpartname}{\if@english\else 部\fi}
5251 %<book>\newcommand{\prechaptername}{\if@english Chapter~\else 第\fi}
5252 %<book>\newcommand{\postchaptername}{\if@english\else 章\fi}
5253 \newcommand{\presectionname}{}% 第
5254 \newcommand{\postsectionname}{}% 節
5263 % \begin{macro}{\contentsname}
5264 % \begin{macro}{\listfigurename}
5265 % \begin{macro}{\listtablename}
5267 \newcommand{\contentsname}{\if@english Contents\else 目次\fi}
5268 \newcommand{\listfigurename}{\if@english List of Figures\else 図目次\fi}
5269 \newcommand{\listtablename}{\if@english List of Tables\else 表目次\fi}
5275 % \begin{macro}{\refname}
5276 % \begin{macro}{\bibname}
5277 % \begin{macro}{\indexname}
5279 \newcommand{\refname}{\if@english References\else 参考文献\fi}
5280 \newcommand{\bibname}{\if@english Bibliography\else 参考文献\fi}
5281 \newcommand{\indexname}{\if@english Index\else 索引\fi}
5287 % \begin{macro}{\figurename}
5288 % \begin{macro}{\tablename}
5290 %<!jspf>\newcommand{\figurename}{\if@english Fig.~\else 図\fi}
5291 %<jspf>\newcommand{\figurename}{Fig.~}
5292 %<!jspf>\newcommand{\tablename}{\if@english Table~\else 表\fi}
5293 %<jspf>\newcommand{\tablename}{Table~}
5298 % \begin{macro}{\appendixname}
5299 % \begin{macro}{\abstractname}
5301 % \newcommand{\appendixname}{\if@english Appendix~\else 付録\fi}
5302 \newcommand{\appendixname}{\if@english \else 付録\fi}
5303 %<!book>\newcommand{\abstractname}{\if@english Abstract\else 概要\fi}
5310 % \LaTeX で処理した日付を出力します。
5311 % |ltjarticle| などと違って,標準を西暦にし,余分な空白が入らないように改良しました。
5312 % 和暦にするには |\和暦| と書いてください。
5314 % \begin{macro}{\today}
5319 \newcount\heisei \heisei\year \advance\heisei-1988\relax
5323 January\or February\or March\or April\or May\or June\or
5324 July\or August\or September\or October\or November\or December\fi
5325 \space\number\day, \number\year
5340 % \paragraph{ハイフネーション例外}
5342 % \TeX のハイフネーションルールの補足です(ペンディング:eng-lish)
5345 \hyphenation{ado-be post-script ghost-script phe-nom-e-no-log-i-cal man-u-script}
5353 %<article|kiyou>\if@slide \pagestyle{empty} \else \pagestyle{plain} \fi
5354 %<book>\if@report \pagestyle{plain} \else \pagestyle{headings} \fi
5355 %<jspf>\pagestyle{headings}
5356 \pagenumbering{arabic}
5366 \renewcommand\kanjifamilydefault{\gtdefault}
5367 \renewcommand\familydefault{\sfdefault}
5370 \ltjsetxkanjiskip{0.1em}\relax