Griego pequeño vertical a través de newtxmath sin reemplazar la fuente matemática

Question

Estoy intentando cumplir con la norma internacional ISO 80000-2. El isomathpaquete hace un buen trabajo, pero no resuelve el problema de la falta de letras griegas pequeñas verticales/romanas, necesarias para pi, el delta de Kronecker y el símbolo de Levi-Civita. Esto se puede lograr de muchas maneras, pero generalmente las letras griegas resultantes son claramente de una fuente diferente a las de cursiva (estoy usando la fuente estándar Computer Modern).

El siguiente código implementa un delta vertical muy bonito (todas las letras griegas se pueden lograr de manera similar).

\documentclass{article}
\usepackage[libertine]{newtxmath}
\DeclareMathSymbol{\deltaup}{\mathord}{lettersA}{14}

\begin{document}
$\delta\deltaup$
\end{document}

Es decir, el código anterior declara la macro deseada \deltauputilizando la fuente de símbolo letrasA, que a su vez se carga mediante newtxmath. Esto funciona correctamente, pero como efecto secundario no deseado, la carga newtxmathreemplaza la fuente matemática utilizada en el documento, que no quiero modificar.

Answer 1

Puede utilizar las CBfonts de Claudio Beccari, que se basan en el diseño Computer Modern.

\documentclass{article}
\usepackage[LGR,T1]{fontenc} % or OT1, if you prefer

\DeclareSymbolFont{upgreek}{LGR}{cmr}{m}{n}
\DeclareMathSymbol{\deltaup}{\mathord}{upgreek}{`d}
\DeclareMathSymbol{\piup}{\mathord}{upgreek}{`p}
\DeclareMathSymbol{\epsilonup}{\mathord}{upgreek}{`e}

\begin{document}
$\delta\deltaup$

$\pi\piup$

$\varepsilon\epsilonup$
\end{document}

Una solución menos eficiente que no desperdicia una familia de fuentes matemáticas es textalpha:

\documentclass{article}
\usepackage{amsmath}
\usepackage{textalpha}

\newcommand{\deltaup}{\text{\textdelta}}
\newcommand{\epsilonup}{\text{\textepsilon}}
\newcommand{\piup}{\text{\textpi}}

\begin{document}
$\delta\deltaup$

$\pi\piup$

$\varepsilon\epsilonup$
\end{document}

La salida es la misma.

Si quieres usar el griego vertical que se usa cuando \usepackage[libertine]{newtxmath}está cargado, aquí tienes el truco.

\documentclass{article}
\usepackage{amsmath}

\makeatletter
\let\iftx@libertine\iftrue
\let\iftx@minion\iffalse
\def\ntxmath@scaled{s*[1.02]}
\makeatother
\DeclareSymbolFont{upgreek}{U}{ntxmia}{m}{it}
\SetSymbolFont{upgreek}{bold}{U}{ntxmia}{b}{it}
\DeclareMathSymbol{\deltaup}{\mathord}{upgreek}{14}
\DeclareMathSymbol{\varepsilonup}{\mathord}{upgreek}{34}
\DeclareMathSymbol{\piup}{\mathord}{upgreek}{25}

\begin{document}
$\delta\deltaup$

$\pi\piup$

$\varepsilon\varepsilonup$
\end{document}

En mi opinión el resultado es claramente peor.