Use texto vertical em \text dentro do teorema

Question

Como fazer com que o texto \textfique automaticamente na vertical em um ambiente de teorema?

Por exemplo, quero usar esses códigos para obter o seguinte efeito:

\documentclass{article}
\usepackage{amsmath}
\newtheorem{theorem}{Theorem}

\begin{document}
\begin{theorem}
  This is a theorem.
  \[ F_\text{left}=F_\text{right} \]
\end{theorem}
\end{document}

(Na verdade, eu uso \textupesse efeito aqui.)

Atualizar:A questãoQual comando devo usar para subscritos textuais no modo matemático?pode ser útil.