Indizes in Formel: nicht-kursiv als Standard möglich?

Hallo,

ich schreibe gerade an einer Formelsammlung. 99 % aller Formel erfordern tiefgestellte Indizes mit Buchstaben, die nach Norm nicht-kursiv dargestellt werden müssen.

Also schreibe ich immer

Code:

---

$U_\mathrm{a}$

---

Dieses \mathrm{...} kann bei längeren Formeln schonmal sehr anstrengend werden zumal es eigentlich immer Verwendung findet.

Kann ich an zentraler Stelle definieren, dass die Indizes stets nicht-kursiv ausgeführt werden, also ein

Code:

---

$U_a$

---

dasselbe Ergebnis liefert?

Code:

---

\documentclass{article}

\makeatletter
 \begingroup
  \catcode`\_=\active
  \protected\gdef_{\@ifnextchar|\subtextit\subtextup}
 \endgroup
\def\subtextit|#1|{\sb{#1}}
\def\subtextup#1{\sb{\mathrm{#1}}}
\AtBeginDocument{\catcode`\_=12 \mathcode`\_=32768}
\makeatother

\begin{document}

$A_|p|$  $A_p$ $A_{abc}$

\end{document}

---

OK, ich versteh zwar nicht, was du da machst, aber es klappt wunderbar :D