Patterns and rules to combine integrands
- To: mathgroup at smc.vnet.net
- Subject: [mg123877] Patterns and rules to combine integrands
- From: timy <timy.tech at googlemail.com>
- Date: Mon, 26 Dec 2011 06:54:53 -0500 (EST)
- Delivered-to: l-mathgroup@mail-archive0.wolfram.com
Dear group,
I am always eager to see how Mathematica does everything
automatically, as long as the rules has been set. Now here comes an
expansion in integral form
I*Ip*\[Tau] + I*\[Mu] . Integrate[\[CapitalEpsilon][t], {t, 0, \
[Tau]}] + (1/2)*I*Sum[Integrate[Subscript[\[CapitalEpsilon], j]
[t]*Subscript[\[CapitalEpsilon], k][t], {t, 0, \[Tau]}], j, k]
But I want to deduce to this one
Integrate[I*Ip + I*\[Mu] . \[CapitalEpsilon][t] +
(1/2)*I*Sum[Subscript[\[CapitalEpsilon], j][t]*Subscript[\
[CapitalEpsilon], k][t], j, k], {t, 0, \[Tau]}]
Apparently it is a rather simple step to combine all integrands. But
the rules and patterns seems not so easy to figure out. Anyone has
ideas?
Regards & Merry Xmas!
Tim