Re: unevaluated expression
- To: mathgroup at smc.vnet.net
- Subject: [mg77179] Re: unevaluated expression
- From: Jean-Marc Gulliet <jeanmarc.gulliet at gmail.com>
- Date: Tue, 5 Jun 2007 06:44:39 -0400 (EDT)
- Organization: The Open University, Milton Keynes, UK
- References: <f40gan$628$1@smc.vnet.net>
juliok at verizon.net wrote:
> How do you write a function such as
> example[f_]:= ......
>
> so that when entering example[#^2] Mathematica will respond with
>
> integral_symbol x^2 dx = x^3 /3
>
> where integral_symbol is the standard math symbol, exponents are
> superscripts, etc. I tried Hold[], Unevaluated[], nothing seems to
> work.
>
> Thanks
>
>
> Julio
Hi Julio,
Assuming I have correctly understood what you tried to do, HoldForm is
the function you need on the LHS. For instance,
In[1]:=
HoldForm[Integrate[x^2, x]] == Integrate[x^2, x]
example[f_] := HoldForm[Integrate[f, x]] ==
Integrate[f, x]
example[x^2]
example2[fun_, var_:x] :=
HoldForm[Integrate[fun, var]] == Integrate[fun, var]
example2[x^3]
example2[(t - 3)^(1/2), t]
Out[1]=
3
2 x
Integrate[x , x] == --
3
Out[3]=
3
2 x
Integrate[x , x] == --
3
Out[5]=
4
3 x
Integrate[x , x] == --
4
Out[6]=
2 3/2
Integrate[Sqrt[-3 + t], t] == - (-3 + t)
3
Note that within a notebook, Integrate will be displayed as the integral
symbol. Also, example2 is more flexible than example.
Hope this helps,
Jean-Marc