Escribir reacciones nucleares sin el paquete mhchem

Question

Me gustaría escribir reacciones nucleares pero no con el paquete mhchem porque tengo incompatibilidades con otros paquetes de química.

¿Cómo puedo proceder por ejemplo para obtener este tipo?

Gracias

Answer 1

He aquí una manera de hacerlo, vista y adaptada delpaquete nuclear.

\documentclass[10pt,a4paper]{article}
\usepackage{ifthen}

\newcommand{\nuc}[3]{\ensuremath{{}^{#2}_{#3} \textrm{#1}}}

\begin{document}
 
$ \nuc{X}{A}{Z} \rightarrow  \nuc{Y}{A-a}{Z-z} + \nuc{p}{a}{z} $
 
\end{document}

Answer 2

Puedes definir la \nucmacro usando primitivas TeX:

\def\nuc#1#2#3{\vcenter{\baselineskip=1.7ex\halign{\hfil##\cr$\nucstyle{#2}$\cr$\nucstyle{#3}$\cr}}{\rm#1}}
\def\nucstyle{\scriptstyle\rm}

Test:
$$
   \nuc{X}{A}{Z} \rightarrow  \nuc{Y}{A-a}{Z-z} + \nuc{p}{a}{z}
$$

Answer 3

Si usas lo que está dentro \ch, chemmacrosnecesitas un poco más de trabajo.

\documentclass{article}
\usepackage{chemmacros}
\usepackage{amsmath}

\ExplSyntaxOn
\NewDocumentCommand{\Isotope}{mmm}
 {
  \nicolas_isotope:nn { #1 } { #2 } \ensuremath{ \mathrm{#3} }
 }

\tl_new:N \l__nicolas_isotope_sup_tl
\tl_new:N \l__nicolas_isotope_sub_tl
\box_new:N \l__nicolas_isotope_sup_box
\box_new:N \l__nicolas_isotope_sub_box
\dim_new:N \l__nicolas_isotope_wd_dim

\cs_new_protected:Nn \nicolas_isotope:nn
 {
  \group_begin:
  % override the substitutions made by chemformula
  \cs_set:Nn \chemformula_single_bond: { - }
  \cs_set:Nn \chemformula_triple_bond: { + }
  \hbox_set:Nn \l__nicolas_isotope_sup_box { $\scriptstyle\mathrm{#1}$ }
  \hbox_set:Nn \l__nicolas_isotope_sub_box { $\scriptstyle\mathrm{#2}$ }
  \dim_set:Nn \l__nicolas_isotope_wd_dim
   {
    \dim_max:nn
     { \box_wd:N \l__nicolas_isotope_sup_box }
     { \box_wd:N \l__nicolas_isotope_sub_box }
   }
  \ensuremath
   {
    \sp{\makebox[\l__nicolas_isotope_wd_dim][r]{\box_use:N \l__nicolas_isotope_sup_box}}
    \sb{\makebox[\l__nicolas_isotope_wd_dim][r]{\box_use:N \l__nicolas_isotope_sub_box}}
   }
  \group_end:
 }

\ExplSyntaxOff

\begin{document}
\[
\ch{\Isotope{A}{Z}{X} -> \Isotope{A-a}{Z-z}{X} + \Isotope{a}{z}{p}}
\]
\[
\Isotope{A-a}{Z-z}X
\]

\end{document}

Answer 4

Usando isotopepaquete.

\documentclass[a4paper,12pt]{article}
\usepackage{isotope}

\begin{document}
$\isotope[\mathrm A][\mathrm Z]{\mathrm X}\to \isotope[\mathrm{A-a}][\mathrm{Z-z}]{\mathrm Y}+\isotope[a][z]{\mathrm p}$
\end{document}

o tensorpaquete:

\documentclass[a4paper,12pt]{article}
\usepackage{tensor}

\begin{document}
$\tensor*[^{\mathrm A}_{\mathrm Z}]{\mathrm{X}}{}\to \tensor*[^{\mathrm{A-a}}_{\mathrm{Z-z}}]{\mathrm Y}{}+\tensor*[^{a}_{z}]{\mathrm p}{}$
\end{document}