babel-russian (8oct20)

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

5 files changed, 138 insertions, 87 deletions

diff --git a/Master/texmf-dist/doc/generic/babel-russian/README b/Master/texmf-dist/doc/generic/babel-russian/README
index f0b392a3570..46fe0449e70 100644
--- a/Master/texmf-dist/doc/generic/babel-russian/README
+++ b/Master/texmf-dist/doc/generic/babel-russian/README
@@ -1,6 +1,6 @@
 ----------------------------------------------------------------
 
-Russian language module for Babel, v1.3j
+Russian language module for Babel, v1.3k
 
 Released under the LaTeX Project Public License v1.3c or later.
 See http://www.latex-project.org/lppl.txt
@@ -13,14 +13,14 @@ The Current Maintainer is Igor A. Kotelnikov <kia999 at mail dot ru>.
 
 1. INSTALLATION
 
-- unpack babel-russian.zip
-- run "xelatex.exe russianb.dtx" (recommended)
+- Unpack babel-russian.zip.
+- Run "xelatex.exe russianb.dtx" (recommended)
   or "pdflatex.exe russianb.dtx";
-  run "tex.exe russianb.dtx"
+  alternatively run "tex.exe russianb.dtx"
   or "tex.exe russianb.ins", if you don't need documentation
-- move "russianb.ldf" to <textmf>/tex/generic/babel/contrib/
-- move "russianb.pdf" and README to <textmf>/doc/latex/russian-babel/
-- update filename base (see documentation for your TeX system)
+- Move "russianb.ldf" to <textmf>/tex/latex/babel-russian
+- Move "russianb.pdf" and README to <textmf>/doc/latex/russian-babel/
+- Update filename base (see documentation for your TeX system)
 
 2. USAGE
 
@@ -32,7 +32,8 @@ a set of packages loaded in the preamble of a source TeX file. It is important
 to keep recommended order of the packages loaded, especially when running
 Unicode engines in a compatibility 8-bit mode.
 
-In the examples below, it is assumed that a source file has utf8 input encoding.
+In the examples below, it is assumed that a source file to be compile
+has utf8 input encoding.
 
 2.1. 8-bit mode
 
@@ -65,8 +66,8 @@ In the examples below, it is assumed that a source file has utf8 input encoding.
     \usepackage[english,russian]{babel}
 
 Instead of the Computer Modern Unicode (CMU) fonts loaded in this example,
-you may try any True Type or Open Type font installed on your computer provided
-that that font came with Russian letters.
+you may try any True Type or Open Type fonts installed on your computer provided
+that those fonts came with Russian letters.
 
 2.3 Typesetting ancient book
 
@@ -107,11 +108,15 @@ might be absent.
 
 5. CHANGES
 
+2020-09-06 version 1.3k
+
+    * Bug fixed in definition of \Russian command (thanks to Javier Bezos).
+
 2017-08-08 version 1.3j
 
     * TU encoding is set as default for X∃TeX and LuaTeX.
 
-    * \cyrdash now always prints dash 20% shorter than emdash.
+    * \cyrdash now always prints dash 20 percents shorter than emdash.
 
 2017-01-12 version 1.3i
 
@@ -180,7 +185,6 @@ Original source:  russianb.dtx,
     2008/03/21 v1.1r Russian support from the babel system.
 
 ----------------------------------------------------------------
-
 %%
 %% \CharacterTable
 %%  {Upper-case    \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z
diff --git a/Master/texmf-dist/doc/generic/babel-russian/russianb.pdf b/Master/texmf-dist/doc/generic/babel-russian/russianb.pdf
index 32025a01ef1..ac043c91cfd 100644
--- a/Master/texmf-dist/doc/generic/babel-russian/russianb.pdf
+++ b/Master/texmf-dist/doc/generic/babel-russian/russianb.pdf
diff --git a/Master/texmf-dist/source/generic/babel-russian/russianb.dtx b/Master/texmf-dist/source/generic/babel-russian/russianb.dtx
index b843e43bd23..cf89bcd118a 100644
--- a/Master/texmf-dist/source/generic/babel-russian/russianb.dtx
+++ b/Master/texmf-dist/source/generic/babel-russian/russianb.dtx
@@ -7,7 +7,7 @@
 %<*readme>
 ----------------------------------------------------------------
 
-Russian language module for Babel, v1.3j
+Russian language module for Babel, v1.3k
 
 Released under the LaTeX Project Public License v1.3c or later.
 See http://www.latex-project.org/lppl.txt
@@ -21,15 +21,14 @@ The Current Maintainer is Igor A. Kotelnikov <kia999 at mail dot ru>.
 
 1. INSTALLATION
 
-- unpack babel-russian.zip
-- run "xelatex.exe russianb.dtx" (recommended)
+- Unpack babel-russian.zip.
+- Run "xelatex.exe russianb.dtx" (recommended)
   or "pdflatex.exe russianb.dtx";
-  run "tex.exe russianb.dtx"
+  alternatively run "tex.exe russianb.dtx"
   or "tex.exe russianb.ins", if you don't need documentation
-- move "russianb.ldf" to <textmf>/tex/generic/babel/contrib/
-- move "russianb.pdf" and README to <textmf>/doc/latex/russian-babel/
-- update filename base (see documentation for your TeX system)
-
+- Move "russianb.ldf" to <textmf>/tex/latex/babel-russian
+- Move "russianb.pdf" and README to <textmf>/doc/latex/russian-babel/
+- Update filename base (see documentation for your TeX system)
 
 2. USAGE
 
@@ -41,7 +40,8 @@ a set of packages loaded in the preamble of a source TeX file. It is important
 to keep recommended order of the packages loaded, especially when running
 Unicode engines in a compatibility 8-bit mode.
 
-In the examples below, it is assumed that a source file has utf8 input encoding.
+In the examples below, it is assumed that a source file to be compile
+has utf8 input encoding.
 
 2.1. 8-bit mode
 
@@ -74,8 +74,8 @@ In the examples below, it is assumed that a source file has utf8 input encoding.
     \usepackage[english,russian]{babel}
 
 Instead of the Computer Modern Unicode (CMU) fonts loaded in this example,
-you may try any True Type or Open Type font installed on your computer provided
-that that font came with Russian letters.
+you may try any True Type or Open Type fonts installed on your computer provided
+that those fonts came with Russian letters.
 
 2.3 Typesetting ancient book
 
@@ -119,11 +119,16 @@ might be absent.
 
 5. CHANGES
 
+2020-09-06 version 1.3k
+
+    * Bug fixed in definition of \Russian command (thanks to Javier Bezos).
+
+
 2017-08-08 version 1.3j
 
     * TU encoding is set as default for X∃TeX and LuaTeX.
 
-    * \cyrdash now always prints dash 20% shorter than emdash.
+    * \cyrdash now always prints dash 20 percents shorter than emdash.
 
 
 2017-01-12 version 1.3i
@@ -215,7 +220,7 @@ See http://www.latex-project.org/lppl.txt
 \endpreamble
 \postamble
 ----------------------------------------------------------------
-Copyright 2011-2017 Igor A. Kotelnikov.
+Copyright 2011-2020 Igor A. Kotelnikov.
 Copyright 1995-2008 Olga Lapko.
 Copyright 1989-2012 Johannes L. Braams.
 
@@ -262,7 +267,7 @@ and the derived files             russianb.ins,
 %</internal>
 %<*code>
 \NeedsTeXFormat{LaTeX2e}
-%\ProvidesFile{russianb.ldf}[2017/08/08 1.3j Russian support for the Babel system]
+\ProvidesFile{russianb.ldf}[2020/09/09 1.3k Russian support for the Babel system]
 %</code>
 %<*driver>
 \documentclass[a4paper]{ltxdoc}
@@ -277,11 +282,18 @@ and the derived files             russianb.ins,
     \usepackage{fontspec}
     \defaultfontfeatures{Ligatures={TeX}}
     \setmainfont{CMU Serif}
-    \setsansfont{CMU Sans Serif}
-    \setmonofont{CMU Typewriter Text}
-    %\setmonofont[Scale=MatchLowercase]{Courier New}
-    %\setmonofont[Scale=MatchUppercase]{Courier New}
-    %\setmonofont{Courier New}
+    %\setmainfont{STIX Two}[
+    %    UprightFont={* Math},
+    %    %UprightFont={* Text},
+    %    ItalicFont={* Text Italic},
+    %    BoldFont={* Text Bold},
+    %    BoldItalicFont={* Text Bold Italic},
+    %]
+    %\setsansfont{CMU Sans Serif}
+    %\setmonofont{CMU Typewriter Text}
+    %%\setmonofont[Scale=MatchLowercase]{Courier New}
+    %%\setmonofont[Scale=MatchUppercase]{Courier New}
+    %%\setmonofont{Courier New}
 \else
     \usepackage[X2,T2A]{fontenc}
     \usepackage[utf8]{inputenc}
@@ -416,11 +428,22 @@ and the derived files             russianb.ins,
 % \DoNotIndex{\cyrp,\cyrs,\cyrshch,\cyru,\CYRV,\cyrya}
 % \DoNotIndex{\CYRA,\CYRB,\cyrch,\CYRE,\CYREREV,\CYRF,\cyrf,\CYRI,\cyrishrt}
 % \DoNotIndex{\CYRO,\CYRR,\cyrsftsn,\CYRYA,\cyryu,\cyrzh}
-% \DoNotIndex{\CYRCH, \CYRG, \CYRL, \CYRZH}
+% \DoNotIndex{\CYRSH,\cyrsh,\CYRSHCH,\CYRYU,\CYRZ,\CYRZH,\CYRG,\CYRH}
 % \DoNotIndex{\z@skip,\z@}
-% \DoNotIndex{\|,\~,\ ,\,}
+% \DoNotIndex{\|,\~,\ }
+% \DoNotIndex{\\&,\',\(,\),\`,\\,\/,\.}
+% \DoNotIndex{\begin,\DeclareUTFcharacter}
+% \DoNotIndex{\csname,\def}
+% \DoNotIndex{\else,\endcsname,\end}
+% \DoNotIndex{\expandafter,\fi}
+% \DoNotIndex{\hbox,\hss}
+% \DoNotIndex{\iffalse,\ifx,\ignorespaces,\iflanguage}
+% \DoNotIndex{\language,\lastskip,\ldots,\let,\natexlab,\newblock,\nobreak}
+% \DoNotIndex{\providecommand,\ProvideTextCommandDefault,\relax,\renewcommand}
+% \DoNotIndex{\selectlanguage,\selectlanguageifdefined,\small,\textemdash}
+% \DoNotIndex{\or,\if,\fi,\unskip,\url,\UTFencname}
+% \DoNotIndex{\,,\catcode,\cite,\citeauthor,\citet,\citeyear,\href,\hskip,\ifdim}
 %
-
 %\GetFileInfo{russianb.dtx}
 %\GetFileInfo{russianb.ldf}
 %
@@ -472,7 +495,7 @@ and the derived files             russianb.ins,
 % (\file{.tex}) file. Output encoding is also known as the font encoding. It is
 % implemented within the font files.
 %
-% Generally, the user may choose between different Cyrillic
+% Generally, the user may choose between different available Cyrillic
 % encodings. The current support for Cyrillic uses LH family of MetaFont fonts
 % and theirs Postscript versions such as CM-super. Lua\LaTeX\ and Xe\LaTeX,
 % being the Unicode-based succeeders of \LaTeX, allow also for any Open Type
@@ -719,11 +742,11 @@ and the derived files             russianb.ins,
 %   |\glqq| & |"`| &
 %       German opening double quote (looks like ,\kern-0.08em,).     \\
 %   |\grqq| & |"'| &
-%       German closing double quote (looks like ``).                \\
+%       German closing double quote (looks like ``).                 \\
 %   |\guillemotleft| & |"<| &
 %       French opening double quote (looks like $<\!\!<$).           \\
 %   |\guillemotright| & |">| &
-%       French closing double quote (looks like $>\!\!>$).          \\
+%       French closing double quote (looks like $>\!\!>$).           \\
 %   |\dq|   &  &
 %       Original quotes character (|"|).                       \\[0.5em]
 %   |\babelhyphen{soft}|
@@ -744,9 +767,9 @@ and the derived files             russianb.ins,
 %            equivalent to |\babelhyphen{hard}| in \pkg{babel} 3.9. \\
 %   |\babelhyphen{nobreak}|
 %   & \verb="|= & Disables ligature at this position;
-%            equivalent to |\babelhyphen{nobreak}| (??) in \pkg{babel} 3.9.
+%            equivalent to |\babelhyphen{nobreak}| in \pkg{babel} 3.9.
 %                                                                  \\[0.5em]
-%   |\cyrdash|  &        & Row Cyrillic emdash (does not care
+%   |\cyrdash|  &        & Raw Cyrillic emdash (does not care
 %       spaces around).                                            \\
 %   |\cdash---| & |"---| &
 %       Cyrillic emdash in plain text.                              \\
@@ -886,6 +909,7 @@ and the derived files             russianb.ins,
 %
 %    \section{Implementation}
 %
+% \changes{1.3k}{2020/09/06}{bug in definition of \cs{Russian} fixed}
 % \changes{1.3h}{2016/02/18}{\cs{cyrdash} is redefined}
 % \changes{1.3h}{2016/02/18}{Bugs fixed in captions for revtex4 and revtex4-1}
 % \changes{1.3g}{2015/05/01}{Added support for revtex4 and revtex4-1 classes}
@@ -922,7 +946,7 @@ and the derived files             russianb.ins,
 %    argument of \cs{LdfInit}}
 %    \begin{macrocode}
 \ProvidesLanguage{russian}
-    [2017/08/12 1.3j Russian support for the Babel system]
+    [2020/09/09 1.3k Russian support for the Babel system]
 \LdfInit{russian}{captionsrussian}
 %    \end{macrocode}
 %
@@ -1125,7 +1149,7 @@ and the derived files             russianb.ins,
 %    but redefine its meaning; now  |\Russian| is simply an alias for
 %    |\selectlanguage{russian}|.
 %    \begin{macrocode}
-\DeclareRobustCommand{\Russian}{\selectlanguage{\russian}}
+\DeclareRobustCommand{\Russian}{\selectlanguage{russian}}
 %    \end{macrocode}
 %
 %  \Describe\cyrillictext{}
@@ -2032,7 +2056,7 @@ and the derived files             russianb.ins,
 %
 %
 %    As of version 1.2 the macros |\cyrmath..| are not supported any more. They
-%    requires package \pkg{textmath} which is not available now. Instead of
+%    require package \pkg{textmath} which is not available now. Instead of
 %    |\cyrmath..| it is advised to use corresponding |\text..| commands; they
 %    do work in math mode.
 %    \begin{macrocode}
@@ -2076,23 +2100,41 @@ and the derived files             russianb.ins,
 %    macro |\th| that conflicts with the text symbol |\th|
 %    defined in Latin~1 encoding:
 %
-% \changes{1.2}{2004/05/21}{Change definition of \cs{th}
-%    only for this language}
+% \changes{1.2}{2004/05/21}{Change definition of \cs{th}}
+% \changes{1.3j}{2017/08/11}{Log-like functions made robust}
 %    \begin{macrocode}
-\def\sh{\mathop{\operator@font sh}\nolimits}
-\def\ch{\mathop{\operator@font ch}\nolimits}
-\def\tg{\mathop{\operator@font tg}\nolimits}
-\def\ctg{\mathop{\operator@font ctg}\nolimits}
-\def\arctg{\mathop{\operator@font arctg}\nolimits}
-\def\arcctg{\mathop{\operator@font arcctg}\nolimits}
-\addto\extrasrussian{%
-  \babel@save{\th}%
-  \let\ltx@th\th
-  \def\th{\textormath{\ltx@th}%
-                     {\mathop{\operator@font th}\nolimits}}%
-  }
-\def\cth{\mathop{\operator@font cth}\nolimits}
-\def\cosec{\mathop{\operator@font cosec}\nolimits}
+\AtBeginDocument{%
+  \@ifpackageloaded{amsopn}
+  {%
+    \DeclareMathOperator{\sh}{sh}%\MakeRobust\sh
+    \DeclareMathOperator{\ch}{ch}%\MakeRobust\ch
+    \DeclareMathOperator{\tg}{tg}%\MakeRobust\tg
+    \DeclareMathOperator{\ctg}{ctg}%\MakeRobust\ctg
+    \DeclareMathOperator{\arctg}{arctg}%\MakeRobust\arctg%
+    \DeclareMathOperator{\arcctg}{arcctg}%\MakeRobust\arcctg%
+    \DeclareMathOperator{\cth}{cth}%\MakeRobust\cth%
+    \DeclareMathOperator{\cosec}{cosec}%\MakeRobust\cosec%
+    \DeclareMathOperator{\math@th}{th}%
+  }{%
+    \DeclareRobustCommand\sh{\mathop{\operator@font sh}\nolimits}%\MakeRobust\sh%
+    \DeclareRobustCommand\ch{\mathop{\operator@font ch}\nolimits}%\MakeRobust\ch%
+    \DeclareRobustCommand\tg{\mathop{\operator@font tg}\nolimits}%\MakeRobust\tg%
+    \DeclareRobustCommand\ctg{\mathop{\operator@font ctg}\nolimits}%\MakeRobust\ctg%
+    \DeclareRobustCommand{\arctg}{\mathop{\operator@font arctg}\nolimits}%
+    \DeclareRobustCommand\arcctg{\mathop{\operator@font arcctg}\nolimits}%\MakeRobust\arcctg%
+    \DeclareRobustCommand\cth{\mathop{\operator@font cth}\nolimits}%\MakeRobust\cth%
+    \DeclareRobustCommand\cosec{\mathop{\operator@font cosec}\nolimits}%\MakeRobust\cosec%
+    \DeclareRobustCommand{\math@th}{\mathop{\operator@font arctg}\nolimits}%
+  }%
+%  \addto\extrasrussian{%
+%    \babel@save{\th}%
+%    \let\text@th\th
+%    %\def\th{\TextOrMath{\text@th}{\math@th}}%
+%    \DeclareRobustCommand{\th}{\TextOrMath{\text@th}{\math@th}}
+%  }%
+  \let\text@th\th
+  \DeclareRobustCommand{\th}{\TextOrMath{\text@th}{\math@th}}
+}
 %    \end{macrocode}
 %
 %    \Describe\Prob{}%
@@ -2114,11 +2156,6 @@ and the derived files             russianb.ins,
   \def\NOK{\mathop{\mathrm{НОК}}\nolimits}
   \def\Proj{\mathop{\mathrm{Пр}}\nolimits}
 \else
-%  \def\nod{\mathop{\cyrmathrm{\cyrn.\cyro.\cyrd.}}\nolimits}
-%  \def\nok{\mathop{\cyrmathrm{\cyrn.\cyro.\cyrk.}}\nolimits}
-%  \def\NOD{\mathop{\cyrmathrm{\CYRN\CYRO\CYRD}}\nolimits}
-%  \def\NOK{\mathop{\cyrmathrm{\CYRN\CYRO\CYRK}}\nolimits}
-%  \def\Proj{\mathop{\cyrmathrm{\CYRP\cyrr}}\nolimits}
   \def\nod{\mathop{\textnormal{\cyrn.\cyro.\cyrd.}}\nolimits}
   \def\nok{\mathop{\textnormal{\cyrn.\cyro.\cyrk.}}\nolimits}
   \def\NOD{\mathop{\textnormal{\CYRN\CYRO\CYRD}}\nolimits}
@@ -2135,15 +2172,14 @@ and the derived files             russianb.ins,
 %    loading a local configuration file, and preparing the language
 %    to be activated at |\begin{document}| time.
 %
-% \changes{1.1d}{1996/11/03}{Now use \cs{ldf@finish} to wrap
-%    up}
+% \changes{1.1d}{1996/11/03}{Now use \cs{ldf@finish} to wrap up}
 %    \begin{macrocode}
 \ldf@finish{russian}
 %    \end{macrocode}
 %\iffalse
 %</code>
 %\fi
-%\CheckSum{2327}
+%\CheckSum{2353}
 %\Finale
 %
 %%
diff --git a/Master/texmf-dist/source/generic/babel-russian/russianb.ins b/Master/texmf-dist/source/generic/babel-russian/russianb.ins
index 1d77461d260..0f1d245f799 100644
--- a/Master/texmf-dist/source/generic/babel-russian/russianb.ins
+++ b/Master/texmf-dist/source/generic/babel-russian/russianb.ins
@@ -24,7 +24,7 @@ See http://www.latex-project.org/lppl.txt
 \endpreamble
 \postamble
 ----------------------------------------------------------------
-Copyright 2011-2017 Igor A. Kotelnikov.
+Copyright 2011-2020 Igor A. Kotelnikov.
 Copyright 1995-2008 Olga Lapko.
 Copyright 1989-2012 Johannes L. Braams.
 
@@ -52,7 +52,6 @@ and the derived files             russianb.ins,
   \file{\jobname.ldf}{\from{\jobname.dtx}{code}}
 }
 \endbatchfile
-
 %%
 %% \CharacterTable
 %%  {Upper-case    \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z
@@ -140,7 +139,7 @@ and the derived files             russianb.ins,
 %% \cyrya=я
 %% \cyrsftsn=ь
 %% ----------------------------------------------------------------
-%% Copyright 2011-2017 Igor A. Kotelnikov.
+%% Copyright 2011-2020 Igor A. Kotelnikov.
 %% Copyright 1995-2008 Olga Lapko.
 %% Copyright 1989-2012 Johannes L. Braams.
 %% 
diff --git a/Master/texmf-dist/tex/generic/babel-russian/russianb.ldf b/Master/texmf-dist/tex/generic/babel-russian/russianb.ldf
index 8c64872334a..1a36dc2d248 100644
--- a/Master/texmf-dist/tex/generic/babel-russian/russianb.ldf
+++ b/Master/texmf-dist/tex/generic/babel-russian/russianb.ldf
@@ -12,9 +12,9 @@
 %% See http://www.latex-project.org/lppl.txt
 %% ----------------------------------------------------------------
 \NeedsTeXFormat{LaTeX2e}
-
+\ProvidesFile{russianb.ldf}[2020/09/09 1.3k Russian support for the Babel system]
 \ProvidesLanguage{russian}
-    [2017/08/12 1.3j Russian support for the Babel system]
+    [2020/09/09 1.3k Russian support for the Babel system]
 \LdfInit{russian}{captionsrussian}
 \ifdefined\if@uni@ode
   \PackageError{babel}{if@uni@ode already defined.\MessageBreak
@@ -75,7 +75,7 @@
   \lowercase\expandafter{\expandafter\input\cyrillicencoding enc.def\relax}%
   \AtBeginDocument{\@setcyrillicencoding}
 \fi
-\DeclareRobustCommand{\Russian}{\selectlanguage{\russian}}
+\DeclareRobustCommand{\Russian}{\selectlanguage{russian}}
 \DeclareRobustCommand{\cyrillictext}{%
   \fontencoding\cyrillicencoding\selectfont
   \let\encodingdefault\cyrillicencoding
@@ -541,20 +541,32 @@
 }
 \@onlypreamble\captionsrussian@ancient
 \@onlypreamble\daterussian@ancient
-\def\sh{\mathop{\operator@font sh}\nolimits}
-\def\ch{\mathop{\operator@font ch}\nolimits}
-\def\tg{\mathop{\operator@font tg}\nolimits}
-\def\ctg{\mathop{\operator@font ctg}\nolimits}
-\def\arctg{\mathop{\operator@font arctg}\nolimits}
-\def\arcctg{\mathop{\operator@font arcctg}\nolimits}
-\addto\extrasrussian{%
-  \babel@save{\th}%
-  \let\ltx@th\th
-  \def\th{\textormath{\ltx@th}%
-                     {\mathop{\operator@font th}\nolimits}}%
-  }
-\def\cth{\mathop{\operator@font cth}\nolimits}
-\def\cosec{\mathop{\operator@font cosec}\nolimits}
+\AtBeginDocument{%
+  \@ifpackageloaded{amsopn}
+  {%
+    \DeclareMathOperator{\sh}{sh}%\MakeRobust\sh
+    \DeclareMathOperator{\ch}{ch}%\MakeRobust\ch
+    \DeclareMathOperator{\tg}{tg}%\MakeRobust\tg
+    \DeclareMathOperator{\ctg}{ctg}%\MakeRobust\ctg
+    \DeclareMathOperator{\arctg}{arctg}%\MakeRobust\arctg%
+    \DeclareMathOperator{\arcctg}{arcctg}%\MakeRobust\arcctg%
+    \DeclareMathOperator{\cth}{cth}%\MakeRobust\cth%
+    \DeclareMathOperator{\cosec}{cosec}%\MakeRobust\cosec%
+    \DeclareMathOperator{\math@th}{th}%
+  }{%
+    \DeclareRobustCommand\sh{\mathop{\operator@font sh}\nolimits}%\MakeRobust\sh%
+    \DeclareRobustCommand\ch{\mathop{\operator@font ch}\nolimits}%\MakeRobust\ch%
+    \DeclareRobustCommand\tg{\mathop{\operator@font tg}\nolimits}%\MakeRobust\tg%
+    \DeclareRobustCommand\ctg{\mathop{\operator@font ctg}\nolimits}%\MakeRobust\ctg%
+    \DeclareRobustCommand{\arctg}{\mathop{\operator@font arctg}\nolimits}%
+    \DeclareRobustCommand\arcctg{\mathop{\operator@font arcctg}\nolimits}%\MakeRobust\arcctg%
+    \DeclareRobustCommand\cth{\mathop{\operator@font cth}\nolimits}%\MakeRobust\cth%
+    \DeclareRobustCommand\cosec{\mathop{\operator@font cosec}\nolimits}%\MakeRobust\cosec%
+    \DeclareRobustCommand{\math@th}{\mathop{\operator@font arctg}\nolimits}%
+  }%
+  \let\text@th\th
+  \DeclareRobustCommand{\th}{\TextOrMath{\text@th}{\math@th}}
+}
 \def\Prob{\mathop{\kern\z@\mathsf{P}}\nolimits}
 \def\Variance{\mathop{\kern\z@\mathsf{D}}\nolimits}
 \if@uni@ode
@@ -658,7 +670,7 @@
 %% \cyrya=я
 %% \cyrsftsn=ь
 %% ----------------------------------------------------------------
-%% Copyright 2011-2017 Igor A. Kotelnikov.
+%% Copyright 2011-2020 Igor A. Kotelnikov.
 %% Copyright 1995-2008 Olga Lapko.
 %% Copyright 1989-2012 Johannes L. Braams.
 %%