#title: derivadas em maxima
#author: jj
#let:

f fun = [exp(x),log(x),sin(x), (x^2+x)/x^3 , x + x^2 ];
f dom = [true  ,(x>0) ,true  , (x != 0)    ,  true   ];

fun ~ dom;

maxima{ a(x) := #fun; 
        dom(x) := #dom;
        b(x) := ''(diff(a(x),x)); 
        c(x) := ''(diff(a(x),x,2)); 
        d(x) := ''(integrate(a(x),x));}

f fun1   = b(x);
f fun2   = c(x);
f fun3   = d(x);

f c3     = c(3 * %pi);

s r      = maxima{ if dom(0) then a(0) else "_OFD_" };
s r1     = maxima{ if dom(0) then b(0) else "_OFD_" };
s r2     = maxima{ if dom(0) then c(0) else "_OFD_" };
f r3     = if dom(0) then d(0) else "_OFD_" ;

#format
"_OFD_"=\fbox{Out of domain}

#question:

\begin{enumerate}
\item função: $ #fun $
\item derivada: $ #fun1 $
\item segunda derivada: $ #fun2 $
\item integral: $ #fun3 $
\item a''(3)pi: $#c3$
\item ordenada na origem: $#r$
\item ordenada na origem: $#r1$
\item ordenada na origem: $#r2$
\item ordenada na origem: $#r3$
\end{enumerate}

#sugestion:
#resolution:
#result:
#Verify:

#usepackage
 % \usepackage{...}  latex preambula