jsclasses (4oct17)

git-svn-id: svn://tug.org/texlive/trunk@45473 c570f23f-e606-0410-a88d-b1316a301751

7 files changed, 344 insertions, 321 deletions

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\<!$K%U%k%M!<%`$r:\$;$k$J$i(B #8
+        #7}}% 目次にフルネームを載せるなら #8
   \else
     \begingroup
-      \interlinepenalty \@M % $B2<$+$i0\F0(B
+      \interlinepenalty \@M % 下から移動
       #6{%
         \@hangfrom{\hskip #3\relax\@svsec}%
         #8\@@par}%
@@ -1163,7 +1167,7 @@
       \ifnum #2>\c@secnumdepth \else
         \protect\numberline{\csname the#1\endcsname}%
       \fi
-      #7}% $BL\<!$K%U%k%M!<%`$r:\$;$k$J$i$3$3$O(B #8
+      #7}% 目次にフルネームを載せるならここは #8
   \fi
   \@xsect{#5}}
 \def\@xsect#1{%
@@ -1271,8 +1275,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
@@ -1281,8 +1285,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
@@ -1295,15 +1299,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
@@ -1374,11 +1378,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}
@@ -1443,10 +1447,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{}{%
@@ -1459,7 +1463,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
@@ -1515,8 +1519,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
@@ -1574,7 +1578,7 @@
       \rightskip\@tocrmarg
       \parfillskip-\rightskip
       \leavevmode\headfont
-      %\setlength\@lnumwidth{4zw}% $B85(B1.5em [2003-03-02]
+      %\setlength\@lnumwidth{4zw}% 元1.5em [2003-03-02]
       \setlength\@lnumwidth{\jsc@tocl@width}\advance\@lnumwidth 2zw
       \advance\leftskip\@lnumwidth \hskip-\leftskip
       #1\nobreak\hfil\nobreak\hbox to\@pnumwidth{\hss#2}\par
@@ -1642,7 +1646,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
@@ -1679,12 +1683,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
@@ -1859,8 +1863,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
@@ -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\<!(B\fi}
-\newcommand{\listfigurename}{\if@english List of Figures\else $B?^L\<!(B\fi}
-\newcommand{\listtablename}{\if@english List of Tables\else $BI=L\<!(B\fi}
-\newcommand{\refname}{\if@english References\else $B;29MJ88%(B\fi}
-\newcommand{\bibname}{\if@english Bibliography\else $B;29MJ88%(B\fi}
-\newcommand{\indexname}{\if@english Index\else $B:w0z(B\fi}
-\newcommand{\figurename}{\if@english Fig.~\else $B?^(B\fi}
-\newcommand{\tablename}{\if@english Table~\else $BI=(B\fi}
-\newcommand{\appendixname}{\if@english \else $BIUO?(B\fi}
-\newcommand{\abstractname}{\if@english Abstract\else $B35MW(B\fi}
-\newif\if$B@>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\<!$K%U%k%M!<%`$r:\$;$k$J$i(B #8
+        #7}}% 目次にフルネームを載せるなら #8
   \else
     \begingroup
-      \interlinepenalty \@M % $B2<$+$i0\F0(B
+      \interlinepenalty \@M % 下から移動
       #6{%
         \@hangfrom{\hskip #3\relax\@svsec}%
         #8\@@par}%
@@ -1175,7 +1179,7 @@
       \ifnum #2>\c@secnumdepth \else
         \protect\numberline{\csname the#1\endcsname}%
       \fi
-      #7}% $BL\<!$K%U%k%M!<%`$r:\$;$k$J$i$3$3$O(B #8
+      #7}% 目次にフルネームを載せるならここは #8
   \fi
   \@xsect{#5}}
 \def\@xsect#1{%
@@ -1266,7 +1270,7 @@
   \else
     \clearpage
   \fi\fi
-  \thispagestyle{empty}% $B2$J8MQI8=`%9%?%$%k$G$O(B plain
+  \thispagestyle{empty}% 欧文用標準スタイルでは plain
   \if@twocolumn
     \onecolumn
     \@restonecoltrue
@@ -1313,7 +1317,7 @@
 \newcommand{\chapter}{%
   \if@openleft\cleardoublepage\else
   \if@openright\cleardoublepage\else\clearpage\fi\fi
-  \plainifnotempty % $B85(B: \thispagestyle{plain}
+  \plainifnotempty % 元: \thispagestyle{plain}
   \global\@topnum\z@
   \if@english \@afterindentfalse \else \@afterindenttrue \fi
   \secdef
@@ -1343,18 +1347,18 @@
     \@afterheading
   \fi}
 \def\@makechapterhead#1{%
-  \vspace*{2\Cvs}% $B2$J8$O(B50pt
+  \vspace*{2\Cvs}% 欧文は50pt
   {\parindent \z@ \raggedright \normalfont
     \ifnum \c@secnumdepth >\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\<!(B\fi}
-\newcommand{\listfigurename}{\if@english List of Figures\else $B?^L\<!(B\fi}
-\newcommand{\listtablename}{\if@english List of Tables\else $BI=L\<!(B\fi}
-\newcommand{\refname}{\if@english References\else $B;29MJ88%(B\fi}
-\newcommand{\bibname}{\if@english Bibliography\else $B;29MJ88%(B\fi}
-\newcommand{\indexname}{\if@english Index\else $B:w0z(B\fi}
-\newcommand{\figurename}{\if@english Fig.~\else $B?^(B\fi}
-\newcommand{\tablename}{\if@english Table~\else $BI=(B\fi}
-\newcommand{\appendixname}{\if@english \else $BIUO?(B\fi}
-\newif\if$B@>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\<!$K%U%k%M!<%`$r:\$;$k$J$i(B #8
+        #7}}% 目次にフルネームを載せるなら #8
   \else
     \begingroup
-      \interlinepenalty \@M % $B2<$+$i0\F0(B
+      \interlinepenalty \@M % 下から移動
       #6{%
         \@hangfrom{\hskip #3\relax\@svsec}%
         #8\@@par}%
@@ -1036,7 +1040,7 @@
       \ifnum #2>\c@secnumdepth \else
         \protect\numberline{\csname the#1\endcsname}%
       \fi
-      #7}% $BL\<!$K%U%k%M!<%`$r:\$;$k$J$i$3$3$O(B #8
+      #7}% 目次にフルネームを載せるならここは #8
   \fi
   \@xsect{#5}}
 \def\@xsect#1{%
@@ -1145,8 +1149,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
@@ -1155,8 +1159,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
@@ -1171,12 +1175,12 @@
 \fi
 \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}}
 \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}}
 \fi
 \if@twocolumn
@@ -1247,11 +1251,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}
@@ -1275,10 +1279,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{}{%
@@ -1291,7 +1295,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
@@ -1347,8 +1351,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{%
   \vskip\abovecaptionskip
   \sbox\@tempboxa{\small\sffamily #1\quad #2}%
@@ -1416,7 +1420,7 @@
       \rightskip\@tocrmarg
       \parfillskip-\rightskip
       \leavevmode\headfont
-      %\setlength\@lnumwidth{4zw}% $B85(B1.5em [2003-03-02]
+      %\setlength\@lnumwidth{4zw}% 元1.5em [2003-03-02]
       \setlength\@lnumwidth{\jsc@tocl@width}\advance\@lnumwidth 2zw
       \advance\leftskip\@lnumwidth \hskip-\leftskip
       #1\nobreak\hfil\nobreak\hbox to\@pnumwidth{\hss#2}\par
@@ -1484,7 +1488,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
@@ -1521,12 +1525,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
@@ -1701,8 +1705,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
@@ -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\<!(B\fi}
-\newcommand{\listfigurename}{\if@english List of Figures\else $B?^L\<!(B\fi}
-\newcommand{\listtablename}{\if@english List of Tables\else $BI=L\<!(B\fi}
-\newcommand{\refname}{\if@english References\else $B;29MJ88%(B\fi}
-\newcommand{\bibname}{\if@english Bibliography\else $B;29MJ88%(B\fi}
-\newcommand{\indexname}{\if@english Index\else $B:w0z(B\fi}
+\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}{Fig.~}
 \newcommand{\tablename}{Table~}
-\newcommand{\appendixname}{\if@english \else $BIUO?(B\fi}
-\newcommand{\abstractname}{\if@english Abstract\else $B35MW(B\fi}
-\newif\if$B@>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\<!$K%U%k%M!<%`$r:\$;$k$J$i(B #8
+        #7}}% 目次にフルネームを載せるなら #8
   \else
     \begingroup
-      \interlinepenalty \@M % $B2<$+$i0\F0(B
+      \interlinepenalty \@M % 下から移動
       #6{%
         \@hangfrom{\hskip #3\relax\@svsec}%
         #8\@@par}%
@@ -1148,7 +1152,7 @@
       \ifnum #2>\c@secnumdepth \else
         \protect\numberline{\csname the#1\endcsname}%
       \fi
-      #7}% $BL\<!$K%U%k%M!<%`$r:\$;$k$J$i$3$3$O(B #8
+      #7}% 目次にフルネームを載せるならここは #8
   \fi
   \@xsect{#5}}
 \def\@xsect#1{%
@@ -1222,7 +1226,7 @@
   \else
     \clearpage
   \fi\fi
-  \thispagestyle{empty}% $B2$J8MQI8=`%9%?%$%k$G$O(B plain
+  \thispagestyle{empty}% 欧文用標準スタイルでは plain
   \if@twocolumn
     \onecolumn
     \@restonecoltrue
@@ -1269,7 +1273,7 @@
 \newcommand{\chapter}{%
   \if@openleft\cleardoublepage\else
   \if@openright\cleardoublepage\else\clearpage\fi\fi
-  \plainifnotempty % $B85(B: \thispagestyle{plain}
+  \plainifnotempty % 元: \thispagestyle{plain}
   \global\@topnum\z@
   \if@english \@afterindentfalse \else \@afterindenttrue \fi
   \secdef
@@ -1297,16 +1301,16 @@
     \@afterheading
   \fi}
 \def\@makechapterhead#1{%
-  \vspace*{2\Cvs}% $B2$J8$O(B50pt
+  \vspace*{2\Cvs}% 欧文は50pt
   {\parindent \z@ \raggedright \normalfont
     \ifnum \c@secnumdepth >\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\<!(B\fi}
-\newcommand{\listfigurename}{\if@english List of Figures\else $B?^L\<!(B\fi}
-\newcommand{\listtablename}{\if@english List of Tables\else $BI=L\<!(B\fi}
-\newcommand{\refname}{\if@english References\else $B;29MJ88%(B\fi}
-\newcommand{\bibname}{\if@english Bibliography\else $B;29MJ88%(B\fi}
-\newcommand{\indexname}{\if@english Index\else $B:w0z(B\fi}
-\newcommand{\figurename}{\if@english Fig.~\else $B?^(B\fi}
-\newcommand{\tablename}{\if@english Table~\else $BI=(B\fi}
-\newcommand{\appendixname}{\if@english \else $BIUO?(B\fi}
-\newcommand{\abstractname}{\if@english Abstract\else $B35MW(B\fi}
-\newif\if$B@>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\<!$K%U%k%M!<%`$r:\$;$k$J$i(B #8
+        #7}}% 目次にフルネームを載せるなら #8
   \else
     \begingroup
-      \interlinepenalty \@M % $B2<$+$i0\F0(B
+      \interlinepenalty \@M % 下から移動
       #6{%
         \@hangfrom{\hskip #3\relax\@svsec}%
         #8\@@par}%
@@ -1118,7 +1122,7 @@
       \ifnum #2>\c@secnumdepth \else
         \protect\numberline{\csname the#1\endcsname}%
       \fi
-      #7}% $BL\<!$K%U%k%M!<%`$r:\$;$k$J$i$3$3$O(B #8
+      #7}% 目次にフルネームを載せるならここは #8
   \fi
   \@xsect{#5}}
 \def\@xsect#1{%
@@ -1226,8 +1230,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
@@ -1236,8 +1240,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
@@ -1250,15 +1254,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
@@ -1329,11 +1333,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}
@@ -1398,10 +1402,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{}{%
@@ -1414,7 +1418,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
@@ -1470,8 +1474,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
@@ -1529,7 +1533,7 @@
       \rightskip\@tocrmarg
       \parfillskip-\rightskip
       \leavevmode\headfont
-      %\setlength\@lnumwidth{4zw}% $B85(B1.5em [2003-03-02]
+      %\setlength\@lnumwidth{4zw}% 元1.5em [2003-03-02]
       \setlength\@lnumwidth{\jsc@tocl@width}\advance\@lnumwidth 2zw
       \advance\leftskip\@lnumwidth \hskip-\leftskip
       #1\nobreak\hfil\nobreak\hbox to\@pnumwidth{\hss#2}\par
@@ -1600,7 +1604,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
@@ -1637,12 +1641,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
@@ -1817,8 +1821,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
@@ -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\<!(B\fi}
-\newcommand{\listfigurename}{\if@english List of Figures\else $B?^L\<!(B\fi}
-\newcommand{\listtablename}{\if@english List of Tables\else $BI=L\<!(B\fi}
-\newcommand{\refname}{\if@english References\else $B;29MJ88%(B\fi}
-\newcommand{\bibname}{\if@english Bibliography\else $B;29MJ88%(B\fi}
-\newcommand{\indexname}{\if@english Index\else $B:w0z(B\fi}
-\newcommand{\figurename}{\if@english Fig.~\else $B?^(B\fi}
-\newcommand{\tablename}{\if@english Table~\else $BI=(B\fi}
-\newcommand{\appendixname}{\if@english \else $BIUO?(B\fi}
-\newcommand{\abstractname}{\if@english Abstract\else $B35MW(B\fi}
-\newif\if$B@>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<!%Z!<%8!K(B
+      \ifnum\@tempcnta=1 （次ページ）
       \else
-        \ifnum\@tempcnta=-1 $B!JA0%Z!<%8!K(B
-        \else $B!J(B\pageref{#1}$B%Z!<%8!K(B
+        \ifnum\@tempcnta=-1 （前ページ）
+        \else （\pageref{#1}ページ）
         \fi
       \fi
     \fi
@@ -393,7 +396,7 @@
   \vrule\@width\wd0\@height\z@\@depth\shaderule\hskip-\shaderule
   \vrule\@width\shaderule\@height\dimen0}}
 \let\shadebox\okushadebox \let\endshadebox\endokushadebox
-\def\sankoumark{{\small $B!z(B}}
+\def\sankoumark{{\small ★}}
 \newenvironment{sankou}{\vspace{3pt}%
   \begin{list}{}{%
     \setlength{\leftmargin}{3zw}%
@@ -407,7 +410,7 @@
     \setlength{\partopsep}{0pt}%
     \setlength{\listparindent}{0zw}%
   }\item[\sankoumark]\small}{\end{list}}
-\def\toimark{{\small\bf $B!ZLd![(B}}
+\def\toimark{{\small\bf 【問】}}
 \newenvironment{toi}{\vspace{3pt}%
   \begin{list}{}{%
     \setlength{\leftmargin}{3zw}%
@@ -440,7 +443,7 @@
 \newcommand{\5}{\penalty50 }          % \penalty\exhyphenpenalty
 \newcommand{\ANGLE}[1]{%
   $\langle$\kern0pt\nobreak{#1}\kern0pt\nobreak$\rangle$}
-\newcommand{\$B3t(B}{\hspace{\kanjiskip}\<$B!J3t!K(B\<\hspace{\kanjiskip}}
+\newcommand{\株}{\hspace{\kanjiskip}\<（株）\<\hspace{\kanjiskip}}
 \@ifundefined{widebaselines}{}{%
   \let\endmathdisplaysave=\endmathdisplay
   \def\endmathdisplay{\widebaselines\endmathdisplaysave}}
diff --git a/Master/texmf-dist/tex/platex/jsclasses/okuverb.sty b/Master/texmf-dist/tex/platex/jsclasses/okuverb.sty
index 335004af9cf..97057523136 100644
--- a/Master/texmf-dist/tex/platex/jsclasses/okuverb.sty
+++ b/Master/texmf-dist/tex/platex/jsclasses/okuverb.sty
@@ -44,12 +44,12 @@
 \fi
 \def\verbatim@font{\ttfamily}
 \def\verb{%
-  \leavevmode\hbox % $BJQ99(B
+  \leavevmode\hbox % changed
   \bgroup
     \verb@eol@error \let\do\@makeother \dospecials
     \verbatim@font\@noligs
-    \noautoxspacing % $BDI2C(B
-    \verbh@@k % $BDI2C(B
+    \noautoxspacing % added
+    \verbh@@k % added
     \@ifstar\@sverb\@verb}
 \if@yen
 \begingroup \catcode `|=0 \catcode `[= 1