From e318605d00d63a8a5f31bf3e47017593958ab837 Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Thu, 5 Oct 2017 00:41:58 +0000 Subject: jsclasses (4oct17) git-svn-id: svn://tug.org/texlive/trunk@45473 c570f23f-e606-0410-a88d-b1316a301751 --- .../texmf-dist/tex/platex/jsclasses/jsarticle.cls | 116 +++++++++--------- Master/texmf-dist/tex/platex/jsclasses/jsbook.cls | 130 ++++++++++---------- Master/texmf-dist/tex/platex/jsclasses/jspf.cls | 112 ++++++++--------- .../texmf-dist/tex/platex/jsclasses/jsreport.cls | 132 +++++++++++---------- Master/texmf-dist/tex/platex/jsclasses/kiyou.cls | 116 +++++++++--------- .../texmf-dist/tex/platex/jsclasses/okumacro.sty | 53 +++++---- Master/texmf-dist/tex/platex/jsclasses/okuverb.sty | 6 +- 7 files changed, 344 insertions(+), 321 deletions(-) (limited to 'Master/texmf-dist/tex/platex/jsclasses') diff --git a/Master/texmf-dist/tex/platex/jsclasses/jsarticle.cls b/Master/texmf-dist/tex/platex/jsclasses/jsarticle.cls index e37865967e4..5b6169a8f1a 100644 --- a/Master/texmf-dist/tex/platex/jsclasses/jsarticle.cls +++ b/Master/texmf-dist/tex/platex/jsclasses/jsarticle.cls @@ -20,9 +20,12 @@ %% original source files, as listed above, are part of the %% same distribution. (The sources need not necessarily be %% in the same archive or directory.) +\ifx\epTeXinputencoding\undefined\else + \epTeXinputencoding utf8 % ^^A added (2017-10-04) +\fi \NeedsTeXFormat{pLaTeX2e} \ProvidesClass{jsarticle} - [2017/09/03 jsclasses (okumura, texjporg)] + [2017/10/04 jsclasses (okumura, texjporg)] \def\jsc@clsname{jsarticle} \newif\ifjsc@needsp@tch \jsc@needsp@tchfalse @@ -546,11 +549,11 @@ \reDeclareMathAlphabet{\mathrm}{\@mathrm}{\@mathmc} \reDeclareMathAlphabet{\mathbf}{\@mathbf}{\@mathgt}} \fi -\prebreakpenalty\jis"2147=10000 % 5000 $B!G(B -\postbreakpenalty\jis"2148=10000 % 5000 $B!H(B -\prebreakpenalty\jis"2149=10000 % 5000 $B!I(B -\inhibitxspcode`$B!*(B=1 -\inhibitxspcode`$B")(B=2 +\prebreakpenalty\jis"2147=10000 % 5000 ’ +\postbreakpenalty\jis"2148=10000 % 5000 “ +\prebreakpenalty\jis"2149=10000 % 5000 ” +\inhibitxspcode`!=1 +\inhibitxspcode`〒=2 \xspcode`+=3 \xspcode`\%=3 \xspcode`^^80=3 @@ -737,6 +740,7 @@ \setlength\Cwd{\wd0} \setlength\Cvs{\baselineskip} \setlength\Chs{\wd0} +\setbox0=\box\voidb@x \newcommand{\small}{% \ifnarrowbaselines \jsc@setfontsize\small\@ixpt{11}% @@ -1150,10 +1154,10 @@ \ifnum #2>\c@secnumdepth \else \protect\numberline{\csname the#1\endcsname}% \fi - #7}}% $BL\\c@secnumdepth \else \protect\numberline{\csname the#1\endcsname}% \fi - #7}% $BL\.(B{\jslg@small}% - \def\$B>e>.(B{\jslg@uppersmall}% + \def\小{\jslg@small}% + \def\上小{\jslg@uppersmall}% }{% \ClassWarningNoLine{\jsc@clsname}{% The redefinitions of LaTeX-related logos has\MessageBreak @@ -1870,23 +1874,23 @@ the installation}% } \fi -\newcommand{\prepartname}{\if@english Part~\else $BBh(B\fi} -\newcommand{\postpartname}{\if@english\else $BIt(B\fi} -\newcommand{\presectionname}{}% $BBh(B -\newcommand{\postsectionname}{}% $B@a(B -\newcommand{\contentsname}{\if@english Contents\else $BL\Nq(B \$B@>Nq(Btrue -\def\$B@>Nq(B{\$B@>Nq(Btrue} -\def\$BOBNq(B{\$B@>Nq(Bfalse} +\newcommand{\prepartname}{\if@english Part~\else 第\fi} +\newcommand{\postpartname}{\if@english\else 部\fi} +\newcommand{\presectionname}{}% 第 +\newcommand{\postsectionname}{}% 節 +\newcommand{\contentsname}{\if@english Contents\else 目次\fi} +\newcommand{\listfigurename}{\if@english List of Figures\else 図目次\fi} +\newcommand{\listtablename}{\if@english List of Tables\else 表目次\fi} +\newcommand{\refname}{\if@english References\else 参考文献\fi} +\newcommand{\bibname}{\if@english Bibliography\else 参考文献\fi} +\newcommand{\indexname}{\if@english Index\else 索引\fi} +\newcommand{\figurename}{\if@english Fig.~\else 図\fi} +\newcommand{\tablename}{\if@english Table~\else 表\fi} +\newcommand{\appendixname}{\if@english \else 付録\fi} +\newcommand{\abstractname}{\if@english Abstract\else 概要\fi} +\newif\if西暦 \西暦true +\def\西暦{\西暦true} +\def\和暦{\西暦false} \newcount\heisei \heisei\year \advance\heisei-1988\relax \def\today{% \if@english @@ -1895,14 +1899,14 @@ July\or August\or September\or October\or November\or December\fi \space\number\day, \number\year \else - \if$B@>Nq(B - \number\year $BG/(B - \number\month $B7n(B - \number\day $BF|(B + \if西暦 + \number\year 年 + \number\month 月 + \number\day 日 \else - $BJ?@.(B\number\heisei $BG/(B - \number\month $B7n(B - \number\day $BF|(B + 平成\number\heisei 年 + \number\month 月 + \number\day 日 \fi \fi} \hyphenation{ado-be post-script ghost-script phe-nom-e-no-log-i-cal man-u-script} diff --git a/Master/texmf-dist/tex/platex/jsclasses/jsbook.cls b/Master/texmf-dist/tex/platex/jsclasses/jsbook.cls index e4753f85d32..4bdcec88810 100644 --- a/Master/texmf-dist/tex/platex/jsclasses/jsbook.cls +++ b/Master/texmf-dist/tex/platex/jsclasses/jsbook.cls @@ -20,9 +20,12 @@ %% original source files, as listed above, are part of the %% same distribution. (The sources need not necessarily be %% in the same archive or directory.) +\ifx\epTeXinputencoding\undefined\else + \epTeXinputencoding utf8 % ^^A added (2017-10-04) +\fi \NeedsTeXFormat{pLaTeX2e} \ProvidesClass{jsbook} - [2017/09/03 jsclasses (okumura, texjporg)] + [2017/10/04 jsclasses (okumura, texjporg)] \def\jsc@clsname{jsbook} \newif\ifjsc@needsp@tch \jsc@needsp@tchfalse @@ -551,11 +554,11 @@ \reDeclareMathAlphabet{\mathrm}{\@mathrm}{\@mathmc} \reDeclareMathAlphabet{\mathbf}{\@mathbf}{\@mathgt}} \fi -\prebreakpenalty\jis"2147=10000 % 5000 $B!G(B -\postbreakpenalty\jis"2148=10000 % 5000 $B!H(B -\prebreakpenalty\jis"2149=10000 % 5000 $B!I(B -\inhibitxspcode`$B!*(B=1 -\inhibitxspcode`$B")(B=2 +\prebreakpenalty\jis"2147=10000 % 5000 ’ +\postbreakpenalty\jis"2148=10000 % 5000 “ +\prebreakpenalty\jis"2149=10000 % 5000 ” +\inhibitxspcode`!=1 +\inhibitxspcode`〒=2 \xspcode`+=3 \xspcode`\%=3 \xspcode`^^80=3 @@ -742,6 +745,7 @@ \setlength\Cwd{\wd0} \setlength\Cvs{\baselineskip} \setlength\Chs{\wd0} +\setbox0=\box\voidb@x \newcommand{\small}{% \ifnarrowbaselines \jsc@setfontsize\small\@ixpt{11}% @@ -1162,10 +1166,10 @@ \ifnum #2>\c@secnumdepth \else \protect\numberline{\csname the#1\endcsname}% \fi - #7}}% $BL\\c@secnumdepth \else \protect\numberline{\csname the#1\endcsname}% \fi - #7}% $BL\\m@ne \if@mainmatter \huge\headfont \@chapapp\thechapter\@chappos \par\nobreak - \vskip \Cvs % $B2$J8$O(B20pt + \vskip \Cvs % 欧文は20pt \fi \fi \interlinepenalty\@M \Huge \headfont #1\par\nobreak - \vskip 3\Cvs}} % $B2$J8$O(B40pt + \vskip 3\Cvs}} % 欧文は40pt \def\@schapter#1{% \chaptermark{#1}% \if@twocolumn @@ -1363,12 +1367,12 @@ \@makeschapterhead{#1}\@afterheading \fi} \def\@makeschapterhead#1{% - \vspace*{2\Cvs}% $B2$J8$O(B50pt + \vspace*{2\Cvs}% 欧文は50pt {\parindent \z@ \raggedright \normalfont \interlinepenalty\@M \Huge \headfont #1\par\nobreak - \vskip 3\Cvs}} % $B2$J8$O(B40pt + \vskip 3\Cvs}} % 欧文は40pt \if@twocolumn \newcommand{\section}{% \@startsection{section}{1}{\z@}% @@ -1378,8 +1382,8 @@ \newcommand{\section}{% \if@slide\clearpage\fi \@startsection{section}{1}{\z@}% - {\Cvs \@plus.5\Cdp \@minus.2\Cdp}% $BA0%"%-(B - {.5\Cvs \@plus.3\Cdp}% $B8e%"%-(B + {\Cvs \@plus.5\Cdp \@minus.2\Cdp}% 前アキ + {.5\Cvs \@plus.3\Cdp}% 後アキ {\normalfont\Large\headfont\raggedright}} \fi \if@twocolumn @@ -1388,8 +1392,8 @@ {\normalfont\normalsize\headfont}} \else \newcommand{\subsection}{\@startsection{subsection}{2}{\z@}% - {\Cvs \@plus.5\Cdp \@minus.2\Cdp}% $BA0%"%-(B - {.5\Cvs \@plus.3\Cdp}% $B8e%"%-(B + {\Cvs \@plus.5\Cdp \@minus.2\Cdp}% 前アキ + {.5\Cvs \@plus.3\Cdp}% 後アキ {\normalfont\large\headfont}} \fi \if@twocolumn @@ -1402,15 +1406,15 @@ {\if@slide .5\Cvs \@plus.3\Cdp \else \z@ \fi}% {\normalfont\normalsize\headfont}} \fi -\newcommand{\jsParagraphMark}{$B"#(B} +\newcommand{\jsParagraphMark}{■} \if@twocolumn \newcommand{\paragraph}{\@startsection{paragraph}{4}{\z@}% - {\z@}{\if@slide .4\Cvs \else -1zw\fi}% $B2~9T$;$:(B 1zw $B$N%"%-(B + {\z@}{\if@slide .4\Cvs \else -1zw\fi}% 改行せず 1zw のアキ {\normalfont\normalsize\headfont\jsParagraphMark}} \else \newcommand{\paragraph}{\@startsection{paragraph}{4}{\z@}% {0.5\Cvs \@plus.5\Cdp \@minus.2\Cdp}% - {\if@slide .5\Cvs \@plus.3\Cdp \else -1zw\fi}% $B2~9T$;$:(B 1zw $B$N%"%-(B + {\if@slide .5\Cvs \@plus.3\Cdp \else -1zw\fi}% 改行せず 1zw のアキ {\normalfont\normalsize\headfont\jsParagraphMark}} \fi \if@twocolumn @@ -1481,11 +1485,11 @@ \renewcommand{\theenumiii}{\@roman\c@enumiii} \renewcommand{\theenumiv}{\@Alph\c@enumiv} \newcommand{\labelenumi}{\theenumi.} -\newcommand{\labelenumii}{\inhibitglue$B!J(B\theenumii$B!K(B\inhibitglue} +\newcommand{\labelenumii}{\inhibitglue(\theenumii)\inhibitglue} \newcommand{\labelenumiii}{\theenumiii.} \newcommand{\labelenumiv}{\theenumiv.} \renewcommand{\p@enumii}{\theenumi} -\renewcommand{\p@enumiii}{\theenumi\inhibitglue$B!J(B\theenumii$B!K(B} +\renewcommand{\p@enumiii}{\theenumi\inhibitglue(\theenumii)} \renewcommand{\p@enumiv}{\p@enumiii\theenumiii} \newcommand\labelitemi{\textbullet} \newcommand\labelitemii{\normalfont\bfseries \textendash} @@ -1508,10 +1512,10 @@ \let \\=\@centercr \list{}{% \itemsep \z@ - \itemindent -2zw % $B85(B: -1.5em + \itemindent -2zw % 元: -1.5em \listparindent\itemindent \rightmargin \z@ - \advance\leftmargin 2zw}% $B85(B: 1.5em + \advance\leftmargin 2zw}% 元: 1.5em \item\relax}{\endlist} \newenvironment{quotation}{% \list{}{% @@ -1524,7 +1528,7 @@ \def\@begintheorem#1#2{\trivlist\labelsep=1zw \item[\hskip \labelsep{\headfont #1\ #2}]} \def\@opargbegintheorem#1#2#3{\trivlist\labelsep=1zw - \item[\hskip \labelsep{\headfont #1\ #2$B!J(B#3$B!K(B}]} + \item[\hskip \labelsep{\headfont #1\ #2(#3)}]} \newenvironment{titlepage}{% \pltx@cleartooddpage %% 2017-02-24 \if@twocolumn @@ -1584,8 +1588,8 @@ {\end@dblfloat} \newlength\abovecaptionskip \newlength\belowcaptionskip -\setlength\abovecaptionskip{5\jsc@mpt} % $B85(B: 10\p@ -\setlength\belowcaptionskip{5\jsc@mpt} % $B85(B: 0\p@ +\setlength\abovecaptionskip{5\jsc@mpt} % 元: 10\p@ +\setlength\belowcaptionskip{5\jsc@mpt} % 元: 0\p@ \long\def\@makecaption#1#2{{\small \advance\leftskip .0628\linewidth \advance\rightskip .0628\linewidth @@ -1731,7 +1735,7 @@ \endlist} \newcommand{\newblock}{\hskip .11em\@plus.33em\@minus.07em} \let\@openbib@code\@empty -\newenvironment{theindex}{% $B:w0z$r(B3$BCJAH$G=PNO$9$k4D6-(B +\newenvironment{theindex}{% 索引を3段組で出力する環境 \if@twocolumn \onecolumn\@restonecolfalse \else @@ -1768,12 +1772,12 @@ \fi \clearpage } -\newcommand{\@idxitem}{\par\hangindent 4zw} % $B85(B 40pt -\newcommand{\subitem}{\@idxitem \hspace*{2zw}} % $B85(B 20pt -\newcommand{\subsubitem}{\@idxitem \hspace*{3zw}} % $B85(B 30pt +\newcommand{\@idxitem}{\par\hangindent 4zw} % 元 40pt +\newcommand{\subitem}{\@idxitem \hspace*{2zw}} % 元 20pt +\newcommand{\subsubitem}{\@idxitem \hspace*{3zw}} % 元 30pt \newcommand{\indexspace}{\par \vskip 10\jsc@mpt \@plus5\jsc@mpt \@minus3\jsc@mpt\relax} -\newcommand\seename{\if@english see\else $B"*(B\fi} -\newcommand\alsoname{\if@english see also\else $B"*(B\fi} +\newcommand\seename{\if@english see\else →\fi} +\newcommand\alsoname{\if@english see also\else →\fi} \@ifl@t@r\pfmtversion{2016/09/03} {\jsc@needsp@tchfalse}{\jsc@needsp@tchtrue} \ifjsc@needsp@tch @@ -1949,8 +1953,8 @@ \if@jslogo \IfFileExists{jslogo.sty}{% \RequirePackage{jslogo}% - \def\$B>.(B{\jslg@small}% - \def\$B>e>.(B{\jslg@uppersmall}% + \def\小{\jslg@small}% + \def\上小{\jslg@uppersmall}% }{% \ClassWarningNoLine{\jsc@clsname}{% The redefinitions of LaTeX-related logos has\MessageBreak @@ -1960,24 +1964,24 @@ the installation}% } \fi -\newcommand{\prepartname}{\if@english Part~\else $BBh(B\fi} -\newcommand{\postpartname}{\if@english\else $BIt(B\fi} -\newcommand{\prechaptername}{\if@english Chapter~\else $BBh(B\fi} -\newcommand{\postchaptername}{\if@english\else $B>O(B\fi} -\newcommand{\presectionname}{}% $BBh(B -\newcommand{\postsectionname}{}% $B@a(B -\newcommand{\contentsname}{\if@english Contents\else $BL\Nq(B \$B@>Nq(Btrue -\def\$B@>Nq(B{\$B@>Nq(Btrue} -\def\$BOBNq(B{\$B@>Nq(Bfalse} +\newcommand{\prepartname}{\if@english Part~\else 第\fi} +\newcommand{\postpartname}{\if@english\else 部\fi} +\newcommand{\prechaptername}{\if@english Chapter~\else 第\fi} +\newcommand{\postchaptername}{\if@english\else 章\fi} +\newcommand{\presectionname}{}% 第 +\newcommand{\postsectionname}{}% 節 +\newcommand{\contentsname}{\if@english Contents\else 目次\fi} +\newcommand{\listfigurename}{\if@english List of Figures\else 図目次\fi} +\newcommand{\listtablename}{\if@english List of Tables\else 表目次\fi} +\newcommand{\refname}{\if@english References\else 参考文献\fi} +\newcommand{\bibname}{\if@english Bibliography\else 参考文献\fi} +\newcommand{\indexname}{\if@english Index\else 索引\fi} +\newcommand{\figurename}{\if@english Fig.~\else 図\fi} +\newcommand{\tablename}{\if@english Table~\else 表\fi} +\newcommand{\appendixname}{\if@english \else 付録\fi} +\newif\if西暦 \西暦true +\def\西暦{\西暦true} +\def\和暦{\西暦false} \newcount\heisei \heisei\year \advance\heisei-1988\relax \def\today{% \if@english @@ -1986,14 +1990,14 @@ July\or August\or September\or October\or November\or December\fi \space\number\day, \number\year \else - \if$B@>Nq(B - \number\year $BG/(B - \number\month $B7n(B - \number\day $BF|(B + \if西暦 + \number\year 年 + \number\month 月 + \number\day 日 \else - $BJ?@.(B\number\heisei $BG/(B - \number\month $B7n(B - \number\day $BF|(B + 平成\number\heisei 年 + \number\month 月 + \number\day 日 \fi \fi} \hyphenation{ado-be post-script ghost-script phe-nom-e-no-log-i-cal man-u-script} diff --git a/Master/texmf-dist/tex/platex/jsclasses/jspf.cls b/Master/texmf-dist/tex/platex/jsclasses/jspf.cls index 1b17821b75d..ea8661f5a5a 100644 --- a/Master/texmf-dist/tex/platex/jsclasses/jspf.cls +++ b/Master/texmf-dist/tex/platex/jsclasses/jspf.cls @@ -20,9 +20,12 @@ %% original source files, as listed above, are part of the %% same distribution. (The sources need not necessarily be %% in the same archive or directory.) +\ifx\epTeXinputencoding\undefined\else + \epTeXinputencoding utf8 % ^^A added (2017-10-04) +\fi \NeedsTeXFormat{pLaTeX2e} \ProvidesClass{jspf} - [2017/09/03 jsclasses (okumura, texjporg)] + [2017/10/04 jsclasses (okumura, texjporg)] \def\jsc@clsname{jspf} \newif\ifjsc@needsp@tch \jsc@needsp@tchfalse @@ -542,11 +545,11 @@ \reDeclareMathAlphabet{\mathrm}{\@mathrm}{\@mathmc} \reDeclareMathAlphabet{\mathbf}{\@mathbf}{\@mathgt}} \fi -\prebreakpenalty\jis"2147=10000 % 5000 $B!G(B -\postbreakpenalty\jis"2148=10000 % 5000 $B!H(B -\prebreakpenalty\jis"2149=10000 % 5000 $B!I(B -\inhibitxspcode`$B!*(B=1 -\inhibitxspcode`$B")(B=2 +\prebreakpenalty\jis"2147=10000 % 5000 ’ +\postbreakpenalty\jis"2148=10000 % 5000 “ +\prebreakpenalty\jis"2149=10000 % 5000 ” +\inhibitxspcode`!=1 +\inhibitxspcode`〒=2 \xspcode`+=3 \xspcode`\%=3 \xspcode`^^80=3 @@ -733,6 +736,7 @@ \setlength\Cwd{\wd0} \setlength\Cvs{\baselineskip} \setlength\Chs{\wd0} +\setbox0=\box\voidb@x \newcommand{\small}{% \ifnarrowbaselines \jsc@setfontsize\small\@ixpt{11}% @@ -896,7 +900,7 @@ \def\@oddfoot{\normalfont\hfil\thepage\hfil} \def\@evenfoot{\normalfont\hfil\thepage\hfil} \def\@oddhead{\normalfont\hfil \@title \hfil} - \def\@evenhead{\normalfont\hfil $B%W%i%:%^!&3KM;9g3X2q;o(B\hfil}} + \def\@evenhead{\normalfont\hfil プラズマ・核融合学会誌\hfil}} \def\ps@myheadings{% \let\@oddfoot\@empty\let\@evenfoot\@empty \def\@evenhead{% @@ -1023,10 +1027,10 @@ \ifnum #2>\c@secnumdepth \else \protect\numberline{\csname the#1\endcsname}% \fi - #7}}% $BL\\c@secnumdepth \else \protect\numberline{\csname the#1\endcsname}% \fi - #7}% $BL\.(B{\jslg@small}% - \def\$B>e>.(B{\jslg@uppersmall}% + \def\小{\jslg@small}% + \def\上小{\jslg@uppersmall}% }{% \ClassWarningNoLine{\jsc@clsname}{% The redefinitions of LaTeX-related logos has\MessageBreak @@ -1712,23 +1716,23 @@ the installation}% } \fi -\newcommand{\prepartname}{\if@english Part~\else $BBh(B\fi} -\newcommand{\postpartname}{\if@english\else $BIt(B\fi} -\newcommand{\presectionname}{}% $BBh(B -\newcommand{\postsectionname}{}% $B@a(B -\newcommand{\contentsname}{\if@english Contents\else $BL\Nq(B \$B@>Nq(Btrue -\def\$B@>Nq(B{\$B@>Nq(Btrue} -\def\$BOBNq(B{\$B@>Nq(Bfalse} +\newcommand{\appendixname}{\if@english \else 付録\fi} +\newcommand{\abstractname}{\if@english Abstract\else 概要\fi} +\newif\if西暦 \西暦true +\def\西暦{\西暦true} +\def\和暦{\西暦false} \newcount\heisei \heisei\year \advance\heisei-1988\relax \def\today{% \if@english @@ -1737,14 +1741,14 @@ July\or August\or September\or October\or November\or December\fi \space\number\day, \number\year \else - \if$B@>Nq(B - \number\year $BG/(B - \number\month $B7n(B - \number\day $BF|(B + \if西暦 + \number\year 年 + \number\month 月 + \number\day 日 \else - $BJ?@.(B\number\heisei $BG/(B - \number\month $B7n(B - \number\day $BF|(B + 平成\number\heisei 年 + \number\month 月 + \number\day 日 \fi \fi} \hyphenation{ado-be post-script ghost-script phe-nom-e-no-log-i-cal man-u-script} diff --git a/Master/texmf-dist/tex/platex/jsclasses/jsreport.cls b/Master/texmf-dist/tex/platex/jsclasses/jsreport.cls index 04eb783f8e0..d03cbed37d6 100644 --- a/Master/texmf-dist/tex/platex/jsclasses/jsreport.cls +++ b/Master/texmf-dist/tex/platex/jsclasses/jsreport.cls @@ -20,9 +20,12 @@ %% original source files, as listed above, are part of the %% same distribution. (The sources need not necessarily be %% in the same archive or directory.) +\ifx\epTeXinputencoding\undefined\else + \epTeXinputencoding utf8 % ^^A added (2017-10-04) +\fi \NeedsTeXFormat{pLaTeX2e} \ProvidesClass{jsreport} - [2017/09/03 jsclasses (okumura, texjporg)] + [2017/10/04 jsclasses (okumura, texjporg)] \def\jsc@clsname{jsreport} \newif\ifjsc@needsp@tch \jsc@needsp@tchfalse @@ -547,11 +550,11 @@ \reDeclareMathAlphabet{\mathrm}{\@mathrm}{\@mathmc} \reDeclareMathAlphabet{\mathbf}{\@mathbf}{\@mathgt}} \fi -\prebreakpenalty\jis"2147=10000 % 5000 $B!G(B -\postbreakpenalty\jis"2148=10000 % 5000 $B!H(B -\prebreakpenalty\jis"2149=10000 % 5000 $B!I(B -\inhibitxspcode`$B!*(B=1 -\inhibitxspcode`$B")(B=2 +\prebreakpenalty\jis"2147=10000 % 5000 ’ +\postbreakpenalty\jis"2148=10000 % 5000 “ +\prebreakpenalty\jis"2149=10000 % 5000 ” +\inhibitxspcode`!=1 +\inhibitxspcode`〒=2 \xspcode`+=3 \xspcode`\%=3 \xspcode`^^80=3 @@ -738,6 +741,7 @@ \setlength\Cwd{\wd0} \setlength\Cvs{\baselineskip} \setlength\Chs{\wd0} +\setbox0=\box\voidb@x \newcommand{\small}{% \ifnarrowbaselines \jsc@setfontsize\small\@ixpt{11}% @@ -1135,10 +1139,10 @@ \ifnum #2>\c@secnumdepth \else \protect\numberline{\csname the#1\endcsname}% \fi - #7}}% $BL\\c@secnumdepth \else \protect\numberline{\csname the#1\endcsname}% \fi - #7}% $BL\\m@ne \huge\headfont \@chapapp\thechapter\@chappos \par\nobreak - \vskip \Cvs % $B2$J8$O(B20pt + \vskip \Cvs % 欧文は20pt \fi \interlinepenalty\@M \Huge \headfont #1\par\nobreak - \vskip 3\Cvs}} % $B2$J8$O(B40pt + \vskip 3\Cvs}} % 欧文は40pt \def\@schapter#1{% \chaptermark{#1}% \if@twocolumn @@ -1315,12 +1319,12 @@ \@makeschapterhead{#1}\@afterheading \fi} \def\@makeschapterhead#1{% - \vspace*{2\Cvs}% $B2$J8$O(B50pt + \vspace*{2\Cvs}% 欧文は50pt {\parindent \z@ \raggedright \normalfont \interlinepenalty\@M \Huge \headfont #1\par\nobreak - \vskip 3\Cvs}} % $B2$J8$O(B40pt + \vskip 3\Cvs}} % 欧文は40pt \if@twocolumn \newcommand{\section}{% \@startsection{section}{1}{\z@}% @@ -1330,8 +1334,8 @@ \newcommand{\section}{% \if@slide\clearpage\fi \@startsection{section}{1}{\z@}% - {\Cvs \@plus.5\Cdp \@minus.2\Cdp}% $BA0%"%-(B - {.5\Cvs \@plus.3\Cdp}% $B8e%"%-(B + {\Cvs \@plus.5\Cdp \@minus.2\Cdp}% 前アキ + {.5\Cvs \@plus.3\Cdp}% 後アキ {\normalfont\Large\headfont\raggedright}} \fi \if@twocolumn @@ -1340,8 +1344,8 @@ {\normalfont\normalsize\headfont}} \else \newcommand{\subsection}{\@startsection{subsection}{2}{\z@}% - {\Cvs \@plus.5\Cdp \@minus.2\Cdp}% $BA0%"%-(B - {.5\Cvs \@plus.3\Cdp}% $B8e%"%-(B + {\Cvs \@plus.5\Cdp \@minus.2\Cdp}% 前アキ + {.5\Cvs \@plus.3\Cdp}% 後アキ {\normalfont\large\headfont}} \fi \if@twocolumn @@ -1354,15 +1358,15 @@ {\if@slide .5\Cvs \@plus.3\Cdp \else \z@ \fi}% {\normalfont\normalsize\headfont}} \fi -\newcommand{\jsParagraphMark}{$B"#(B} +\newcommand{\jsParagraphMark}{■} \if@twocolumn \newcommand{\paragraph}{\@startsection{paragraph}{4}{\z@}% - {\z@}{\if@slide .4\Cvs \else -1zw\fi}% $B2~9T$;$:(B 1zw $B$N%"%-(B + {\z@}{\if@slide .4\Cvs \else -1zw\fi}% 改行せず 1zw のアキ {\normalfont\normalsize\headfont\jsParagraphMark}} \else \newcommand{\paragraph}{\@startsection{paragraph}{4}{\z@}% {0.5\Cvs \@plus.5\Cdp \@minus.2\Cdp}% - {\if@slide .5\Cvs \@plus.3\Cdp \else -1zw\fi}% $B2~9T$;$:(B 1zw $B$N%"%-(B + {\if@slide .5\Cvs \@plus.3\Cdp \else -1zw\fi}% 改行せず 1zw のアキ {\normalfont\normalsize\headfont\jsParagraphMark}} \fi \if@twocolumn @@ -1433,11 +1437,11 @@ \renewcommand{\theenumiii}{\@roman\c@enumiii} \renewcommand{\theenumiv}{\@Alph\c@enumiv} \newcommand{\labelenumi}{\theenumi.} -\newcommand{\labelenumii}{\inhibitglue$B!J(B\theenumii$B!K(B\inhibitglue} +\newcommand{\labelenumii}{\inhibitglue(\theenumii)\inhibitglue} \newcommand{\labelenumiii}{\theenumiii.} \newcommand{\labelenumiv}{\theenumiv.} \renewcommand{\p@enumii}{\theenumi} -\renewcommand{\p@enumiii}{\theenumi\inhibitglue$B!J(B\theenumii$B!K(B} +\renewcommand{\p@enumiii}{\theenumi\inhibitglue(\theenumii)} \renewcommand{\p@enumiv}{\p@enumiii\theenumiii} \newcommand\labelitemi{\textbullet} \newcommand\labelitemii{\normalfont\bfseries \textendash} @@ -1502,10 +1506,10 @@ \let \\=\@centercr \list{}{% \itemsep \z@ - \itemindent -2zw % $B85(B: -1.5em + \itemindent -2zw % 元: -1.5em \listparindent\itemindent \rightmargin \z@ - \advance\leftmargin 2zw}% $B85(B: 1.5em + \advance\leftmargin 2zw}% 元: 1.5em \item\relax}{\endlist} \newenvironment{quotation}{% \list{}{% @@ -1518,7 +1522,7 @@ \def\@begintheorem#1#2{\trivlist\labelsep=1zw \item[\hskip \labelsep{\headfont #1\ #2}]} \def\@opargbegintheorem#1#2#3{\trivlist\labelsep=1zw - \item[\hskip \labelsep{\headfont #1\ #2$B!J(B#3$B!K(B}]} + \item[\hskip \labelsep{\headfont #1\ #2(#3)}]} \newenvironment{titlepage}{% \if@twocolumn \@restonecoltrue\onecolumn @@ -1577,8 +1581,8 @@ {\end@dblfloat} \newlength\abovecaptionskip \newlength\belowcaptionskip -\setlength\abovecaptionskip{5\jsc@mpt} % $B85(B: 10\p@ -\setlength\belowcaptionskip{5\jsc@mpt} % $B85(B: 0\p@ +\setlength\abovecaptionskip{5\jsc@mpt} % 元: 10\p@ +\setlength\belowcaptionskip{5\jsc@mpt} % 元: 0\p@ \long\def\@makecaption#1#2{{\small \advance\leftskip .0628\linewidth \advance\rightskip .0628\linewidth @@ -1724,7 +1728,7 @@ \endlist} \newcommand{\newblock}{\hskip .11em\@plus.33em\@minus.07em} \let\@openbib@code\@empty -\newenvironment{theindex}{% $B:w0z$r(B3$BCJAH$G=PNO$9$k4D6-(B +\newenvironment{theindex}{% 索引を3段組で出力する環境 \if@twocolumn \onecolumn\@restonecolfalse \else @@ -1761,12 +1765,12 @@ \fi \clearpage } -\newcommand{\@idxitem}{\par\hangindent 4zw} % $B85(B 40pt -\newcommand{\subitem}{\@idxitem \hspace*{2zw}} % $B85(B 20pt -\newcommand{\subsubitem}{\@idxitem \hspace*{3zw}} % $B85(B 30pt +\newcommand{\@idxitem}{\par\hangindent 4zw} % 元 40pt +\newcommand{\subitem}{\@idxitem \hspace*{2zw}} % 元 20pt +\newcommand{\subsubitem}{\@idxitem \hspace*{3zw}} % 元 30pt \newcommand{\indexspace}{\par \vskip 10\jsc@mpt \@plus5\jsc@mpt \@minus3\jsc@mpt\relax} -\newcommand\seename{\if@english see\else $B"*(B\fi} -\newcommand\alsoname{\if@english see also\else $B"*(B\fi} +\newcommand\seename{\if@english see\else →\fi} +\newcommand\alsoname{\if@english see also\else →\fi} \@ifl@t@r\pfmtversion{2016/09/03} {\jsc@needsp@tchfalse}{\jsc@needsp@tchtrue} \ifjsc@needsp@tch @@ -1942,8 +1946,8 @@ \if@jslogo \IfFileExists{jslogo.sty}{% \RequirePackage{jslogo}% - \def\$B>.(B{\jslg@small}% - \def\$B>e>.(B{\jslg@uppersmall}% + \def\小{\jslg@small}% + \def\上小{\jslg@uppersmall}% }{% \ClassWarningNoLine{\jsc@clsname}{% The redefinitions of LaTeX-related logos has\MessageBreak @@ -1953,25 +1957,25 @@ the installation}% } \fi -\newcommand{\prepartname}{\if@english Part~\else $BBh(B\fi} -\newcommand{\postpartname}{\if@english\else $BIt(B\fi} -\newcommand{\prechaptername}{\if@english Chapter~\else $BBh(B\fi} -\newcommand{\postchaptername}{\if@english\else $B>O(B\fi} -\newcommand{\presectionname}{}% $BBh(B -\newcommand{\postsectionname}{}% $B@a(B -\newcommand{\contentsname}{\if@english Contents\else $BL\Nq(B \$B@>Nq(Btrue -\def\$B@>Nq(B{\$B@>Nq(Btrue} -\def\$BOBNq(B{\$B@>Nq(Bfalse} +\newcommand{\prepartname}{\if@english Part~\else 第\fi} +\newcommand{\postpartname}{\if@english\else 部\fi} +\newcommand{\prechaptername}{\if@english Chapter~\else 第\fi} +\newcommand{\postchaptername}{\if@english\else 章\fi} +\newcommand{\presectionname}{}% 第 +\newcommand{\postsectionname}{}% 節 +\newcommand{\contentsname}{\if@english Contents\else 目次\fi} +\newcommand{\listfigurename}{\if@english List of Figures\else 図目次\fi} +\newcommand{\listtablename}{\if@english List of Tables\else 表目次\fi} +\newcommand{\refname}{\if@english References\else 参考文献\fi} +\newcommand{\bibname}{\if@english Bibliography\else 参考文献\fi} +\newcommand{\indexname}{\if@english Index\else 索引\fi} +\newcommand{\figurename}{\if@english Fig.~\else 図\fi} +\newcommand{\tablename}{\if@english Table~\else 表\fi} +\newcommand{\appendixname}{\if@english \else 付録\fi} +\newcommand{\abstractname}{\if@english Abstract\else 概要\fi} +\newif\if西暦 \西暦true +\def\西暦{\西暦true} +\def\和暦{\西暦false} \newcount\heisei \heisei\year \advance\heisei-1988\relax \def\today{% \if@english @@ -1980,14 +1984,14 @@ July\or August\or September\or October\or November\or December\fi \space\number\day, \number\year \else - \if$B@>Nq(B - \number\year $BG/(B - \number\month $B7n(B - \number\day $BF|(B + \if西暦 + \number\year 年 + \number\month 月 + \number\day 日 \else - $BJ?@.(B\number\heisei $BG/(B - \number\month $B7n(B - \number\day $BF|(B + 平成\number\heisei 年 + \number\month 月 + \number\day 日 \fi \fi} \hyphenation{ado-be post-script ghost-script phe-nom-e-no-log-i-cal man-u-script} diff --git a/Master/texmf-dist/tex/platex/jsclasses/kiyou.cls b/Master/texmf-dist/tex/platex/jsclasses/kiyou.cls index 33552496e83..2356cb6f1ce 100644 --- a/Master/texmf-dist/tex/platex/jsclasses/kiyou.cls +++ b/Master/texmf-dist/tex/platex/jsclasses/kiyou.cls @@ -20,9 +20,12 @@ %% original source files, as listed above, are part of the %% same distribution. (The sources need not necessarily be %% in the same archive or directory.) +\ifx\epTeXinputencoding\undefined\else + \epTeXinputencoding utf8 % ^^A added (2017-10-04) +\fi \NeedsTeXFormat{pLaTeX2e} \ProvidesClass{kiyou} - [2017/09/03 jsclasses (okumura, texjporg)] + [2017/10/04 jsclasses (okumura, texjporg)] \def\jsc@clsname{kiyou} \newif\ifjsc@needsp@tch \jsc@needsp@tchfalse @@ -553,11 +556,11 @@ \reDeclareMathAlphabet{\mathrm}{\@mathrm}{\@mathmc} \reDeclareMathAlphabet{\mathbf}{\@mathbf}{\@mathgt}} \fi -\prebreakpenalty\jis"2147=10000 % 5000 $B!G(B -\postbreakpenalty\jis"2148=10000 % 5000 $B!H(B -\prebreakpenalty\jis"2149=10000 % 5000 $B!I(B -\inhibitxspcode`$B!*(B=1 -\inhibitxspcode`$B")(B=2 +\prebreakpenalty\jis"2147=10000 % 5000 ’ +\postbreakpenalty\jis"2148=10000 % 5000 “ +\prebreakpenalty\jis"2149=10000 % 5000 ” +\inhibitxspcode`!=1 +\inhibitxspcode`〒=2 \xspcode`+=3 \xspcode`\%=3 \xspcode`^^80=3 @@ -744,6 +747,7 @@ \setlength\Cwd{\wd0} \setlength\Cvs{\baselineskip} \setlength\Chs{\wd0} +\setbox0=\box\voidb@x \newcommand{\small}{% \ifnarrowbaselines \jsc@setfontsize\small{8.8888}{11}% @@ -1105,10 +1109,10 @@ \ifnum #2>\c@secnumdepth \else \protect\numberline{\csname the#1\endcsname}% \fi - #7}}% $BL\\c@secnumdepth \else \protect\numberline{\csname the#1\endcsname}% \fi - #7}% $BL\.(B{\jslg@small}% - \def\$B>e>.(B{\jslg@uppersmall}% + \def\小{\jslg@small}% + \def\上小{\jslg@uppersmall}% }{% \ClassWarningNoLine{\jsc@clsname}{% The redefinitions of LaTeX-related logos has\MessageBreak @@ -1828,23 +1832,23 @@ the installation}% } \fi -\newcommand{\prepartname}{\if@english Part~\else $BBh(B\fi} -\newcommand{\postpartname}{\if@english\else $BIt(B\fi} -\newcommand{\presectionname}{}% $BBh(B -\newcommand{\postsectionname}{}% $B@a(B -\newcommand{\contentsname}{\if@english Contents\else $BL\Nq(B \$B@>Nq(Btrue -\def\$B@>Nq(B{\$B@>Nq(Btrue} -\def\$BOBNq(B{\$B@>Nq(Bfalse} +\newcommand{\prepartname}{\if@english Part~\else 第\fi} +\newcommand{\postpartname}{\if@english\else 部\fi} +\newcommand{\presectionname}{}% 第 +\newcommand{\postsectionname}{}% 節 +\newcommand{\contentsname}{\if@english Contents\else 目次\fi} +\newcommand{\listfigurename}{\if@english List of Figures\else 図目次\fi} +\newcommand{\listtablename}{\if@english List of Tables\else 表目次\fi} +\newcommand{\refname}{\if@english References\else 参考文献\fi} +\newcommand{\bibname}{\if@english Bibliography\else 参考文献\fi} +\newcommand{\indexname}{\if@english Index\else 索引\fi} +\newcommand{\figurename}{\if@english Fig.~\else 図\fi} +\newcommand{\tablename}{\if@english Table~\else 表\fi} +\newcommand{\appendixname}{\if@english \else 付録\fi} +\newcommand{\abstractname}{\if@english Abstract\else 概要\fi} +\newif\if西暦 \西暦true +\def\西暦{\西暦true} +\def\和暦{\西暦false} \newcount\heisei \heisei\year \advance\heisei-1988\relax \def\today{% \if@english @@ -1853,14 +1857,14 @@ July\or August\or September\or October\or November\or December\fi \space\number\day, \number\year \else - \if$B@>Nq(B - \number\year $BG/(B - \number\month $B7n(B - \number\day $BF|(B + \if西暦 + \number\year 年 + \number\month 月 + \number\day 日 \else - $BJ?@.(B\number\heisei $BG/(B - \number\month $B7n(B - \number\day $BF|(B + 平成\number\heisei 年 + \number\month 月 + \number\day 日 \fi \fi} \hyphenation{ado-be post-script ghost-script phe-nom-e-no-log-i-cal man-u-script} diff --git a/Master/texmf-dist/tex/platex/jsclasses/okumacro.sty b/Master/texmf-dist/tex/platex/jsclasses/okumacro.sty index 245ac4981ef..9dc2e29cb68 100644 --- a/Master/texmf-dist/tex/platex/jsclasses/okumacro.sty +++ b/Master/texmf-dist/tex/platex/jsclasses/okumacro.sty @@ -20,8 +20,11 @@ %% original source files, as listed above, are part of the %% same distribution. (The sources need not necessarily be %% in the same archive or directory.) +\ifx\epTeXinputencoding\undefined\else + \epTeXinputencoding utf8 % ^^A added (2017-10-04) +\fi \NeedsTeXFormat{pLaTeX2e} -\ProvidesPackage{okumacro}[2017/08/31 okumura, texjporg] +\ProvidesPackage{okumacro}[2017/10/04 okumura, texjporg] \providecommand{\rubyfamily}{} \def\kanjistrut{\iftdir \vrule \@height0.5zw \@depth0.5zw \@width\z@ @@ -61,7 +64,7 @@ \def\kenten#1{% \okumacro@zsp \kern-1zw\relax - \setbox1=\hbox to \z@{$B!&(B\hss}% + \setbox1=\hbox to\z@{\hbox to 1zw{\hss ・\hss}\hss}% \ht1=.63zw \@kenten#1\end\relax \kern-1zw\relax\okumacro@zsp} @@ -76,7 +79,7 @@ \kanjiskip=0pt plus 1fil minus 1fil \xkanjiskip=\kanjiskip #2}} -\newcommand{\$BMK(B}{{\@tempcnta=\year \@tempcntb=\month +\newcommand{\曜}{{\@tempcnta=\year \@tempcntb=\month \ifnum \@tempcntb<3 \advance \@tempcnta by -1 \advance \@tempcntb by 12 @@ -96,11 +99,11 @@ \divide \@tempcntb by 7 \multiply \@tempcntb by 7 \advance \@tempcnta by -\@tempcntb - \ifcase \@tempcnta $BF|(B\or $B7n(B\or $B2P(B\or $B?e(B\or $BLZ(B\or $B6b(B\or $BEZ(B\fi}} -\def\$B0';"(B{\noindent $BGR7<(B\hspace{1zw}\ifcase\month\or - $B874((B\or $B=U4((B\or $BAa=U(B\or $BM[=U(B\or $B?7NP(B\or $B8~=k(B\or - $BLT=k(B\or $B;D=k(B\or $B=i=)(B\or $BCg=)(B\or $BHU=)(B\or $B=iE_(B\fi - $B$N8u!$$^$9$^$9$4@61I$N$3$H$H$*4n$S?=$7>e$2$^$9!#(B} + \ifcase \@tempcnta 日\or 月\or 火\or 水\or 木\or 金\or 土\fi}} +\def\挨拶{\noindent 拝啓\hspace{1zw}\ifcase\month\or + 厳寒\or 春寒\or 早春\or 陽春\or 新緑\or 向暑\or + 猛暑\or 残暑\or 初秋\or 仲秋\or 晩秋\or 初冬\fi + の候,ますますご清栄のこととお喜び申し上げます。} \def\myallowbreak{\@ifnextchar\egroup{}{\penalty\exhyphenpenalty}{}} \begingroup \catcode`\-=\active @@ -121,7 +124,7 @@ \chardef\{=`\{ \chardef\}=`\} \chardef\_=`\_ - \def\\{\char"5C\penalty\exhyphenpenalty{}}% $B%P%C%/%9%i%C%7%e(B + \def\\{\char"5C\penalty\exhyphenpenalty{}}% バックスラッシュ \spaceskip=.32em plus.16em minus.09em \frenchspacing \noautoxspacing @@ -132,18 +135,18 @@ \newcommand{\asciibar}{% \makebox[0.525em]{\rule[-0.2ex]{0.15ex}{0.7ex}\kern-0.15ex \rule[0.8ex]{0.15ex}{0.7ex}}} -\def\$B!]!](B{$B!=(B\kern-.5zw$B!=(B\kern-.5zw$B!=(B} -\def\$B!=!=(B{$B!=(B\kern-.5zw$B!=(B\kern-.5zw$B!=(B} +\def\−−{―\kern-.5zw―\kern-.5zw―} +\def\――{―\kern-.5zw―\kern-.5zw―} \ifx\ucs\@undefined\else \begingroup \kansujichar1="FF0D \kansujichar2="2014 \expandafter\expandafter\expandafter\gdef \expandafter\csname\expandafter\kansuji\expandafter1% - \expandafter\endcsname\kansuji1{$B!=(B\kern-.5zw$B!=(B\kern-.5zw$B!=(B} + \expandafter\endcsname\kansuji1{―\kern-.5zw―\kern-.5zw―} \expandafter\expandafter\expandafter\gdef \expandafter\csname\expandafter\kansuji\expandafter2% - \expandafter\endcsname\kansuji2{$B!=(B\kern-.5zw$B!=(B\kern-.5zw$B!=(B} + \expandafter\endcsname\kansuji2{―\kern-.5zw―\kern-.5zw―} \endgroup \fi \newcommand{\removept}[2]{% @@ -300,7 +303,7 @@ \vrule\hfill \vbox\bgroup \vskip15pt - \def\thempfootnote{\arabic{mpfootnote}}% $B5SCm$r;;MQ?t;z$K(B + \def\thempfootnote{\arabic{mpfootnote}}% 脚注を算用数字に \begin{minipage}{\linewidth}}{% \end{minipage}\vskip15pt \egroup\hfill\vrule @@ -320,7 +323,7 @@ \divide\@scw by \@tempcnta \multiply\@scw by \@tempcntb \setbox\scb@x=\hbox\bgroup\begin{minipage}[b]{\@scw}}% - % $B$^$?$O(B \setbox\scb@x=\vbox\bgroup\advance \linewidth by -20pt \relax + % または \setbox\scb@x=\vbox\bgroup\advance \linewidth by -20pt \relax {\end{minipage}\egroup \dimen0=\linewidth \removept{\dimen0}{\hsPT}% \divide \dimen0 by 2 \removept{\dimen0}{\hhsPT}% @@ -342,20 +345,20 @@ \newenvironment{EXAMPLE}{\begin{flushleft}\EXAMPLEWIDTH=\linewidth }{\end{flushleft}} \newenvironment{IN}{% - \makebox[35pt][l]{\small\fbox{$BF~NO(B}}% + \makebox[35pt][l]{\small\fbox{入力}}% \advance \linewidth by -35pt \begin{minipage}[t]{\linewidth}}{% \end{minipage}\\[6pt]} \newenvironment{OUT}{% - \makebox[35pt][l]{\small\fbox{$B=PNO(B}}% + \makebox[35pt][l]{\small\fbox{出力}}% \advance \linewidth by -35pt \begin{minipage}[t]{\linewidth}}{% \end{minipage}} \newcommand{\INEX}{\medbreak\noindent - \framebox[\columnwidth][l]{\small\hskip2zw $BF~NO(B}\nobreak + \framebox[\columnwidth][l]{\small\hskip2zw 入力}\nobreak \begin{quote}\small} \newcommand{\OUTEX}{\end{quote} - \framebox[\columnwidth][l]{\small\hskip2zw $B=PNO(B}\nobreak + \framebox[\columnwidth][l]{\small\hskip2zw 出力}\nobreak \begin{quotation}\small} \newcommand{\ENDEX}{\end{quotation}\bigbreak} \newcommand{\ENDEXC}[1]{\end{quotation}\nobreak @@ -368,10 +371,10 @@ \advance\@tempcnta-\c@page \ifnum\@tempcnta=0 \else - \ifnum\@tempcnta=1 $B!J