       # Re: My own sum

• To: mathgroup@smc.vnet.net
• Subject: [mg11101] Re: My own sum
• From: Daniel Lichtblau <danl@wolfram.com>
• Date: Sun, 22 Feb 1998 14:55:27 -0500
• Organization: Wolfram Research, Inc.
• References: <6cakf2\$fac@smc.vnet.net>

```Thomas Lemm wrote:
>
> I want to implement another type of Sum to treat expressions in a
> "physical" manner. But I need to know how Mathematica tackles the
> Problem:
>
> Sum[F[x],{x,-a,a}]==Sum[F[y],{y,-a,a}]
>
> Help welcome
>
> Thomas Lemm
>
> Lemm@stud-mailer.uni-marburg.de

Not sure exactly what you have in mind, but if you want to just have
dummy summation variables replaced by a standard variable, call it
'local', you could do as below.

In:= mySum[a_,{x_,y_,z_}] := Block[{local},
ReleaseHold[Hold[Sum[a, {local,y,z}]] /. x->local]]

In:= mySum[F[x],{x,-a,a}]
Out= Sum[F[local], {local, -a, a}]

In:=  mySum[F[x],{x,-a,a}]==mySum[F[y],{y,-a,a}] Out= True

If you do this it would be a good idea not to use the symbol 'local'
elsewhere in your code.

Daniel Lichtblau
Wolfram Research

```

• Prev by Date: Re: typesetting problem in Mathematica3 / NT
• Next by Date: Help
• Prev by thread: Re: Re: My own sum
• Next by thread: Block diagonalisation of matrices