Re: unevaluated expression
- To: mathgroup at smc.vnet.net
- Subject: [mg77157] Re: [mg77114] unevaluated expression
- From: Carl Woll <carlw at wolfram.com>
- Date: Tue, 5 Jun 2007 06:33:15 -0400 (EDT)
- References: <200706040747.DAA06077@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
>
>
>
You should use example[#^2&] instead of example[#^2]. Here is one
possibility:
example[f_] := With[{integrand = f[x]}, HoldForm[Integrate[integrand,
x]] == Integrate[f[x], x]]
Tests:
In[29]:= example[#^2 &]
Out[29]= \[Integral]x^2\[DifferentialD]x\[LongEqual]x^3/3
In[30]:= example[Sqrt]
Out[30]= \[Integral]Sqrt[x]\[DifferentialD]x\[LongEqual](2 x^(3/2))/3
In[31]:= example[Sin]
Out[31]= \[Integral]sin(x)\[DifferentialD]x\[LongEqual]-cos(x)
Carl Woll
Wolfram Research
- References:
- unevaluated expression
- From: juliok@verizon.net
- unevaluated expression