Tengo este código y no se está compilando. ¿Qué tiene de malo?
%% AMS-LaTeX Created with the Wolfram Language : www.wolfram.com
\documentclass{article}
\usepackage{amsmath, amssymb, graphics, setspace}
\newcommand{\mathsym}[1]{{}}
\newcommand{\unicode}[1]{{}}
\newcounter{mathematicapage}
\begin{document}
<<\text{Units$\grave{ }$}\\
\text{ppgfttoPSI}=0.0519481;
Dado PI e PO, rint e rext, faz o c{\' a}lculo da tens{\~ a}o radial e tangencial
\text{ComputeRadialAndTangetialStress}[\text{r$\_$},\text{ri$\_$},\text{re$\_$},\text{PI$\_$},\text{PO$\_$}]\text{:=}\text{Block}[\{\text{sigr},\text{sigtheta}\},\\
\text{sigr}=(\text{PI} (r{}^{\wedge}2-\text{re}{}^{\wedge}2) \text{ri}{}^{\wedge}2+\text{PO} \text{re}{}^{\wedge}2 (-r{}^{\wedge}2+\text{ri}{}^{\wedge}2))/(r{}^{\wedge}2
(\text{re}{}^{\wedge}2-\text{ri}{}^{\wedge}2));\\
\text{sigtheta}=(\text{PI}(r{}^{\wedge}2+\text{re}{}^{\wedge}2) \text{ri}{}^{\wedge}2-\text{PO} \text{re}{}^{\wedge}2 (r{}^{\wedge}2+\text{ri}{}^{\wedge}2))/(r{}^{\wedge}2
(\text{re}{}^{\wedge}2-\text{ri}{}^{\wedge}2));\\
\{\text{sigr},\text{sigtheta}\}\text{//}N\\
];
\end{document}
Respuesta1
Es difícil mejorar un código tan horrible sin reescribirlo esencialmente desde cero. Incluso agregar $en los lugares apropiados no produce nada realmente similar a la salida tipográfica, sino solo letras y símbolos uno al lado del otro sin ninguna pista para comprender el código.
$<<\text{Units$\grave{ }$}\\
\text{ppgfttoPSI}=0.0519481;$
Dado PI e PO, rint e rext, faz o c{\' a}lculo da tens{\~ a}o radial e tangencial
$\text{ComputeRadialAndTangetialStress}[\text{r$\_$},\text{ri$\_$},\text{re$\_$},\text{PI$\_$},\t$
\text{sigr}=(\text{PI} (r{}^{\wedge}2-\text{re}{}^{\wedge}2) \text{ri}{}^{\wedge}2+\text{PO} \tex$
(\text{re}{}^{\wedge}2-\text{ri}{}^{\wedge}2));\\
\text{sigtheta}=(\text{PI}(r{}^{\wedge}2+\text{re}{}^{\wedge}2) \text{ri}{}^{\wedge}2-\text{PO} \$
(\text{re}{}^{\wedge}2-\text{ri}{}^{\wedge}2));\\
\{\text{sigr},\text{sigtheta}\}\text{//}N\\
];$
Algo como
\documentclass{article}
\usepackage[T1]{fontenc}
\usepackage[utf8]{inputenc}
\begin{document}
\begin{verbatim}
<<Units`
ppgfttoPSI=0.0519481;
Dado PI e PO, rint e rext, faz o cálculo
da tensão radial e tangencial
ComputeRadialAndTangetialStress}[r_,ri_,re_,PI_,PO_]:=
Block[{sigr,sigtheta},
sigr=PI(r^2-re^2) ri^2+PO re^2 (-r^2+ri^2))/(r^2(re^2-ri^2));
sigtheta=(PI(r^2+re^2) ri^2-PO re^2 (r^2+ri^2))/(r^2(re^2-ri^2));
{sigr,sigtheta}//N
];
\end{verbatim}
\end{document}
podría ser mejor e incluso más sencillo de copiar y pegar.
Respuesta2
Este código tex todavía es bastante pobre, pero se ejecuta sin errores y puede ser un comienzo para corregir manualmente el código generado.
\documentclass{article}
\usepackage{amsmath, amssymb, graphics, setspace}
\usepackage[T1]{fontenc}
\newcommand{\mathsym}[1]{{}}
\newcommand{\unicode}[1]{{}}
\newcounter{mathematicapage}
\begin{document}
<<\text{Units$\grave{ }$}\\
\text{ppgfttoPSI}=0.0519481;
Dado PI e PO, rint e rext, faz o c\'{a}lculo da tens\~{a}o radial e tangencial
\begin{multline}
\text{ComputeRadialAndTangetialStress}[\text{r$\_$},\text{ri$\_$},\text{re$\_$},\text{PI$\_$},\text{PO$\_$}]\text{:=}\\
\text{Block}[\{\text{sigr},\text{sigtheta}\},\\
\text{sigr}=(\text{PI} (r{}^{\wedge}2-\text{re}{}^{\wedge}2) \text{ri}{}^{\wedge}2+\text{PO} \text{re}{}^{\wedge}2 (-r{}^{\wedge}2+\text{ri}{}^{\wedge}2))/(r{}^{\wedge}2
(\text{re}{}^{\wedge}2-\text{ri}{}^{\wedge}2));\\
\text{sigtheta}=(\text{PI}(r{}^{\wedge}2+\text{re}{}^{\wedge}2) \text{ri}{}^{\wedge}2-\text{PO} \text{re}{}^{\wedge}2 (r{}^{\wedge}2+\text{ri}{}^{\wedge}2))/(r{}^{\wedge}2
(\text{re}{}^{\wedge}2-\text{ri}{}^{\wedge}2));\\
\{\text{sigr},\text{sigtheta}\}\text{//}N\\
];
\end{multline}
\end{document}