%% AMS-LaTeX Created by Wolfram Mathematica 7.0 : www.wolfram.com

\documentclass{article}
\usepackage{amsmath, amssymb, graphics}

\newcommand{\mathsym}[1]{{}}
\newcommand{\unicode}[1]{{}}

\begin{document}

\noindent\(\pmb{\text{func}[\text{x$\_$}] \text{:=} x{}^{\wedge}3-x+9999}\)

\noindent\(\pmb{\text{func}[x]}\)

\noindent\(9999-x+x^3\)

\noindent\(\pmb{\text{TeXForm}[\%] >> \text{$\texttt{"}$expr.tex$\texttt{"}$}}\)

\noindent\(\pmb{\text{Plot}[\text{func}[x],\{x,-1,1\}]}\)

\includegraphics{notebook-20111018_gr1.eps}

\noindent\(\pmb{\text{Export}[\text{$\texttt{"}$graph.eps$\texttt{"}$},\%]}\)

\noindent\(\text{graph.eps}\)

\end{document}
