Simplify Symbolic Sums in Mathematica
- To: mathgroup at smc.vnet.net
- Subject: [mg9493] Simplify Symbolic Sums in Mathematica
- From: Olaf Schmidt <Olaf.Schmidt at dlr.de>
- Date: Sat, 8 Nov 1997 23:04:26 -0500
- Organization: DLR WB-SM
- Sender: owner-wri-mathgroup at wolfram.com
Hello,
my problem is to simplify symbolic sums (double sums) in Mathematica
2.2.
For Example:
SymbolicSum[ SymbolicSum[ (x[i+1]-x[i]), {i, 1,
j}]*(x[j+2]-x[j+1]), {j, 1, k-2}]
+ SymbolicSum[ (x[i+1]-x[i])*(x-x[k]), {i, 1, k-1}]
The result should be:
SymbolicSum[ (x[i+1]-x[i])*(x-x[i+1]), {i, 1, k-1}] I used the
package Algebra 'SymbolicSum' Does anyone know how to simplify such
expression? Best regards
Olaf Schmidt
Dipl.-Ing. Olaf Schmidt
German Aerospace Center (DLR)
Institute of Structural Mechanics / Thermo-Resistant Structures
Lilienthalplatz 7
D-38108 Braunschweig
Germany
e-mail: Olaf.Schmidt at dlr.de
------------------------------------------------ Visit our homepage
http://hyperg.kp.dlr.de/WB-SM/sm-thermo/homepage