format package and exp



What I want to do is to simplify the argument of the exponential function.

I am using the "format" package and I konw how to simplify the argument
of different operators by building test functions.

What I do not know is how to do it with the exponential function. I know
that exp(x) is automatically simplified to %e^x. What I want to do is to 
find
a way of finding the argument of the exponential in an expression, i.e. 
build the
equivalent of the following function

logtest(f):=not(atom(f)) and op(f)='log

but with the exponential

exptest(f):=not(atom(f) and op(f)='the exponential operator in the rigth 
form

Thanks

Javi


		
______________________________________________ 
LLama Gratis a cualquier PC del Mundo. 
Llamadas a fijos y m?viles desde 1 c?ntimo por minuto. 
http://es.voice.yahoo.com