Команда LaTeX, которая определяет две новые команды, одна из которых является версией другой с заглавной буквы

Question

Я хочу создать команду, которая определяет два новых математических оператора, один из которых будет заглавной версией другого. Например, команда \makeoperator{log}создаст \logи \Logдля набора строчных и заглавных логов. Пока что у меня есть следующее (первая часть принадлежит egreg):

\makeatletter
\newcommand{\Capitalize}[1]{%
  \edef\@tempa{\expandafter\@gobble\string#1}%
  \edef\@tempb{\expandafter\@car\@tempa\@nil}%
  \edef\@tempa{\expandafter\@cdr\@tempa\@nil}%
  \uppercase\expandafter{\expandafter\def\expandafter\@tempb\expandafter{\@tempb}}%
  \@namedef{\@tempb\@tempa}{\expandafter\MakeUppercase\expandafter{#1}}}
\makeatother

\def\makeoperator#1{%
    \expandafter\def\csname #1\endcsname{\operatorname{#1}}%
    \Capitalize{\csname #1\endcsname}%
}

но это приводит к ошибке неопределенной последовательности управления. Что не так?

Answer 1

Если вы предпочитаете примитивные команды TeX вместо команд Expl3 (как и я), то вы можете сделать следующее:

\def\DeclareDoubleMathOperator#1{\ddmoA#1\end}
\def\ddmoA#1#2\end{\uppercase{\ddmoB#1}#1{#2}}
\def\ddmoB#1#2#3{%
   \expandafter\def\csname #1#3\endcsname{\mathop{\rm#1#3}\nolimits}%
   \expandafter\def\csname #2#3\endcsname{\mathop{\rm#2#3}\nolimits}%
}

\DeclareDoubleMathOperator{log}
\DeclareDoubleMathOperator{blob}

$\log x+\Log x$

$\blob x+\Blob x$

\bye

Answer 2

В настоящее время существуют лучшие методы.

\documentclass{article}
\usepackage{amsmath}

\ExplSyntaxOn

\NewDocumentCommand{\DeclareDoubleMathOperator}{m}
 {
  % lowercase version
  \cs_if_exist:cF { #1 }
   {
    \exp_args:Nc \DeclareMathOperator{#1}{#1}
   }
  % capitalized version
  \cs_if_exist:cF { \text_titlecase:n { #1 } }
   {
    \exp_args:Ncx \DeclareMathOperator{ \text_titlecase:n { #1 } } { \text_titlecase:n { #1 } }
   }
 }

\ExplSyntaxOff

\DeclareDoubleMathOperator{log}
\DeclareDoubleMathOperator{blob}

\begin{document}

$\log x+\Log x$

$\blob x+\Blob x$

\end{document}

Но я бы этого избегал. Просто определите нужные вам операторы.