Re: Unprotect Plus, no automatic collection
- To: mathgroup at smc.vnet.net
- Subject: [mg39122] Re: Unprotect Plus, no automatic collection
- From: "Allan Hayes" <hay at haystack.demon.co.uk>
- Date: Thu, 30 Jan 2003 01:06:15 -0500 (EST)
- References: <b184d4$kqb$1@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
"Friedrich Laher" <mathefritz at schmieder-laher.de> wrote in message news:b184d4$kqb$1 at smc.vnet.net... > when Unprotect[Plus]; Plus[w1,w2] = -1 is commanded > and then the expanding of a product gives a*w1 + a*w2 + ... > that is not collapsed to -a + ... automatically, even > if selecting that a*w1 + a*w1 and > the applying Simplify to it from al palette, does it. What > can be done to automize it? > > Friedrich, Unprotect[Plus]; (a_. ) w1+(a_.) w2 = -a; a w1+a w2 -a -- Allan --------------------- Allan Hayes Mathematica Training and Consulting Leicester UK hay at haystack.demon.co.uk Voice: +44 (0)116 271 4198 Fax: +44 (0)870 164 0565